[BACK]Return to mdoc_macro.c CVS log [TXT][DIR] Up to [cvsweb.bsd.lv] / mandoc

Diff for /mandoc/mdoc_macro.c between version 1.203 and 1.208

version 1.203, 2015/10/12 00:08:15 version 1.208, 2016/08/20 15:58:21
Line 228  mdoc_endparse(struct roff_man *mdoc)
Line 228  mdoc_endparse(struct roff_man *mdoc)
         /* Rewind to the first. */          /* Rewind to the first. */
   
         rew_last(mdoc, mdoc->first);          rew_last(mdoc, mdoc->first);
           mdoc_state_reset(mdoc);
 }  }
   
 /*  /*
Line 239  lookup(struct roff_man *mdoc, int from, int line, int 
Line 240  lookup(struct roff_man *mdoc, int from, int line, int 
 {  {
         int      res;          int      res;
   
           if (mdoc->flags & MDOC_PHRASEQF) {
                   mdoc->flags &= ~MDOC_PHRASEQF;
                   return TOKEN_NONE;
           }
         if (from == TOKEN_NONE || mdoc_macros[from].flags & MDOC_PARSED) {          if (from == TOKEN_NONE || mdoc_macros[from].flags & MDOC_PARSED) {
                 res = mdoc_hash_find(p);                  res = mdoc_hash_find(p);
                 if (res != TOKEN_NONE) {                  if (res != TOKEN_NONE) {
Line 258  lookup(struct roff_man *mdoc, int from, int line, int 
Line 263  lookup(struct roff_man *mdoc, int from, int line, int 
 static void  static void
 rew_last(struct roff_man *mdoc, const struct roff_node *to)  rew_last(struct roff_man *mdoc, const struct roff_node *to)
 {  {
         struct roff_node        *np;  
   
         if (to->flags & MDOC_VALID)          if (to->flags & MDOC_VALID)
                 return;                  return;
   
         while (mdoc->last != to) {          while (mdoc->last != to) {
                 /*                  mdoc_state(mdoc, mdoc->last);
                  * Save the parent here, because we may delete the                  mdoc->last->flags |= MDOC_VALID | MDOC_ENDED;
                  * mdoc->last node in the post-validation phase and reset                  mdoc->last = mdoc->last->parent;
                  * it to mdoc->last->parent, causing a step in the closing  
                  * out to be lost.  
                  */  
                 np = mdoc->last->parent;  
                 mdoc_valid_post(mdoc);  
                 mdoc->last = np;  
                 assert(mdoc->last);  
         }          }
           mdoc_state(mdoc, mdoc->last);
           mdoc->last->flags |= MDOC_VALID | MDOC_ENDED;
         mdoc->next = ROFF_NEXT_SIBLING;          mdoc->next = ROFF_NEXT_SIBLING;
         mdoc_valid_post(mdoc);  
 }  }
   
 /*  /*
Line 294  rew_pending(struct roff_man *mdoc, const struct roff_n
Line 292  rew_pending(struct roff_man *mdoc, const struct roff_n
                         case ROFFT_HEAD:                          case ROFFT_HEAD:
                                 roff_body_alloc(mdoc, n->line, n->pos,                                  roff_body_alloc(mdoc, n->line, n->pos,
                                     n->tok);                                      n->tok);
                                 return;                                  break;
                         case ROFFT_BLOCK:                          case ROFFT_BLOCK:
                                 break;                                  break;
                         default:                          default:
Line 1030  blk_full(MACRO_PROT_ARGS)
Line 1028  blk_full(MACRO_PROT_ARGS)
         if (tok == MDOC_Bk)          if (tok == MDOC_Bk)
                 mdoc->flags |= MDOC_KEEP;                  mdoc->flags |= MDOC_KEEP;
   
         ac = ARGS_PEND;          ac = ARGS_EOLN;
         for (;;) {          for (;;) {
   
                   /*
                    * If we are right after a tab character,
                    * do not parse the first word for macros.
                    */
   
                   if (mdoc->flags & MDOC_PHRASEQN) {
                           mdoc->flags &= ~MDOC_PHRASEQN;
                           mdoc->flags |= MDOC_PHRASEQF;
                   }
   
                 la = *pos;                  la = *pos;
                 lac = ac;                  lac = ac;
                 ac = mdoc_args(mdoc, line, pos, buf, tok, &p);                  ac = mdoc_args(mdoc, line, pos, buf, tok, &p);
                 if (ac == ARGS_EOLN) {                  if (ac == ARGS_EOLN) {
                         if (lac != ARGS_PPHRASE && lac != ARGS_PHRASE)                          if (lac != ARGS_PHRASE ||
                               ! (mdoc->flags & MDOC_PHRASEQF))
                                 break;                                  break;
   
                         /*                          /*
                          * This is necessary: if the last token on a                           * This line ends in a tab; start the next
                          * line is a `Ta' or tab, then we'll get                           * column now, with a leading blank.
                          * ARGS_EOLN, so we must be smart enough to  
                          * reopen our scope if the last parse was a  
                          * phrase or partial phrase.  
                          */                           */
   
                         if (body != NULL)                          if (body != NULL)
                                 rew_last(mdoc, body);                                  rew_last(mdoc, body);
                         body = roff_body_alloc(mdoc, line, ppos, tok);                          body = roff_body_alloc(mdoc, line, ppos, tok);
                           roff_word_alloc(mdoc, line, ppos, "\\&");
                         break;                          break;
                 }                  }
   
                 if (tok == MDOC_Bd || tok == MDOC_Bk) {                  if (tok == MDOC_Bd || tok == MDOC_Bk) {
                         mandoc_vmsg(MANDOCERR_ARG_EXCESS,                          mandoc_vmsg(MANDOCERR_ARG_EXCESS,
                             mdoc->parse, line, la, "%s ... %s",                              mdoc->parse, line, la, "%s ... %s",
Line 1070  blk_full(MACRO_PROT_ARGS)
Line 1081  blk_full(MACRO_PROT_ARGS)
                  */                   */
   
                 if (head == NULL &&                  if (head == NULL &&
                     ac != ARGS_PEND &&  
                     ac != ARGS_PHRASE &&                      ac != ARGS_PHRASE &&
                     ac != ARGS_PPHRASE &&  
                     ac != ARGS_QWORD &&                      ac != ARGS_QWORD &&
                     mdoc_isdelim(p) == DELIM_OPEN) {                      mdoc_isdelim(p) == DELIM_OPEN) {
                         dword(mdoc, line, la, p, DELIM_OPEN, 0);                          dword(mdoc, line, la, p, DELIM_OPEN, 0);
Line 1084  blk_full(MACRO_PROT_ARGS)
Line 1093  blk_full(MACRO_PROT_ARGS)
                 if (head == NULL)                  if (head == NULL)
                         head = roff_head_alloc(mdoc, line, ppos, tok);                          head = roff_head_alloc(mdoc, line, ppos, tok);
   
                 if (ac == ARGS_PHRASE ||                  if (ac == ARGS_PHRASE) {
                     ac == ARGS_PEND ||  
                     ac == ARGS_PPHRASE) {  
   
                         /*                          /*
                          * If we haven't opened a body yet, rewind the                           * If we haven't opened a body yet, rewind the
Line 1096  blk_full(MACRO_PROT_ARGS)
Line 1103  blk_full(MACRO_PROT_ARGS)
                         rew_last(mdoc, body == NULL ? head : body);                          rew_last(mdoc, body == NULL ? head : body);
                         body = roff_body_alloc(mdoc, line, ppos, tok);                          body = roff_body_alloc(mdoc, line, ppos, tok);
   
                         /*                          /* Process to the tab or to the end of the line. */
                          * Process phrases: set whether we're in a  
                          * partial-phrase (this effects line handling)  
                          * then call down into the phrase parser.  
                          */  
   
                         if (ac == ARGS_PPHRASE)                          mdoc->flags |= MDOC_PHRASE;
                                 mdoc->flags |= MDOC_PPHRASE;  
                         if (ac == ARGS_PEND && lac == ARGS_PPHRASE)  
                                 mdoc->flags |= MDOC_PPHRASE;  
                         parse_rest(mdoc, TOKEN_NONE, line, &la, buf);                          parse_rest(mdoc, TOKEN_NONE, line, &la, buf);
                         mdoc->flags &= ~MDOC_PPHRASE;                          mdoc->flags &= ~MDOC_PHRASE;
   
                           /* There may have been `Ta' macros. */
   
                           while (body->next != NULL)
                                   body = body->next;
                         continue;                          continue;
                 }                  }
   
Line 1454  phrase_ta(MACRO_PROT_ARGS)
Line 1459  phrase_ta(MACRO_PROT_ARGS)
                         continue;                          continue;
                 if (n->tok == MDOC_It && n->type == ROFFT_BODY)                  if (n->tok == MDOC_It && n->type == ROFFT_BODY)
                         body = n;                          body = n;
                 if (n->tok == MDOC_Bl)                  if (n->tok == MDOC_Bl && n->end == ENDBODY_NOT)
                         break;                          break;
         }          }
   
Legend:
Removed from v.1.203  
changed lines
  Added in v.1.208
CVSweb