silentbob/silentbob-1.1/src/sblib/skip_macro.cpp

   1 /*
   2  * (c) Oleg Puchinin 2006.
   3  * graycardinalster@gmail.com
   4  *
   5  */
   6
   7 #include "../head.h"
   8 #include "bugs.h"
   9
  10 void skip_macro (char ** d_ptr, char ** d_out, char ch)
  11 {
  12         char *macro_start;
  13         char * d_my;
  14         int n = 0;
  15
  16         d_my = *d_out;
  17         macro_start = *d_out;
  18         while (true) {
  19                 if (ch == '\n')
  20                         n++;
  21
  22                 if ((ch == '\n') && (d_my[strlen (d_my) - 1] != '\\'))
  23                         break;
  24
  25                 if (n > 300)
  26                         bug_longmacro ();
  27
  28                 ch = t_op (d_ptr, d_out);
  29                 ENV->t_op_no ++;
  30                 if (ch == 0)
  31                         break;
  32                 d_my = *d_out;
  33         }
  34 }
  35