[BACK]Return to trace.c CVS log [TXT][DIR] Up to [local] / src / usr.bin / m4

Diff for /src/usr.bin/m4/trace.c between version 1.2 and 1.3

version 1.2, 2001/09/27 11:40:33 version 1.3, 2001/09/29 15:47:18
Line 57 
Line 57 
 static unsigned int letter_to_flag __P((int));  static unsigned int letter_to_flag __P((int));
 static void print_header __P((struct input_file *));  static void print_header __P((struct input_file *));
 static struct t *find_trace_entry __P((const char *));  static struct t *find_trace_entry __P((const char *));
   static int frame_level __P((void));
   
 static unsigned int flags = TRACE_QUOTE | TRACE_EXPANSION;  static unsigned int flags = TRACE_QUOTE | TRACE_EXPANSION;
   
Line 189 
Line 190 
         }          }
 }  }
   
   static int
   frame_level()
   {
           int level;
           int framep;
   
           for (framep = fp, level = 0; framep != 0;
                   level++,framep = mstack[framep-2].sfra)
                   ;
           return level;
   }
   
 static void  static void
 print_header(inp)  print_header(inp)
         struct input_file *inp;          struct input_file *inp;
Line 198 
Line 211 
                 fprintf(traceout, "%s:", inp->name);                  fprintf(traceout, "%s:", inp->name);
         if (flags & TRACE_LINENO)          if (flags & TRACE_LINENO)
                 fprintf(traceout, "%lu:", inp->lineno);                  fprintf(traceout, "%lu:", inp->lineno);
         fprintf(traceout, " -1- ");          fprintf(traceout, " -%d- ", frame_level());
         if (flags & TRACE_ID)          if (flags & TRACE_ID)
                 fprintf(traceout, "id %lu: ", expansion_id);                  fprintf(traceout, "id %lu: ", expansion_id);
 }  }
Line 216 
Line 229 
         }          }
         fprintf(traceout, "%s", argv[1]);          fprintf(traceout, "%s", argv[1]);
         if ((flags & TRACE_ARGS) && argc > 2) {          if ((flags & TRACE_ARGS) && argc > 2) {
                 char delim = LPAREN;                  char delim[3];
                 int i;                  int i;
   
                   delim[0] = LPAREN;
                   delim[1] = EOS;
                 for (i = 2; i < argc; i++) {                  for (i = 2; i < argc; i++) {
                         fprintf(traceout, "%c%s%s%s", delim,                          fprintf(traceout, "%s%s%s%s", delim,
                             (flags & TRACE_QUOTE) ? lquote : "",                              (flags & TRACE_QUOTE) ? lquote : "",
                             argv[i],                              argv[i],
                             (flags & TRACE_QUOTE) ? rquote : "");                              (flags & TRACE_QUOTE) ? rquote : "");
                         delim = COMMA;                          delim[0] = COMMA;
                           delim[1] = ' ';
                           delim[2] = EOS;
                 }                  }
                 fprintf(traceout, "%c", RPAREN);                  fprintf(traceout, "%c", RPAREN);
         }          }
Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3