PageRenderTime 118ms CodeModel.GetById 28ms app.highlight 81ms RepoModel.GetById 1ms app.codeStats 0ms

/vendor/peg/leg.c

http://github.com/feyeleanor/RubyGoLightly
C | 1083 lines | 1024 code | 58 blank | 1 comment | 212 complexity | a0ee8b59d7f7d24a4bfcc2fe68929607 MD5 | raw file
   1/* A recursive-descent parser generated by peg 0.1.1 */
   2
   3#include <stdio.h>
   4#include <stdlib.h>
   5#include <string.h>
   6#define YYRULECOUNT 36
   7
   8# include "tree.h"
   9# include "version.h"
  10
  11# include <stdio.h>
  12# include <stdlib.h>
  13# include <unistd.h>
  14# include <string.h>
  15# include <libgen.h>
  16# include <assert.h>
  17
  18  typedef struct Header Header;
  19
  20  struct Header {
  21    char   *text;
  22    Header *next;
  23  };
  24
  25  FILE *input= 0;
  26
  27  int   verboseFlag= 0;
  28
  29  static int	 lineNumber= 0;
  30  static char	*fileName= 0;
  31  static char	*trailer= 0;
  32  static Header	*headers= 0;
  33
  34  void makeHeader(char *text);
  35  void makeTrailer(char *text);
  36
  37  void yyerror(char *message);
  38
  39# define YY_INPUT(buf, result, max)		\
  40  {						\
  41    int c= getc(input);				\
  42    if ('\n' == c || '\r' == c) ++lineNumber;	\
  43    result= (EOF == c) ? 0 : (*(buf)= c, 1);	\
  44  }
  45
  46# define YY_LOCAL(T)	static T
  47# define YY_RULE(T)	static T
  48
  49#ifndef YY_VARIABLE
  50#define YY_VARIABLE(T)	static T
  51#endif
  52#ifndef YY_LOCAL
  53#define YY_LOCAL(T)	static T
  54#endif
  55#ifndef YY_ACTION
  56#define YY_ACTION(T)	static T
  57#endif
  58#ifndef YY_RULE
  59#define YY_RULE(T)	static T
  60#endif
  61#ifndef YY_PARSE
  62#define YY_PARSE(T)	T
  63#endif
  64#ifndef YYPARSE
  65#define YYPARSE		yyparse
  66#endif
  67#ifndef YYPARSEFROM
  68#define YYPARSEFROM	yyparsefrom
  69#endif
  70#ifndef YY_INPUT
  71#define YY_INPUT(buf, result, max_size)			\
  72  {							\
  73    int yyc= getchar();					\
  74    result= (EOF == yyc) ? 0 : (*(buf)= yyc, 1);	\
  75    yyprintf((stderr, "<%c>", yyc));			\
  76  }
  77#endif
  78#ifndef YY_BEGIN
  79#define YY_BEGIN	( yybegin= yypos, 1)
  80#endif
  81#ifndef YY_END
  82#define YY_END		( yyend= yypos, 1)
  83#endif
  84#ifdef YY_DEBUG
  85# define yyprintf(args)	fprintf args
  86#else
  87# define yyprintf(args)
  88#endif
  89#ifndef YYSTYPE
  90#define YYSTYPE	int
  91#endif
  92
  93#ifndef YY_PART
  94
  95typedef void (*yyaction)(char *yytext, int yyleng);
  96typedef struct _yythunk { int begin, end;  yyaction  action;  struct _yythunk *next; } yythunk;
  97
  98YY_VARIABLE(char *   ) yybuf= 0;
  99YY_VARIABLE(int	     ) yybuflen= 0;
 100YY_VARIABLE(int	     ) yypos= 0;
 101YY_VARIABLE(int	     ) yylimit= 0;
 102YY_VARIABLE(char *   ) yytext= 0;
 103YY_VARIABLE(int	     ) yytextlen= 0;
 104YY_VARIABLE(int	     ) yybegin= 0;
 105YY_VARIABLE(int	     ) yyend= 0;
 106YY_VARIABLE(int	     ) yytextmax= 0;
 107YY_VARIABLE(yythunk *) yythunks= 0;
 108YY_VARIABLE(int	     ) yythunkslen= 0;
 109YY_VARIABLE(int      ) yythunkpos= 0;
 110YY_VARIABLE(YYSTYPE  ) yy;
 111YY_VARIABLE(YYSTYPE *) yyval= 0;
 112YY_VARIABLE(YYSTYPE *) yyvals= 0;
 113YY_VARIABLE(int      ) yyvalslen= 0;
 114
 115YY_LOCAL(int) yyrefill(void)
 116{
 117  int yyn;
 118  while (yybuflen - yypos < 512)
 119    {
 120      yybuflen *= 2;
 121      yybuf= realloc(yybuf, yybuflen);
 122    }
 123  YY_INPUT((yybuf + yypos), yyn, (yybuflen - yypos));
 124  if (!yyn) return 0;
 125  yylimit += yyn;
 126  return 1;
 127}
 128
 129YY_LOCAL(int) yymatchDot(void)
 130{
 131  if (yypos >= yylimit && !yyrefill()) return 0;
 132  ++yypos;
 133  return 1;
 134}
 135
 136YY_LOCAL(int) yymatchChar(int c)
 137{
 138  if (yypos >= yylimit && !yyrefill()) return 0;
 139  if (yybuf[yypos] == c)
 140    {
 141      ++yypos;
 142      yyprintf((stderr, "  ok   yymatchChar(%c) @ %s\n", c, yybuf+yypos));
 143      return 1;
 144    }
 145  yyprintf((stderr, "  fail yymatchChar(%c) @ %s\n", c, yybuf+yypos));
 146  return 0;
 147}
 148
 149YY_LOCAL(int) yymatchString(char *s)
 150{
 151  int yysav= yypos;
 152  while (*s)
 153    {
 154      if (yypos >= yylimit && !yyrefill()) return 0;
 155      if (yybuf[yypos] != *s)
 156        {
 157          yypos= yysav;
 158          return 0;
 159        }
 160      ++s;
 161      ++yypos;
 162    }
 163  return 1;
 164}
 165
 166YY_LOCAL(int) yymatchClass(unsigned char *bits)
 167{
 168  int c;
 169  if (yypos >= yylimit && !yyrefill()) return 0;
 170  c= yybuf[yypos];
 171  if (bits[c >> 3] & (1 << (c & 7)))
 172    {
 173      ++yypos;
 174      yyprintf((stderr, "  ok   yymatchClass @ %s\n", yybuf+yypos));
 175      return 1;
 176    }
 177  yyprintf((stderr, "  fail yymatchClass @ %s\n", yybuf+yypos));
 178  return 0;
 179}
 180
 181YY_LOCAL(void) yyDo(yyaction action, int begin, int end)
 182{
 183  while (yythunkpos >= yythunkslen)
 184    {
 185      yythunkslen *= 2;
 186      yythunks= realloc(yythunks, sizeof(yythunk) * yythunkslen);
 187    }
 188  yythunks[yythunkpos].begin=  begin;
 189  yythunks[yythunkpos].end=    end;
 190  yythunks[yythunkpos].action= action;
 191  ++yythunkpos;
 192}
 193
 194YY_LOCAL(int) yyText(int begin, int end)
 195{
 196  int yyleng= end - begin;
 197  if (yyleng <= 0)
 198    yyleng= 0;
 199  else
 200    {
 201      while (yytextlen < (yyleng - 1))
 202	{
 203	  yytextlen *= 2;
 204	  yytext= realloc(yytext, yytextlen);
 205	}
 206      memcpy(yytext, yybuf + begin, yyleng);
 207    }
 208  yytext[yyleng]= '\0';
 209  return yyleng;
 210}
 211
 212YY_LOCAL(void) yyDone(void)
 213{
 214  int pos;
 215  for (pos= 0;  pos < yythunkpos;  ++pos)
 216    {
 217      yythunk *thunk= &yythunks[pos];
 218      int yyleng= thunk->end ? yyText(thunk->begin, thunk->end) : thunk->begin;
 219      yyprintf((stderr, "DO [%d] %p %s\n", pos, thunk->action, yytext));
 220      thunk->action(yytext, yyleng);
 221    }
 222  yythunkpos= 0;
 223}
 224
 225YY_LOCAL(void) yyCommit()
 226{
 227  if ((yylimit -= yypos))
 228    {
 229      memmove(yybuf, yybuf + yypos, yylimit);
 230    }
 231  yybegin -= yypos;
 232  yyend -= yypos;
 233  yypos= yythunkpos= 0;
 234}
 235
 236YY_LOCAL(int) yyAccept(int tp0)
 237{
 238  if (tp0)
 239    {
 240      fprintf(stderr, "accept denied at %d\n", tp0);
 241      return 0;
 242    }
 243  else
 244    {
 245      yyDone();
 246      yyCommit();
 247    }
 248  return 1;
 249}
 250
 251YY_LOCAL(void) yyPush(char *text, int count)	{ yyval += count; }
 252YY_LOCAL(void) yyPop(char *text, int count)	{ yyval -= count; }
 253YY_LOCAL(void) yySet(char *text, int count)	{ yyval[count]= yy; }
 254
 255#endif /* YY_PART */
 256
 257#define	YYACCEPT	yyAccept(yythunkpos0)
 258
 259YY_RULE(int) yy_end_of_line(); /* 36 */
 260YY_RULE(int) yy_comment(); /* 35 */
 261YY_RULE(int) yy_space(); /* 34 */
 262YY_RULE(int) yy_braces(); /* 33 */
 263YY_RULE(int) yy_range(); /* 32 */
 264YY_RULE(int) yy_char(); /* 31 */
 265YY_RULE(int) yy_END(); /* 30 */
 266YY_RULE(int) yy_BEGIN(); /* 29 */
 267YY_RULE(int) yy_DOT(); /* 28 */
 268YY_RULE(int) yy_class(); /* 27 */
 269YY_RULE(int) yy_literal(); /* 26 */
 270YY_RULE(int) yy_CLOSE(); /* 25 */
 271YY_RULE(int) yy_OPEN(); /* 24 */
 272YY_RULE(int) yy_COLON(); /* 23 */
 273YY_RULE(int) yy_PLUS(); /* 22 */
 274YY_RULE(int) yy_STAR(); /* 21 */
 275YY_RULE(int) yy_QUESTION(); /* 20 */
 276YY_RULE(int) yy_primary(); /* 19 */
 277YY_RULE(int) yy_NOT(); /* 18 */
 278YY_RULE(int) yy_suffix(); /* 17 */
 279YY_RULE(int) yy_action(); /* 16 */
 280YY_RULE(int) yy_AND(); /* 15 */
 281YY_RULE(int) yy_prefix(); /* 14 */
 282YY_RULE(int) yy_BAR(); /* 13 */
 283YY_RULE(int) yy_sequence(); /* 12 */
 284YY_RULE(int) yy_SEMICOLON(); /* 11 */
 285YY_RULE(int) yy_expression(); /* 10 */
 286YY_RULE(int) yy_EQUAL(); /* 9 */
 287YY_RULE(int) yy_identifier(); /* 8 */
 288YY_RULE(int) yy_RPERCENT(); /* 7 */
 289YY_RULE(int) yy_end_of_file(); /* 6 */
 290YY_RULE(int) yy_trailer(); /* 5 */
 291YY_RULE(int) yy_definition(); /* 4 */
 292YY_RULE(int) yy_declaration(); /* 3 */
 293YY_RULE(int) yy__(); /* 2 */
 294YY_RULE(int) yy_grammar(); /* 1 */
 295
 296YY_ACTION(void) yy_9_primary(char *yytext, int yyleng)
 297{
 298  yyprintf((stderr, "do yy_9_primary\n"));
 299   push(makePredicate("YY_END")); ;
 300}
 301YY_ACTION(void) yy_8_primary(char *yytext, int yyleng)
 302{
 303  yyprintf((stderr, "do yy_8_primary\n"));
 304   push(makePredicate("YY_BEGIN")); ;
 305}
 306YY_ACTION(void) yy_7_primary(char *yytext, int yyleng)
 307{
 308  yyprintf((stderr, "do yy_7_primary\n"));
 309   push(makeAction(yytext)); ;
 310}
 311YY_ACTION(void) yy_6_primary(char *yytext, int yyleng)
 312{
 313  yyprintf((stderr, "do yy_6_primary\n"));
 314   push(makeDot()); ;
 315}
 316YY_ACTION(void) yy_5_primary(char *yytext, int yyleng)
 317{
 318  yyprintf((stderr, "do yy_5_primary\n"));
 319   push(makeClass(yytext)); ;
 320}
 321YY_ACTION(void) yy_4_primary(char *yytext, int yyleng)
 322{
 323  yyprintf((stderr, "do yy_4_primary\n"));
 324   push(makeString(yytext)); ;
 325}
 326YY_ACTION(void) yy_3_primary(char *yytext, int yyleng)
 327{
 328  yyprintf((stderr, "do yy_3_primary\n"));
 329   push(makeName(findRule(yytext))); ;
 330}
 331YY_ACTION(void) yy_2_primary(char *yytext, int yyleng)
 332{
 333  yyprintf((stderr, "do yy_2_primary\n"));
 334   Node *name= makeName(findRule(yytext));  name->name.variable= pop();  push(name); ;
 335}
 336YY_ACTION(void) yy_1_primary(char *yytext, int yyleng)
 337{
 338  yyprintf((stderr, "do yy_1_primary\n"));
 339   push(makeVariable(yytext)); ;
 340}
 341YY_ACTION(void) yy_3_suffix(char *yytext, int yyleng)
 342{
 343  yyprintf((stderr, "do yy_3_suffix\n"));
 344   push(makePlus (pop())); ;
 345}
 346YY_ACTION(void) yy_2_suffix(char *yytext, int yyleng)
 347{
 348  yyprintf((stderr, "do yy_2_suffix\n"));
 349   push(makeStar (pop())); ;
 350}
 351YY_ACTION(void) yy_1_suffix(char *yytext, int yyleng)
 352{
 353  yyprintf((stderr, "do yy_1_suffix\n"));
 354   push(makeQuery(pop())); ;
 355}
 356YY_ACTION(void) yy_3_prefix(char *yytext, int yyleng)
 357{
 358  yyprintf((stderr, "do yy_3_prefix\n"));
 359   push(makePeekNot(pop())); ;
 360}
 361YY_ACTION(void) yy_2_prefix(char *yytext, int yyleng)
 362{
 363  yyprintf((stderr, "do yy_2_prefix\n"));
 364   push(makePeekFor(pop())); ;
 365}
 366YY_ACTION(void) yy_1_prefix(char *yytext, int yyleng)
 367{
 368  yyprintf((stderr, "do yy_1_prefix\n"));
 369   push(makePredicate(yytext)); ;
 370}
 371YY_ACTION(void) yy_1_sequence(char *yytext, int yyleng)
 372{
 373  yyprintf((stderr, "do yy_1_sequence\n"));
 374   Node *f= pop();  push(Sequence_append(pop(), f)); ;
 375}
 376YY_ACTION(void) yy_1_expression(char *yytext, int yyleng)
 377{
 378  yyprintf((stderr, "do yy_1_expression\n"));
 379   Node *f= pop();  push(Alternate_append(pop(), f)); ;
 380}
 381YY_ACTION(void) yy_2_definition(char *yytext, int yyleng)
 382{
 383  yyprintf((stderr, "do yy_2_definition\n"));
 384   Node *e= pop();  Rule_setExpression(pop(), e); ;
 385}
 386YY_ACTION(void) yy_1_definition(char *yytext, int yyleng)
 387{
 388  yyprintf((stderr, "do yy_1_definition\n"));
 389   if (push(beginRule(findRule(yytext)))->rule.expression)
 390							    fprintf(stderr, "rule '%s' redefined\n", yytext); ;
 391}
 392YY_ACTION(void) yy_1_trailer(char *yytext, int yyleng)
 393{
 394  yyprintf((stderr, "do yy_1_trailer\n"));
 395   makeTrailer(yytext); ;
 396}
 397YY_ACTION(void) yy_1_declaration(char *yytext, int yyleng)
 398{
 399  yyprintf((stderr, "do yy_1_declaration\n"));
 400   makeHeader(yytext); ;
 401}
 402
 403YY_RULE(int) yy_end_of_line()
 404{  int yypos0= yypos, yythunkpos0= yythunkpos;
 405  yyprintf((stderr, "%s\n", "end_of_line"));
 406  {  int yypos2= yypos, yythunkpos2= yythunkpos;  if (!yymatchString("\r\n")) goto l3;  goto l2;
 407  l3:;	  yypos= yypos2; yythunkpos= yythunkpos2;  if (!yymatchChar('\n')) goto l4;  goto l2;
 408  l4:;	  yypos= yypos2; yythunkpos= yythunkpos2;  if (!yymatchChar('\r')) goto l1;
 409  }
 410  l2:;	
 411  yyprintf((stderr, "  ok   %s @ %s\n", "end_of_line", yybuf+yypos));
 412  return 1;
 413  l1:;	  yypos= yypos0; yythunkpos= yythunkpos0;
 414  yyprintf((stderr, "  fail %s @ %s\n", "end_of_line", yybuf+yypos));
 415  return 0;
 416}
 417YY_RULE(int) yy_comment()
 418{  int yypos0= yypos, yythunkpos0= yythunkpos;
 419  yyprintf((stderr, "%s\n", "comment"));  if (!yymatchChar('#')) goto l5;
 420  l6:;	
 421  {  int yypos7= yypos, yythunkpos7= yythunkpos;
 422  {  int yypos8= yypos, yythunkpos8= yythunkpos;  if (!yy_end_of_line()) goto l8;  goto l7;
 423  l8:;	  yypos= yypos8; yythunkpos= yythunkpos8;
 424  }  if (!yymatchDot()) goto l7;  goto l6;
 425  l7:;	  yypos= yypos7; yythunkpos= yythunkpos7;
 426  }  if (!yy_end_of_line()) goto l5;
 427  yyprintf((stderr, "  ok   %s @ %s\n", "comment", yybuf+yypos));
 428  return 1;
 429  l5:;	  yypos= yypos0; yythunkpos= yythunkpos0;
 430  yyprintf((stderr, "  fail %s @ %s\n", "comment", yybuf+yypos));
 431  return 0;
 432}
 433YY_RULE(int) yy_space()
 434{  int yypos0= yypos, yythunkpos0= yythunkpos;
 435  yyprintf((stderr, "%s\n", "space"));
 436  {  int yypos10= yypos, yythunkpos10= yythunkpos;  if (!yymatchChar(' ')) goto l11;  goto l10;
 437  l11:;	  yypos= yypos10; yythunkpos= yythunkpos10;  if (!yymatchChar('\t')) goto l12;  goto l10;
 438  l12:;	  yypos= yypos10; yythunkpos= yythunkpos10;  if (!yy_end_of_line()) goto l9;
 439  }
 440  l10:;	
 441  yyprintf((stderr, "  ok   %s @ %s\n", "space", yybuf+yypos));
 442  return 1;
 443  l9:;	  yypos= yypos0; yythunkpos= yythunkpos0;
 444  yyprintf((stderr, "  fail %s @ %s\n", "space", yybuf+yypos));
 445  return 0;
 446}
 447YY_RULE(int) yy_braces()
 448{  int yypos0= yypos, yythunkpos0= yythunkpos;
 449  yyprintf((stderr, "%s\n", "braces"));
 450  {  int yypos14= yypos, yythunkpos14= yythunkpos;  if (!yymatchChar('{')) goto l15;
 451  l16:;	
 452  {  int yypos17= yypos, yythunkpos17= yythunkpos;
 453  {  int yypos18= yypos, yythunkpos18= yythunkpos;  if (!yymatchChar('}')) goto l18;  goto l17;
 454  l18:;	  yypos= yypos18; yythunkpos= yythunkpos18;
 455  }  if (!yymatchDot()) goto l17;  goto l16;
 456  l17:;	  yypos= yypos17; yythunkpos= yythunkpos17;
 457  }  if (!yymatchChar('}')) goto l15;  goto l14;
 458  l15:;	  yypos= yypos14; yythunkpos= yythunkpos14;
 459  {  int yypos19= yypos, yythunkpos19= yythunkpos;  if (!yymatchChar('}')) goto l19;  goto l13;
 460  l19:;	  yypos= yypos19; yythunkpos= yythunkpos19;
 461  }  if (!yymatchDot()) goto l13;
 462  }
 463  l14:;	
 464  yyprintf((stderr, "  ok   %s @ %s\n", "braces", yybuf+yypos));
 465  return 1;
 466  l13:;	  yypos= yypos0; yythunkpos= yythunkpos0;
 467  yyprintf((stderr, "  fail %s @ %s\n", "braces", yybuf+yypos));
 468  return 0;
 469}
 470YY_RULE(int) yy_range()
 471{  int yypos0= yypos, yythunkpos0= yythunkpos;
 472  yyprintf((stderr, "%s\n", "range"));
 473  {  int yypos21= yypos, yythunkpos21= yythunkpos;  if (!yy_char()) goto l22;  if (!yymatchChar('-')) goto l22;  if (!yy_char()) goto l22;  goto l21;
 474  l22:;	  yypos= yypos21; yythunkpos= yythunkpos21;  if (!yy_char()) goto l20;
 475  }
 476  l21:;	
 477  yyprintf((stderr, "  ok   %s @ %s\n", "range", yybuf+yypos));
 478  return 1;
 479  l20:;	  yypos= yypos0; yythunkpos= yythunkpos0;
 480  yyprintf((stderr, "  fail %s @ %s\n", "range", yybuf+yypos));
 481  return 0;
 482}
 483YY_RULE(int) yy_char()
 484{  int yypos0= yypos, yythunkpos0= yythunkpos;
 485  yyprintf((stderr, "%s\n", "char"));
 486  {  int yypos24= yypos, yythunkpos24= yythunkpos;  if (!yymatchChar('\\')) goto l25;  if (!yymatchClass((unsigned char *)"\000\000\000\000\204\000\000\000\000\000\000\070\146\100\124\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000")) goto l25;  goto l24;
 487  l25:;	  yypos= yypos24; yythunkpos= yythunkpos24;  if (!yymatchChar('\\')) goto l26;  if (!yymatchClass((unsigned char *)"\000\000\000\000\000\000\017\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000")) goto l26;  if (!yymatchClass((unsigned char *)"\000\000\000\000\000\000\377\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000")) goto l26;  if (!yymatchClass((unsigned char *)"\000\000\000\000\000\000\377\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000")) goto l26;  goto l24;
 488  l26:;	  yypos= yypos24; yythunkpos= yythunkpos24;  if (!yymatchChar('\\')) goto l27;  if (!yymatchClass((unsigned char *)"\000\000\000\000\000\000\377\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000")) goto l27;
 489  {  int yypos28= yypos, yythunkpos28= yythunkpos;  if (!yymatchClass((unsigned char *)"\000\000\000\000\000\000\377\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000")) goto l28;  goto l29;
 490  l28:;	  yypos= yypos28; yythunkpos= yythunkpos28;
 491  }
 492  l29:;	  goto l24;
 493  l27:;	  yypos= yypos24; yythunkpos= yythunkpos24;
 494  {  int yypos30= yypos, yythunkpos30= yythunkpos;  if (!yymatchChar('\\')) goto l30;  goto l23;
 495  l30:;	  yypos= yypos30; yythunkpos= yythunkpos30;
 496  }  if (!yymatchDot()) goto l23;
 497  }
 498  l24:;	
 499  yyprintf((stderr, "  ok   %s @ %s\n", "char", yybuf+yypos));
 500  return 1;
 501  l23:;	  yypos= yypos0; yythunkpos= yythunkpos0;
 502  yyprintf((stderr, "  fail %s @ %s\n", "char", yybuf+yypos));
 503  return 0;
 504}
 505YY_RULE(int) yy_END()
 506{  int yypos0= yypos, yythunkpos0= yythunkpos;
 507  yyprintf((stderr, "%s\n", "END"));  if (!yymatchChar('>')) goto l31;  if (!yy__()) goto l31;
 508  yyprintf((stderr, "  ok   %s @ %s\n", "END", yybuf+yypos));
 509  return 1;
 510  l31:;	  yypos= yypos0; yythunkpos= yythunkpos0;
 511  yyprintf((stderr, "  fail %s @ %s\n", "END", yybuf+yypos));
 512  return 0;
 513}
 514YY_RULE(int) yy_BEGIN()
 515{  int yypos0= yypos, yythunkpos0= yythunkpos;
 516  yyprintf((stderr, "%s\n", "BEGIN"));  if (!yymatchChar('<')) goto l32;  if (!yy__()) goto l32;
 517  yyprintf((stderr, "  ok   %s @ %s\n", "BEGIN", yybuf+yypos));
 518  return 1;
 519  l32:;	  yypos= yypos0; yythunkpos= yythunkpos0;
 520  yyprintf((stderr, "  fail %s @ %s\n", "BEGIN", yybuf+yypos));
 521  return 0;
 522}
 523YY_RULE(int) yy_DOT()
 524{  int yypos0= yypos, yythunkpos0= yythunkpos;
 525  yyprintf((stderr, "%s\n", "DOT"));  if (!yymatchChar('.')) goto l33;  if (!yy__()) goto l33;
 526  yyprintf((stderr, "  ok   %s @ %s\n", "DOT", yybuf+yypos));
 527  return 1;
 528  l33:;	  yypos= yypos0; yythunkpos= yythunkpos0;
 529  yyprintf((stderr, "  fail %s @ %s\n", "DOT", yybuf+yypos));
 530  return 0;
 531}
 532YY_RULE(int) yy_class()
 533{  int yypos0= yypos, yythunkpos0= yythunkpos;
 534  yyprintf((stderr, "%s\n", "class"));  if (!yymatchChar('[')) goto l34;  yyText(yybegin, yyend);  if (!(YY_BEGIN)) goto l34;
 535  l35:;	
 536  {  int yypos36= yypos, yythunkpos36= yythunkpos;
 537  {  int yypos37= yypos, yythunkpos37= yythunkpos;  if (!yymatchChar(']')) goto l37;  goto l36;
 538  l37:;	  yypos= yypos37; yythunkpos= yythunkpos37;
 539  }  if (!yy_range()) goto l36;  goto l35;
 540  l36:;	  yypos= yypos36; yythunkpos= yythunkpos36;
 541  }  yyText(yybegin, yyend);  if (!(YY_END)) goto l34;  if (!yymatchChar(']')) goto l34;  if (!yy__()) goto l34;
 542  yyprintf((stderr, "  ok   %s @ %s\n", "class", yybuf+yypos));
 543  return 1;
 544  l34:;	  yypos= yypos0; yythunkpos= yythunkpos0;
 545  yyprintf((stderr, "  fail %s @ %s\n", "class", yybuf+yypos));
 546  return 0;
 547}
 548YY_RULE(int) yy_literal()
 549{  int yypos0= yypos, yythunkpos0= yythunkpos;
 550  yyprintf((stderr, "%s\n", "literal"));
 551  {  int yypos39= yypos, yythunkpos39= yythunkpos;  if (!yymatchClass((unsigned char *)"\000\000\000\000\200\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000")) goto l40;  yyText(yybegin, yyend);  if (!(YY_BEGIN)) goto l40;
 552  l41:;	
 553  {  int yypos42= yypos, yythunkpos42= yythunkpos;
 554  {  int yypos43= yypos, yythunkpos43= yythunkpos;  if (!yymatchClass((unsigned char *)"\000\000\000\000\200\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000")) goto l43;  goto l42;
 555  l43:;	  yypos= yypos43; yythunkpos= yythunkpos43;
 556  }  if (!yy_char()) goto l42;  goto l41;
 557  l42:;	  yypos= yypos42; yythunkpos= yythunkpos42;
 558  }  yyText(yybegin, yyend);  if (!(YY_END)) goto l40;  if (!yymatchClass((unsigned char *)"\000\000\000\000\200\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000")) goto l40;  if (!yy__()) goto l40;  goto l39;
 559  l40:;	  yypos= yypos39; yythunkpos= yythunkpos39;  if (!yymatchClass((unsigned char *)"\000\000\000\000\004\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000")) goto l38;  yyText(yybegin, yyend);  if (!(YY_BEGIN)) goto l38;
 560  l44:;	
 561  {  int yypos45= yypos, yythunkpos45= yythunkpos;
 562  {  int yypos46= yypos, yythunkpos46= yythunkpos;  if (!yymatchClass((unsigned char *)"\000\000\000\000\004\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000")) goto l46;  goto l45;
 563  l46:;	  yypos= yypos46; yythunkpos= yythunkpos46;
 564  }  if (!yy_char()) goto l45;  goto l44;
 565  l45:;	  yypos= yypos45; yythunkpos= yythunkpos45;
 566  }  yyText(yybegin, yyend);  if (!(YY_END)) goto l38;  if (!yymatchClass((unsigned char *)"\000\000\000\000\004\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000")) goto l38;  if (!yy__()) goto l38;
 567  }
 568  l39:;	
 569  yyprintf((stderr, "  ok   %s @ %s\n", "literal", yybuf+yypos));
 570  return 1;
 571  l38:;	  yypos= yypos0; yythunkpos= yythunkpos0;
 572  yyprintf((stderr, "  fail %s @ %s\n", "literal", yybuf+yypos));
 573  return 0;
 574}
 575YY_RULE(int) yy_CLOSE()
 576{  int yypos0= yypos, yythunkpos0= yythunkpos;
 577  yyprintf((stderr, "%s\n", "CLOSE"));  if (!yymatchChar(')')) goto l47;  if (!yy__()) goto l47;
 578  yyprintf((stderr, "  ok   %s @ %s\n", "CLOSE", yybuf+yypos));
 579  return 1;
 580  l47:;	  yypos= yypos0; yythunkpos= yythunkpos0;
 581  yyprintf((stderr, "  fail %s @ %s\n", "CLOSE", yybuf+yypos));
 582  return 0;
 583}
 584YY_RULE(int) yy_OPEN()
 585{  int yypos0= yypos, yythunkpos0= yythunkpos;
 586  yyprintf((stderr, "%s\n", "OPEN"));  if (!yymatchChar('(')) goto l48;  if (!yy__()) goto l48;
 587  yyprintf((stderr, "  ok   %s @ %s\n", "OPEN", yybuf+yypos));
 588  return 1;
 589  l48:;	  yypos= yypos0; yythunkpos= yythunkpos0;
 590  yyprintf((stderr, "  fail %s @ %s\n", "OPEN", yybuf+yypos));
 591  return 0;
 592}
 593YY_RULE(int) yy_COLON()
 594{  int yypos0= yypos, yythunkpos0= yythunkpos;
 595  yyprintf((stderr, "%s\n", "COLON"));  if (!yymatchChar(':')) goto l49;  if (!yy__()) goto l49;
 596  yyprintf((stderr, "  ok   %s @ %s\n", "COLON", yybuf+yypos));
 597  return 1;
 598  l49:;	  yypos= yypos0; yythunkpos= yythunkpos0;
 599  yyprintf((stderr, "  fail %s @ %s\n", "COLON", yybuf+yypos));
 600  return 0;
 601}
 602YY_RULE(int) yy_PLUS()
 603{  int yypos0= yypos, yythunkpos0= yythunkpos;
 604  yyprintf((stderr, "%s\n", "PLUS"));  if (!yymatchChar('+')) goto l50;  if (!yy__()) goto l50;
 605  yyprintf((stderr, "  ok   %s @ %s\n", "PLUS", yybuf+yypos));
 606  return 1;
 607  l50:;	  yypos= yypos0; yythunkpos= yythunkpos0;
 608  yyprintf((stderr, "  fail %s @ %s\n", "PLUS", yybuf+yypos));
 609  return 0;
 610}
 611YY_RULE(int) yy_STAR()
 612{  int yypos0= yypos, yythunkpos0= yythunkpos;
 613  yyprintf((stderr, "%s\n", "STAR"));  if (!yymatchChar('*')) goto l51;  if (!yy__()) goto l51;
 614  yyprintf((stderr, "  ok   %s @ %s\n", "STAR", yybuf+yypos));
 615  return 1;
 616  l51:;	  yypos= yypos0; yythunkpos= yythunkpos0;
 617  yyprintf((stderr, "  fail %s @ %s\n", "STAR", yybuf+yypos));
 618  return 0;
 619}
 620YY_RULE(int) yy_QUESTION()
 621{  int yypos0= yypos, yythunkpos0= yythunkpos;
 622  yyprintf((stderr, "%s\n", "QUESTION"));  if (!yymatchChar('?')) goto l52;  if (!yy__()) goto l52;
 623  yyprintf((stderr, "  ok   %s @ %s\n", "QUESTION", yybuf+yypos));
 624  return 1;
 625  l52:;	  yypos= yypos0; yythunkpos= yythunkpos0;
 626  yyprintf((stderr, "  fail %s @ %s\n", "QUESTION", yybuf+yypos));
 627  return 0;
 628}
 629YY_RULE(int) yy_primary()
 630{  int yypos0= yypos, yythunkpos0= yythunkpos;
 631  yyprintf((stderr, "%s\n", "primary"));
 632  {  int yypos54= yypos, yythunkpos54= yythunkpos;  if (!yy_identifier()) goto l55;  yyDo(yy_1_primary, yybegin, yyend);  if (!yy_COLON()) goto l55;  if (!yy_identifier()) goto l55;
 633  {  int yypos56= yypos, yythunkpos56= yythunkpos;  if (!yy_EQUAL()) goto l56;  goto l55;
 634  l56:;	  yypos= yypos56; yythunkpos= yythunkpos56;
 635  }  yyDo(yy_2_primary, yybegin, yyend);  goto l54;
 636  l55:;	  yypos= yypos54; yythunkpos= yythunkpos54;  if (!yy_identifier()) goto l57;
 637  {  int yypos58= yypos, yythunkpos58= yythunkpos;  if (!yy_EQUAL()) goto l58;  goto l57;
 638  l58:;	  yypos= yypos58; yythunkpos= yythunkpos58;
 639  }  yyDo(yy_3_primary, yybegin, yyend);  goto l54;
 640  l57:;	  yypos= yypos54; yythunkpos= yythunkpos54;  if (!yy_OPEN()) goto l59;  if (!yy_expression()) goto l59;  if (!yy_CLOSE()) goto l59;  goto l54;
 641  l59:;	  yypos= yypos54; yythunkpos= yythunkpos54;  if (!yy_literal()) goto l60;  yyDo(yy_4_primary, yybegin, yyend);  goto l54;
 642  l60:;	  yypos= yypos54; yythunkpos= yythunkpos54;  if (!yy_class()) goto l61;  yyDo(yy_5_primary, yybegin, yyend);  goto l54;
 643  l61:;	  yypos= yypos54; yythunkpos= yythunkpos54;  if (!yy_DOT()) goto l62;  yyDo(yy_6_primary, yybegin, yyend);  goto l54;
 644  l62:;	  yypos= yypos54; yythunkpos= yythunkpos54;  if (!yy_action()) goto l63;  yyDo(yy_7_primary, yybegin, yyend);  goto l54;
 645  l63:;	  yypos= yypos54; yythunkpos= yythunkpos54;  if (!yy_BEGIN()) goto l64;  yyDo(yy_8_primary, yybegin, yyend);  goto l54;
 646  l64:;	  yypos= yypos54; yythunkpos= yythunkpos54;  if (!yy_END()) goto l53;  yyDo(yy_9_primary, yybegin, yyend);
 647  }
 648  l54:;	
 649  yyprintf((stderr, "  ok   %s @ %s\n", "primary", yybuf+yypos));
 650  return 1;
 651  l53:;	  yypos= yypos0; yythunkpos= yythunkpos0;
 652  yyprintf((stderr, "  fail %s @ %s\n", "primary", yybuf+yypos));
 653  return 0;
 654}
 655YY_RULE(int) yy_NOT()
 656{  int yypos0= yypos, yythunkpos0= yythunkpos;
 657  yyprintf((stderr, "%s\n", "NOT"));  if (!yymatchChar('!')) goto l65;  if (!yy__()) goto l65;
 658  yyprintf((stderr, "  ok   %s @ %s\n", "NOT", yybuf+yypos));
 659  return 1;
 660  l65:;	  yypos= yypos0; yythunkpos= yythunkpos0;
 661  yyprintf((stderr, "  fail %s @ %s\n", "NOT", yybuf+yypos));
 662  return 0;
 663}
 664YY_RULE(int) yy_suffix()
 665{  int yypos0= yypos, yythunkpos0= yythunkpos;
 666  yyprintf((stderr, "%s\n", "suffix"));  if (!yy_primary()) goto l66;
 667  {  int yypos67= yypos, yythunkpos67= yythunkpos;
 668  {  int yypos69= yypos, yythunkpos69= yythunkpos;  if (!yy_QUESTION()) goto l70;  yyDo(yy_1_suffix, yybegin, yyend);  goto l69;
 669  l70:;	  yypos= yypos69; yythunkpos= yythunkpos69;  if (!yy_STAR()) goto l71;  yyDo(yy_2_suffix, yybegin, yyend);  goto l69;
 670  l71:;	  yypos= yypos69; yythunkpos= yythunkpos69;  if (!yy_PLUS()) goto l67;  yyDo(yy_3_suffix, yybegin, yyend);
 671  }
 672  l69:;	  goto l68;
 673  l67:;	  yypos= yypos67; yythunkpos= yythunkpos67;
 674  }
 675  l68:;	
 676  yyprintf((stderr, "  ok   %s @ %s\n", "suffix", yybuf+yypos));
 677  return 1;
 678  l66:;	  yypos= yypos0; yythunkpos= yythunkpos0;
 679  yyprintf((stderr, "  fail %s @ %s\n", "suffix", yybuf+yypos));
 680  return 0;
 681}
 682YY_RULE(int) yy_action()
 683{  int yypos0= yypos, yythunkpos0= yythunkpos;
 684  yyprintf((stderr, "%s\n", "action"));  if (!yymatchChar('{')) goto l72;  yyText(yybegin, yyend);  if (!(YY_BEGIN)) goto l72;
 685  l73:;	
 686  {  int yypos74= yypos, yythunkpos74= yythunkpos;  if (!yy_braces()) goto l74;  goto l73;
 687  l74:;	  yypos= yypos74; yythunkpos= yythunkpos74;
 688  }  yyText(yybegin, yyend);  if (!(YY_END)) goto l72;  if (!yymatchChar('}')) goto l72;  if (!yy__()) goto l72;
 689  yyprintf((stderr, "  ok   %s @ %s\n", "action", yybuf+yypos));
 690  return 1;
 691  l72:;	  yypos= yypos0; yythunkpos= yythunkpos0;
 692  yyprintf((stderr, "  fail %s @ %s\n", "action", yybuf+yypos));
 693  return 0;
 694}
 695YY_RULE(int) yy_AND()
 696{  int yypos0= yypos, yythunkpos0= yythunkpos;
 697  yyprintf((stderr, "%s\n", "AND"));  if (!yymatchChar('&')) goto l75;  if (!yy__()) goto l75;
 698  yyprintf((stderr, "  ok   %s @ %s\n", "AND", yybuf+yypos));
 699  return 1;
 700  l75:;	  yypos= yypos0; yythunkpos= yythunkpos0;
 701  yyprintf((stderr, "  fail %s @ %s\n", "AND", yybuf+yypos));
 702  return 0;
 703}
 704YY_RULE(int) yy_prefix()
 705{  int yypos0= yypos, yythunkpos0= yythunkpos;
 706  yyprintf((stderr, "%s\n", "prefix"));
 707  {  int yypos77= yypos, yythunkpos77= yythunkpos;  if (!yy_AND()) goto l78;  if (!yy_action()) goto l78;  yyDo(yy_1_prefix, yybegin, yyend);  goto l77;
 708  l78:;	  yypos= yypos77; yythunkpos= yythunkpos77;  if (!yy_AND()) goto l79;  if (!yy_suffix()) goto l79;  yyDo(yy_2_prefix, yybegin, yyend);  goto l77;
 709  l79:;	  yypos= yypos77; yythunkpos= yythunkpos77;  if (!yy_NOT()) goto l80;  if (!yy_suffix()) goto l80;  yyDo(yy_3_prefix, yybegin, yyend);  goto l77;
 710  l80:;	  yypos= yypos77; yythunkpos= yythunkpos77;  if (!yy_suffix()) goto l76;
 711  }
 712  l77:;	
 713  yyprintf((stderr, "  ok   %s @ %s\n", "prefix", yybuf+yypos));
 714  return 1;
 715  l76:;	  yypos= yypos0; yythunkpos= yythunkpos0;
 716  yyprintf((stderr, "  fail %s @ %s\n", "prefix", yybuf+yypos));
 717  return 0;
 718}
 719YY_RULE(int) yy_BAR()
 720{  int yypos0= yypos, yythunkpos0= yythunkpos;
 721  yyprintf((stderr, "%s\n", "BAR"));  if (!yymatchChar('|')) goto l81;  if (!yy__()) goto l81;
 722  yyprintf((stderr, "  ok   %s @ %s\n", "BAR", yybuf+yypos));
 723  return 1;
 724  l81:;	  yypos= yypos0; yythunkpos= yythunkpos0;
 725  yyprintf((stderr, "  fail %s @ %s\n", "BAR", yybuf+yypos));
 726  return 0;
 727}
 728YY_RULE(int) yy_sequence()
 729{  int yypos0= yypos, yythunkpos0= yythunkpos;
 730  yyprintf((stderr, "%s\n", "sequence"));  if (!yy_prefix()) goto l82;
 731  l83:;	
 732  {  int yypos84= yypos, yythunkpos84= yythunkpos;  if (!yy_prefix()) goto l84;  yyDo(yy_1_sequence, yybegin, yyend);  goto l83;
 733  l84:;	  yypos= yypos84; yythunkpos= yythunkpos84;
 734  }
 735  yyprintf((stderr, "  ok   %s @ %s\n", "sequence", yybuf+yypos));
 736  return 1;
 737  l82:;	  yypos= yypos0; yythunkpos= yythunkpos0;
 738  yyprintf((stderr, "  fail %s @ %s\n", "sequence", yybuf+yypos));
 739  return 0;
 740}
 741YY_RULE(int) yy_SEMICOLON()
 742{  int yypos0= yypos, yythunkpos0= yythunkpos;
 743  yyprintf((stderr, "%s\n", "SEMICOLON"));  if (!yymatchChar(';')) goto l85;  if (!yy__()) goto l85;
 744  yyprintf((stderr, "  ok   %s @ %s\n", "SEMICOLON", yybuf+yypos));
 745  return 1;
 746  l85:;	  yypos= yypos0; yythunkpos= yythunkpos0;
 747  yyprintf((stderr, "  fail %s @ %s\n", "SEMICOLON", yybuf+yypos));
 748  return 0;
 749}
 750YY_RULE(int) yy_expression()
 751{  int yypos0= yypos, yythunkpos0= yythunkpos;
 752  yyprintf((stderr, "%s\n", "expression"));  if (!yy_sequence()) goto l86;
 753  l87:;	
 754  {  int yypos88= yypos, yythunkpos88= yythunkpos;  if (!yy_BAR()) goto l88;  if (!yy_sequence()) goto l88;  yyDo(yy_1_expression, yybegin, yyend);  goto l87;
 755  l88:;	  yypos= yypos88; yythunkpos= yythunkpos88;
 756  }
 757  yyprintf((stderr, "  ok   %s @ %s\n", "expression", yybuf+yypos));
 758  return 1;
 759  l86:;	  yypos= yypos0; yythunkpos= yythunkpos0;
 760  yyprintf((stderr, "  fail %s @ %s\n", "expression", yybuf+yypos));
 761  return 0;
 762}
 763YY_RULE(int) yy_EQUAL()
 764{  int yypos0= yypos, yythunkpos0= yythunkpos;
 765  yyprintf((stderr, "%s\n", "EQUAL"));  if (!yymatchChar('=')) goto l89;  if (!yy__()) goto l89;
 766  yyprintf((stderr, "  ok   %s @ %s\n", "EQUAL", yybuf+yypos));
 767  return 1;
 768  l89:;	  yypos= yypos0; yythunkpos= yythunkpos0;
 769  yyprintf((stderr, "  fail %s @ %s\n", "EQUAL", yybuf+yypos));
 770  return 0;
 771}
 772YY_RULE(int) yy_identifier()
 773{  int yypos0= yypos, yythunkpos0= yythunkpos;
 774  yyprintf((stderr, "%s\n", "identifier"));  yyText(yybegin, yyend);  if (!(YY_BEGIN)) goto l90;  if (!yymatchClass((unsigned char *)"\000\000\000\000\000\040\000\000\376\377\377\207\376\377\377\007\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000")) goto l90;
 775  l91:;	
 776  {  int yypos92= yypos, yythunkpos92= yythunkpos;  if (!yymatchClass((unsigned char *)"\000\000\000\000\000\040\377\003\376\377\377\207\376\377\377\007\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000")) goto l92;  goto l91;
 777  l92:;	  yypos= yypos92; yythunkpos= yythunkpos92;
 778  }  yyText(yybegin, yyend);  if (!(YY_END)) goto l90;  if (!yy__()) goto l90;
 779  yyprintf((stderr, "  ok   %s @ %s\n", "identifier", yybuf+yypos));
 780  return 1;
 781  l90:;	  yypos= yypos0; yythunkpos= yythunkpos0;
 782  yyprintf((stderr, "  fail %s @ %s\n", "identifier", yybuf+yypos));
 783  return 0;
 784}
 785YY_RULE(int) yy_RPERCENT()
 786{  int yypos0= yypos, yythunkpos0= yythunkpos;
 787  yyprintf((stderr, "%s\n", "RPERCENT"));  if (!yymatchString("%}")) goto l93;  if (!yy__()) goto l93;
 788  yyprintf((stderr, "  ok   %s @ %s\n", "RPERCENT", yybuf+yypos));
 789  return 1;
 790  l93:;	  yypos= yypos0; yythunkpos= yythunkpos0;
 791  yyprintf((stderr, "  fail %s @ %s\n", "RPERCENT", yybuf+yypos));
 792  return 0;
 793}
 794YY_RULE(int) yy_end_of_file()
 795{  int yypos0= yypos, yythunkpos0= yythunkpos;
 796  yyprintf((stderr, "%s\n", "end_of_file"));
 797  {  int yypos95= yypos, yythunkpos95= yythunkpos;  if (!yymatchDot()) goto l95;  goto l94;
 798  l95:;	  yypos= yypos95; yythunkpos= yythunkpos95;
 799  }
 800  yyprintf((stderr, "  ok   %s @ %s\n", "end_of_file", yybuf+yypos));
 801  return 1;
 802  l94:;	  yypos= yypos0; yythunkpos= yythunkpos0;
 803  yyprintf((stderr, "  fail %s @ %s\n", "end_of_file", yybuf+yypos));
 804  return 0;
 805}
 806YY_RULE(int) yy_trailer()
 807{  int yypos0= yypos, yythunkpos0= yythunkpos;
 808  yyprintf((stderr, "%s\n", "trailer"));  if (!yymatchString("%%")) goto l96;  yyText(yybegin, yyend);  if (!(YY_BEGIN)) goto l96;
 809  l97:;	
 810  {  int yypos98= yypos, yythunkpos98= yythunkpos;  if (!yymatchDot()) goto l98;  goto l97;
 811  l98:;	  yypos= yypos98; yythunkpos= yythunkpos98;
 812  }  yyText(yybegin, yyend);  if (!(YY_END)) goto l96;  yyDo(yy_1_trailer, yybegin, yyend);
 813  yyprintf((stderr, "  ok   %s @ %s\n", "trailer", yybuf+yypos));
 814  return 1;
 815  l96:;	  yypos= yypos0; yythunkpos= yythunkpos0;
 816  yyprintf((stderr, "  fail %s @ %s\n", "trailer", yybuf+yypos));
 817  return 0;
 818}
 819YY_RULE(int) yy_definition()
 820{  int yypos0= yypos, yythunkpos0= yythunkpos;
 821  yyprintf((stderr, "%s\n", "definition"));  if (!yy_identifier()) goto l99;  yyDo(yy_1_definition, yybegin, yyend);  if (!yy_EQUAL()) goto l99;  if (!yy_expression()) goto l99;  yyDo(yy_2_definition, yybegin, yyend);
 822  {  int yypos100= yypos, yythunkpos100= yythunkpos;  if (!yy_SEMICOLON()) goto l100;  goto l101;
 823  l100:;	  yypos= yypos100; yythunkpos= yythunkpos100;
 824  }
 825  l101:;	
 826  yyprintf((stderr, "  ok   %s @ %s\n", "definition", yybuf+yypos));
 827  return 1;
 828  l99:;	  yypos= yypos0; yythunkpos= yythunkpos0;
 829  yyprintf((stderr, "  fail %s @ %s\n", "definition", yybuf+yypos));
 830  return 0;
 831}
 832YY_RULE(int) yy_declaration()
 833{  int yypos0= yypos, yythunkpos0= yythunkpos;
 834  yyprintf((stderr, "%s\n", "declaration"));  if (!yymatchString("%{")) goto l102;  yyText(yybegin, yyend);  if (!(YY_BEGIN)) goto l102;
 835  l103:;	
 836  {  int yypos104= yypos, yythunkpos104= yythunkpos;
 837  {  int yypos105= yypos, yythunkpos105= yythunkpos;  if (!yymatchString("%}")) goto l105;  goto l104;
 838  l105:;	  yypos= yypos105; yythunkpos= yythunkpos105;
 839  }  if (!yymatchDot()) goto l104;  goto l103;
 840  l104:;	  yypos= yypos104; yythunkpos= yythunkpos104;
 841  }  yyText(yybegin, yyend);  if (!(YY_END)) goto l102;  if (!yy_RPERCENT()) goto l102;  yyDo(yy_1_declaration, yybegin, yyend);
 842  yyprintf((stderr, "  ok   %s @ %s\n", "declaration", yybuf+yypos));
 843  return 1;
 844  l102:;	  yypos= yypos0; yythunkpos= yythunkpos0;
 845  yyprintf((stderr, "  fail %s @ %s\n", "declaration", yybuf+yypos));
 846  return 0;
 847}
 848YY_RULE(int) yy__()
 849{
 850  yyprintf((stderr, "%s\n", "_"));
 851  l107:;	
 852  {  int yypos108= yypos, yythunkpos108= yythunkpos;
 853  {  int yypos109= yypos, yythunkpos109= yythunkpos;  if (!yy_space()) goto l110;  goto l109;
 854  l110:;	  yypos= yypos109; yythunkpos= yythunkpos109;  if (!yy_comment()) goto l108;
 855  }
 856  l109:;	  goto l107;
 857  l108:;	  yypos= yypos108; yythunkpos= yythunkpos108;
 858  }
 859  yyprintf((stderr, "  ok   %s @ %s\n", "_", yybuf+yypos));
 860  return 1;
 861}
 862YY_RULE(int) yy_grammar()
 863{  int yypos0= yypos, yythunkpos0= yythunkpos;
 864  yyprintf((stderr, "%s\n", "grammar"));  if (!yy__()) goto l111;
 865  {  int yypos114= yypos, yythunkpos114= yythunkpos;  if (!yy_declaration()) goto l115;  goto l114;
 866  l115:;	  yypos= yypos114; yythunkpos= yythunkpos114;  if (!yy_definition()) goto l111;
 867  }
 868  l114:;	
 869  l112:;	
 870  {  int yypos113= yypos, yythunkpos113= yythunkpos;
 871  {  int yypos116= yypos, yythunkpos116= yythunkpos;  if (!yy_declaration()) goto l117;  goto l116;
 872  l117:;	  yypos= yypos116; yythunkpos= yythunkpos116;  if (!yy_definition()) goto l113;
 873  }
 874  l116:;	  goto l112;
 875  l113:;	  yypos= yypos113; yythunkpos= yythunkpos113;
 876  }
 877  {  int yypos118= yypos, yythunkpos118= yythunkpos;  if (!yy_trailer()) goto l118;  goto l119;
 878  l118:;	  yypos= yypos118; yythunkpos= yythunkpos118;
 879  }
 880  l119:;	  if (!yy_end_of_file()) goto l111;
 881  yyprintf((stderr, "  ok   %s @ %s\n", "grammar", yybuf+yypos));
 882  return 1;
 883  l111:;	  yypos= yypos0; yythunkpos= yythunkpos0;
 884  yyprintf((stderr, "  fail %s @ %s\n", "grammar", yybuf+yypos));
 885  return 0;
 886}
 887
 888#ifndef YY_PART
 889
 890typedef int (*yyrule)();
 891
 892YY_PARSE(int) YYPARSEFROM(yyrule yystart)
 893{
 894  int yyok;
 895  if (!yybuflen)
 896    {
 897      yybuflen= 1024;
 898      yybuf= malloc(yybuflen);
 899      yytextlen= 1024;
 900      yytext= malloc(yytextlen);
 901      yythunkslen= 32;
 902      yythunks= malloc(sizeof(yythunk) * yythunkslen);
 903      yyvalslen= 32;
 904      yyvals= malloc(sizeof(YYSTYPE) * yyvalslen);
 905      yybegin= yyend= yypos= yylimit= yythunkpos= 0;
 906    }
 907  yybegin= yyend= yypos;
 908  yythunkpos= 0;
 909  yyval= yyvals;
 910  yyok= yystart();
 911  if (yyok) yyDone();
 912  yyCommit();
 913  return yyok;
 914  (void)yyrefill;
 915  (void)yymatchDot;
 916  (void)yymatchChar;
 917  (void)yymatchString;
 918  (void)yymatchClass;
 919  (void)yyDo;
 920  (void)yyText;
 921  (void)yyDone;
 922  (void)yyCommit;
 923  (void)yyAccept;
 924  (void)yyPush;
 925  (void)yyPop;
 926  (void)yySet;
 927  (void)yytextmax;
 928}
 929
 930YY_PARSE(int) YYPARSE(void)
 931{
 932  return YYPARSEFROM(yy_grammar);
 933}
 934
 935#endif
 936
 937
 938void yyerror(char *message)
 939{
 940  fprintf(stderr, "%s:%d: %s", fileName, lineNumber, message);
 941  if (yytext[0]) fprintf(stderr, " near token '%s'", yytext);
 942  if (yypos < yylimit || !feof(input))
 943    {
 944      yybuf[yylimit]= '\0';
 945      fprintf(stderr, " before text \"");
 946      while (yypos < yylimit)
 947	{
 948	  if ('\n' == yybuf[yypos] || '\r' == yybuf[yypos]) break;
 949	  fputc(yybuf[yypos++], stderr);
 950	}
 951      if (yypos == yylimit)
 952	{
 953	  int c;
 954	  while (EOF != (c= fgetc(input)) && '\n' != c && '\r' != c)
 955	    fputc(c, stderr);
 956	}
 957      fputc('\"', stderr);
 958    }
 959  fprintf(stderr, "\n");
 960  exit(1);
 961}
 962
 963void makeHeader(char *text)
 964{
 965  Header *header= (Header *)malloc(sizeof(Header));
 966  header->text= strdup(text);
 967  header->next= headers;
 968  headers= header;
 969}
 970
 971void makeTrailer(char *text)
 972{
 973  trailer= strdup(text);
 974}
 975
 976static void version(char *name)
 977{
 978  printf("%s version %d.%d.%d\n", name, PEG_MAJOR, PEG_MINOR, PEG_LEVEL);
 979}
 980
 981static void usage(char *name)
 982{
 983  version(name);
 984  fprintf(stderr, "usage: %s [<option>...] [<file>...]\n", name);
 985  fprintf(stderr, "where <option> can be\n");
 986  fprintf(stderr, "  -h          print this help information\n");
 987  fprintf(stderr, "  -o <ofile>  write output to <ofile>\n");
 988  fprintf(stderr, "  -v          be verbose\n");
 989  fprintf(stderr, "  -V          print version number and exit\n");
 990  fprintf(stderr, "if no <file> is given, input is read from stdin\n");
 991  fprintf(stderr, "if no <ofile> is given, output is written to stdout\n");
 992  exit(1);
 993}
 994
 995int main(int argc, char **argv)
 996{
 997  Node *n;
 998  int   c;
 999
1000  output= stdout;
1001  input= stdin;
1002  lineNumber= 1;
1003  fileName= "<stdin>";
1004
1005  while (-1 != (c= getopt(argc, argv, "Vho:v")))
1006    {
1007      switch (c)
1008	{
1009	case 'V':
1010	  version(basename(argv[0]));
1011	  exit(0);
1012
1013	case 'h':
1014	  usage(basename(argv[0]));
1015	  break;
1016
1017	case 'o':
1018	  if (!(output= fopen(optarg, "w")))
1019	    {
1020	      perror(optarg);
1021	      exit(1);
1022	    }
1023	  break;
1024
1025	case 'v':
1026	  verboseFlag= 1;
1027	  break;
1028
1029	default:
1030	  fprintf(stderr, "for usage try: %s -h\n", argv[0]);
1031	  exit(1);
1032	}
1033    }
1034  argc -= optind;
1035  argv += optind;
1036
1037  if (argc)
1038    {
1039      for (;  argc;  --argc, ++argv)
1040	{
1041	  if (!strcmp(*argv, "-"))
1042	    {
1043	      input= stdin;
1044	      fileName= "<stdin>";
1045	    }
1046	  else
1047	    {
1048	      if (!(input= fopen(*argv, "r")))
1049		{
1050		  perror(*argv);
1051		  exit(1);
1052		}
1053	      fileName= *argv;
1054	    }
1055	  lineNumber= 1;
1056	  if (!yyparse())
1057	    yyerror("syntax error");
1058	  if (input != stdin)
1059	    fclose(input);
1060	}
1061    }
1062  else
1063    if (!yyparse())
1064      yyerror("syntax error");
1065
1066  if (verboseFlag)
1067    for (n= rules;  n;  n= n->any.next)
1068      Rule_print(n);
1069
1070  Rule_compile_c_header();
1071
1072  for (; headers;  headers= headers->next)
1073    fprintf(output, "%s\n", headers->text);
1074
1075  if (rules)
1076    Rule_compile_c(rules);
1077
1078  if (trailer)
1079    fprintf(output, "%s\n", trailer);
1080
1081  return 0;
1082}
1083