/peg/peg-go.go
Go | 802 lines | 776 code | 25 blank | 1 comment | 155 complexity | eff5de682a7fd7894a894143b127b86e MD5 | raw file
1/* A recursive-descent parser generated by peg 0.1.0 */ 2 3#include <stdio.h> 4#include <stdlib.h> 5#include <string.h> 6#define YYRULECOUNT 32 7#ifndef YY_VARIABLE 8#define YY_VARIABLE(T) static T 9#endif 10#ifndef YY_LOCAL 11#define YY_LOCAL(T) static T 12#endif 13#ifndef YY_ACTION 14#define YY_ACTION(T) static T 15#endif 16#ifndef YY_RULE 17#define YY_RULE(T) static T 18#endif 19#ifndef YY_PARSE 20#define YY_PARSE(T) T 21#endif 22#ifndef YYPARSE 23#define YYPARSE yyparse 24#endif 25#ifndef YYPARSEFROM 26#define YYPARSEFROM yyparsefrom 27#endif 28#ifndef YY_INPUT 29#define YY_INPUT(buf, result, max_size) \ 30 { \ 31 int yyc= getchar(); \ 32 result= (EOF == yyc) ? 0 : (*(buf)= yyc, 1); \ 33 yyprintf((stderr, "<%c>", yyc)); \ 34 } 35#endif 36#ifndef YY_BEGIN 37#define YY_BEGIN ( yybegin= yypos, 1) 38#endif 39#ifndef YY_END 40#define YY_END ( yyend= yypos, 1) 41#endif 42#ifdef YY_DEBUG 43# define yyprintf(args) fprintf args 44#else 45# define yyprintf(args) 46#endif 47#ifndef YYSTYPE 48#define YYSTYPE int 49#endif 50 51#ifndef YY_PART 52 53typedef void (*yyaction)(char *yytext, int yyleng); 54typedef struct _yythunk { int begin, end; yyaction action; struct _yythunk *next; } yythunk; 55 56YY_VARIABLE(char * ) yybuf= 0; 57YY_VARIABLE(int ) yybuflen= 0; 58YY_VARIABLE(int ) yypos= 0; 59YY_VARIABLE(int ) yylimit= 0; 60YY_VARIABLE(char * ) yytext= 0; 61YY_VARIABLE(int ) yytextlen= 0; 62YY_VARIABLE(int ) yybegin= 0; 63YY_VARIABLE(int ) yyend= 0; 64YY_VARIABLE(int ) yytextmax= 0; 65YY_VARIABLE(yythunk *) yythunks= 0; 66YY_VARIABLE(int ) yythunkslen= 0; 67YY_VARIABLE(int ) yythunkpos= 0; 68YY_VARIABLE(YYSTYPE ) yy; 69YY_VARIABLE(YYSTYPE *) yyval= 0; 70YY_VARIABLE(YYSTYPE *) yyvals= 0; 71YY_VARIABLE(int ) yyvalslen= 0; 72 73YY_LOCAL(int) yyrefill(void) 74{ 75 int yyn; 76 if (yybuflen - yypos < 512) 77 { 78 yybuflen *= 2; 79 yybuf= realloc(yybuf, yybuflen); 80 } 81 int c= getc(input); 82 if ('\n' == c || '\r' == c) ++lineNumber; 83 yyn= (EOF == c) ? 0 : (*(yybuf + yypos)= c, 1); 84 if (!yyn) return 0; 85 yylimit += yyn; 86 return 1; 87} 88 89YY_LOCAL(int) yymatchDot(void) 90{ 91 if (yypos >= yylimit && !yyrefill()) return 0; 92 ++yypos; 93 return 1; 94} 95 96YY_LOCAL(int) yymatchChar(int c) 97{ 98 if (yypos >= yylimit && !yyrefill()) return 0; 99 if (yybuf[yypos] == c) 100 { 101 ++yypos; 102 yyprintf((stderr, " ok yymatchChar(%c) @ %s\n", c, yybuf+yypos)); 103 return 1; 104 } 105 yyprintf((stderr, " fail yymatchChar(%c) @ %s\n", c, yybuf+yypos)); 106 return 0; 107} 108 109YY_LOCAL(int) yymatchString(char *s) 110{ 111 int yysav= yypos; 112 while (*s) 113 { 114 if (yypos >= yylimit && !yyrefill()) return 0; 115 if (yybuf[yypos] != *s) 116 { 117 yypos= yysav; 118 return 0; 119 } 120 ++s; 121 ++yypos; 122 } 123 return 1; 124} 125 126YY_LOCAL(int) yymatchClass(unsigned char *bits) 127{ 128 int c; 129 if (yypos >= yylimit && !yyrefill()) return 0; 130 c= yybuf[yypos]; 131 if (bits[c >> 3] & (1 << (c & 7))) 132 { 133 ++yypos; 134 yyprintf((stderr, " ok yymatchClass @ %s\n", yybuf+yypos)); 135 return 1; 136 } 137 yyprintf((stderr, " fail yymatchClass @ %s\n", yybuf+yypos)); 138 return 0; 139} 140 141YY_LOCAL(void) yyDo(yyaction action, int begin, int end) 142{ 143 if (yythunkpos >= yythunkslen) 144 { 145 yythunkslen *= 2; 146 yythunks= realloc(yythunks, sizeof(yythunk) * yythunkslen); 147 } 148 yythunks[yythunkpos].begin= begin; 149 yythunks[yythunkpos].end= end; 150 yythunks[yythunkpos].action= action; 151 ++yythunkpos; 152} 153 154YY_LOCAL(int) yyText(int begin, int end) 155{ 156 int yyleng= end - begin; 157 if (yyleng <= 0) 158 yyleng= 0; 159 else 160 { 161 if (yytextlen < (yyleng - 1)) 162 { 163 yytextlen *= 2; 164 yytext= realloc(yytext, yytextlen); 165 } 166 memcpy(yytext, yybuf + begin, yyleng); 167 } 168 yytext[yyleng]= '\0'; 169 return yyleng; 170} 171 172YY_LOCAL(void) yyDone(void) 173{ 174 int pos; 175 for (pos= 0; pos < yythunkpos; ++pos) 176 { 177 yythunk *thunk= &yythunks[pos]; 178 int yyleng= thunk->end ? yyText(thunk->begin, thunk->end) : thunk->begin; 179 yyprintf((stderr, "DO [%d] %p %s\n", pos, thunk->action, yytext)); 180 thunk->action(yytext, yyleng); 181 } 182 yythunkpos= 0; 183} 184 185YY_LOCAL(void) yyCommit() 186{ 187 if ((yylimit -= yypos)) 188 { 189 memmove(yybuf, yybuf + yypos, yylimit); 190 } 191 yybegin -= yypos; 192 yyend -= yypos; 193 yypos= yythunkpos= 0; 194} 195 196YY_LOCAL(int) yyAccept(int tp0) 197{ 198 if (tp0) 199 { 200 fprintf(stderr, "accept denied at %d\n", tp0); 201 return 0; 202 } 203 else 204 { 205 yyDone(); 206 yyCommit(); 207 } 208 return 1; 209} 210 211YY_LOCAL(void) yyPush(char *text, int count) { yyval += count; } 212YY_LOCAL(void) yyPop(char *text, int count) { yyval -= count; } 213YY_LOCAL(void) yySet(char *text, int count) { yyval[count]= yy; } 214 215#endif /* YY_PART */ 216 217#define YYACCEPT yyAccept(yythunkpos0) 218 219YY_RULE(int) yy_EndOfLine(); /* 32 */ 220YY_RULE(int) yy_Comment(); /* 31 */ 221YY_RULE(int) yy_Space(); /* 30 */ 222YY_RULE(int) yy_Range(); /* 29 */ 223YY_RULE(int) yy_Char(); /* 28 */ 224YY_RULE(int) yy_IdentCont(); /* 27 */ 225YY_RULE(int) yy_IdentStart(); /* 26 */ 226YY_RULE(int) yy_END(); /* 25 */ 227YY_RULE(int) yy_BEGIN(); /* 24 */ 228YY_RULE(int) yy_DOT(); /* 23 */ 229YY_RULE(int) yy_Class(); /* 22 */ 230YY_RULE(int) yy_Literal(); /* 21 */ 231YY_RULE(int) yy_CLOSE(); /* 20 */ 232YY_RULE(int) yy_OPEN(); /* 19 */ 233YY_RULE(int) yy_PLUS(); /* 18 */ 234YY_RULE(int) yy_STAR(); /* 17 */ 235YY_RULE(int) yy_QUESTION(); /* 16 */ 236YY_RULE(int) yy_Primary(); /* 15 */ 237YY_RULE(int) yy_NOT(); /* 14 */ 238YY_RULE(int) yy_Suffix(); /* 13 */ 239YY_RULE(int) yy_Action(); /* 12 */ 240YY_RULE(int) yy_AND(); /* 11 */ 241YY_RULE(int) yy_Prefix(); /* 10 */ 242YY_RULE(int) yy_SLASH(); /* 9 */ 243YY_RULE(int) yy_Sequence(); /* 8 */ 244YY_RULE(int) yy_Expression(); /* 7 */ 245YY_RULE(int) yy_LEFTARROW(); /* 6 */ 246YY_RULE(int) yy_Identifier(); /* 5 */ 247YY_RULE(int) yy_EndOfFile(); /* 4 */ 248YY_RULE(int) yy_Definition(); /* 3 */ 249YY_RULE(int) yy_Spacing(); /* 2 */ 250YY_RULE(int) yy_Grammar(); /* 1 */ 251 252YY_ACTION(void) yy_7_Primary(char *yytext, int yyleng) 253{ 254 yyprintf((stderr, "do yy_7_Primary\n")); 255 push(Predicate{text: "YY_END"}); ; 256} 257YY_ACTION(void) yy_6_Primary(char *yytext, int yyleng) 258{ 259 yyprintf((stderr, "do yy_6_Primary\n")); 260 push(Predicate{text: "YY_BEGIN"}); ; 261} 262YY_ACTION(void) yy_5_Primary(char *yytext, int yyleng) 263{ 264 yyprintf((stderr, "do yy_5_Primary\n")); 265 push(makeAction(yytext)); ; 266} 267YY_ACTION(void) yy_4_Primary(char *yytext, int yyleng) 268{ 269 yyprintf((stderr, "do yy_4_Primary\n")); 270 push(Dot{}); ; 271} 272YY_ACTION(void) yy_3_Primary(char *yytext, int yyleng) 273{ 274 yyprintf((stderr, "do yy_3_Primary\n")); 275 push(Class{cclass: yytext}); ; 276} 277YY_ACTION(void) yy_2_Primary(char *yytext, int yyleng) 278{ 279 yyprintf((stderr, "do yy_2_Primary\n")); 280 push(String{value: yytext}); ; 281} 282YY_ACTION(void) yy_1_Primary(char *yytext, int yyleng) 283{ 284 yyprintf((stderr, "do yy_1_Primary\n")); 285 push(Name{used: true, variable: nil, rule: findRule(yytext)}); ; 286} 287YY_ACTION(void) yy_3_Suffix(char *yytext, int yyleng) 288{ 289 yyprintf((stderr, "do yy_3_Suffix\n")); 290 push(Plus{element: pop()}); ; 291} 292YY_ACTION(void) yy_2_Suffix(char *yytext, int yyleng) 293{ 294 yyprintf((stderr, "do yy_2_Suffix\n")); 295 push(Star{element: pop()}); ; 296} 297YY_ACTION(void) yy_1_Suffix(char *yytext, int yyleng) 298{ 299 yyprintf((stderr, "do yy_1_Suffix\n")); 300 push(Query{element: pop()}); ; 301} 302YY_ACTION(void) yy_3_Prefix(char *yytext, int yyleng) 303{ 304 yyprintf((stderr, "do yy_3_Prefix\n")); 305 push(PeekNot{element: pop()}); ; 306} 307YY_ACTION(void) yy_2_Prefix(char *yytext, int yyleng) 308{ 309 yyprintf((stderr, "do yy_2_Prefix\n")); 310 push(PeekFor{element: pop()}); ; 311} 312YY_ACTION(void) yy_1_Prefix(char *yytext, int yyleng) 313{ 314 yyprintf((stderr, "do yy_1_Prefix\n")); 315 push(Predicate{text: yytext}); ; 316} 317YY_ACTION(void) yy_2_Sequence(char *yytext, int yyleng) 318{ 319 yyprintf((stderr, "do yy_2_Sequence\n")); 320 push(Predicate{text: "1"}); ; 321} 322YY_ACTION(void) yy_1_Sequence(char *yytext, int yyleng) 323{ 324 yyprintf((stderr, "do yy_1_Sequence\n")); 325 Node *f= pop(); push(Sequence_append(pop(), f)); ; 326} 327YY_ACTION(void) yy_1_Expression(char *yytext, int yyleng) 328{ 329 yyprintf((stderr, "do yy_1_Expression\n")); 330 Node *f= pop(); push(Alternate_append(pop(), f)); ; 331} 332YY_ACTION(void) yy_2_Definition(char *yytext, int yyleng) 333{ 334 yyprintf((stderr, "do yy_2_Definition\n")); 335 Node *e= pop(); Rule_setExpression(pop(), e); ; 336} 337YY_ACTION(void) yy_1_Definition(char *yytext, int yyleng) 338{ 339 yyprintf((stderr, "do yy_1_Definition\n")); 340 if (push(beginRule(findRule(yytext)))->rule.expression) fprintf(stderr, "rule '%s' redefined\n", yytext); ; 341} 342 343YY_RULE(int) yy_EndOfLine() 344{ int yypos0= yypos, yythunkpos0= yythunkpos; 345 yyprintf((stderr, "%s\n", "EndOfLine")); 346 { int yypos2= yypos, yythunkpos2= yythunkpos; if (!yymatchString("\r\n")) goto l3; goto l2; 347 l3:; yypos= yypos2; yythunkpos= yythunkpos2; if (!yymatchChar('\n')) goto l4; goto l2; 348 l4:; yypos= yypos2; yythunkpos= yythunkpos2; if (!yymatchChar('\r')) goto l1; 349 } 350 l2:; 351 yyprintf((stderr, " ok %s @ %s\n", "EndOfLine", yybuf+yypos)); 352 return 1; 353 l1:; yypos= yypos0; yythunkpos= yythunkpos0; 354 yyprintf((stderr, " fail %s @ %s\n", "EndOfLine", yybuf+yypos)); 355 return 0; 356} 357YY_RULE(int) yy_Comment() 358{ int yypos0= yypos, yythunkpos0= yythunkpos; 359 yyprintf((stderr, "%s\n", "Comment")); if (!yymatchChar('#')) goto l5; 360 l6:; 361 { int yypos7= yypos, yythunkpos7= yythunkpos; 362 { int yypos8= yypos, yythunkpos8= yythunkpos; if (!yy_EndOfLine()) goto l8; goto l7; 363 l8:; yypos= yypos8; yythunkpos= yythunkpos8; 364 } if (!yymatchDot()) goto l7; goto l6; 365 l7:; yypos= yypos7; yythunkpos= yythunkpos7; 366 } if (!yy_EndOfLine()) goto l5; 367 yyprintf((stderr, " ok %s @ %s\n", "Comment", yybuf+yypos)); 368 return 1; 369 l5:; yypos= yypos0; yythunkpos= yythunkpos0; 370 yyprintf((stderr, " fail %s @ %s\n", "Comment", yybuf+yypos)); 371 return 0; 372} 373YY_RULE(int) yy_Space() 374{ int yypos0= yypos, yythunkpos0= yythunkpos; 375 yyprintf((stderr, "%s\n", "Space")); 376 { int yypos10= yypos, yythunkpos10= yythunkpos; if (!yymatchChar(' ')) goto l11; goto l10; 377 l11:; yypos= yypos10; yythunkpos= yythunkpos10; if (!yymatchChar('\t')) goto l12; goto l10; 378 l12:; yypos= yypos10; yythunkpos= yythunkpos10; if (!yy_EndOfLine()) goto l9; 379 } 380 l10:; 381 yyprintf((stderr, " ok %s @ %s\n", "Space", yybuf+yypos)); 382 return 1; 383 l9:; yypos= yypos0; yythunkpos= yythunkpos0; 384 yyprintf((stderr, " fail %s @ %s\n", "Space", yybuf+yypos)); 385 return 0; 386} 387YY_RULE(int) yy_Range() 388{ int yypos0= yypos, yythunkpos0= yythunkpos; 389 yyprintf((stderr, "%s\n", "Range")); 390 { int yypos14= yypos, yythunkpos14= yythunkpos; if (!yy_Char()) goto l15; if (!yymatchChar('-')) goto l15; if (!yy_Char()) goto l15; goto l14; 391 l15:; yypos= yypos14; yythunkpos= yythunkpos14; if (!yy_Char()) goto l13; 392 } 393 l14:; 394 yyprintf((stderr, " ok %s @ %s\n", "Range", yybuf+yypos)); 395 return 1; 396 l13:; yypos= yypos0; yythunkpos= yythunkpos0; 397 yyprintf((stderr, " fail %s @ %s\n", "Range", yybuf+yypos)); 398 return 0; 399} 400YY_RULE(int) yy_Char() 401{ int yypos0= yypos, yythunkpos0= yythunkpos; 402 yyprintf((stderr, "%s\n", "Char")); 403 { int yypos17= yypos, yythunkpos17= yythunkpos; if (!yymatchChar('\\')) goto l18; 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 l18; goto l17; 404 l18:; yypos= yypos17; yythunkpos= yythunkpos17; if (!yymatchChar('\\')) goto l19; 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 l19; 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 l19; 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 l19; goto l17; 405 l19:; yypos= yypos17; yythunkpos= yythunkpos17; if (!yymatchChar('\\')) goto l20; 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 l20; 406 { int yypos21= yypos, yythunkpos21= 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 l21; goto l22; 407 l21:; yypos= yypos21; yythunkpos= yythunkpos21; 408 } 409 l22:; goto l17; 410 l20:; yypos= yypos17; yythunkpos= yythunkpos17; if (!yymatchChar('\\')) goto l23; if (!yymatchChar('-')) goto l23; goto l17; 411 l23:; yypos= yypos17; yythunkpos= yythunkpos17; 412 { int yypos24= yypos, yythunkpos24= yythunkpos; if (!yymatchChar('\\')) goto l24; goto l16; 413 l24:; yypos= yypos24; yythunkpos= yythunkpos24; 414 } if (!yymatchDot()) goto l16; 415 } 416 l17:; 417 yyprintf((stderr, " ok %s @ %s\n", "Char", yybuf+yypos)); 418 return 1; 419 l16:; yypos= yypos0; yythunkpos= yythunkpos0; 420 yyprintf((stderr, " fail %s @ %s\n", "Char", yybuf+yypos)); 421 return 0; 422} 423YY_RULE(int) yy_IdentCont() 424{ int yypos0= yypos, yythunkpos0= yythunkpos; 425 yyprintf((stderr, "%s\n", "IdentCont")); 426 { int yypos26= yypos, yythunkpos26= yythunkpos; if (!yy_IdentStart()) goto l27; goto l26; 427 l27:; yypos= yypos26; yythunkpos= yythunkpos26; if (!yymatchClass((unsigned char *)"\000\000\000\000\000\000\377\003\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 l25; 428 } 429 l26:; 430 yyprintf((stderr, " ok %s @ %s\n", "IdentCont", yybuf+yypos)); 431 return 1; 432 l25:; yypos= yypos0; yythunkpos= yythunkpos0; 433 yyprintf((stderr, " fail %s @ %s\n", "IdentCont", yybuf+yypos)); 434 return 0; 435} 436YY_RULE(int) yy_IdentStart() 437{ int yypos0= yypos, yythunkpos0= yythunkpos; 438 yyprintf((stderr, "%s\n", "IdentStart")); if (!yymatchClass((unsigned char *)"\000\000\000\000\000\000\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 l28; 439 yyprintf((stderr, " ok %s @ %s\n", "IdentStart", yybuf+yypos)); 440 return 1; 441 l28:; yypos= yypos0; yythunkpos= yythunkpos0; 442 yyprintf((stderr, " fail %s @ %s\n", "IdentStart", yybuf+yypos)); 443 return 0; 444} 445YY_RULE(int) yy_END() 446{ int yypos0= yypos, yythunkpos0= yythunkpos; 447 yyprintf((stderr, "%s\n", "END")); if (!yymatchChar('>')) goto l29; if (!yy_Spacing()) goto l29; 448 yyprintf((stderr, " ok %s @ %s\n", "END", yybuf+yypos)); 449 return 1; 450 l29:; yypos= yypos0; yythunkpos= yythunkpos0; 451 yyprintf((stderr, " fail %s @ %s\n", "END", yybuf+yypos)); 452 return 0; 453} 454YY_RULE(int) yy_BEGIN() 455{ int yypos0= yypos, yythunkpos0= yythunkpos; 456 yyprintf((stderr, "%s\n", "BEGIN")); if (!yymatchChar('<')) goto l30; if (!yy_Spacing()) goto l30; 457 yyprintf((stderr, " ok %s @ %s\n", "BEGIN", yybuf+yypos)); 458 return 1; 459 l30:; yypos= yypos0; yythunkpos= yythunkpos0; 460 yyprintf((stderr, " fail %s @ %s\n", "BEGIN", yybuf+yypos)); 461 return 0; 462} 463YY_RULE(int) yy_DOT() 464{ int yypos0= yypos, yythunkpos0= yythunkpos; 465 yyprintf((stderr, "%s\n", "DOT")); if (!yymatchChar('.')) goto l31; if (!yy_Spacing()) goto l31; 466 yyprintf((stderr, " ok %s @ %s\n", "DOT", yybuf+yypos)); 467 return 1; 468 l31:; yypos= yypos0; yythunkpos= yythunkpos0; 469 yyprintf((stderr, " fail %s @ %s\n", "DOT", yybuf+yypos)); 470 return 0; 471} 472YY_RULE(int) yy_Class() 473{ int yypos0= yypos, yythunkpos0= yythunkpos; 474 yyprintf((stderr, "%s\n", "Class")); if (!yymatchChar('[')) goto l32; yyText(yybegin, yyend); if (!(YY_BEGIN)) goto l32; 475 l33:; 476 { int yypos34= yypos, yythunkpos34= yythunkpos; 477 { int yypos35= yypos, yythunkpos35= yythunkpos; if (!yymatchChar(']')) goto l35; goto l34; 478 l35:; yypos= yypos35; yythunkpos= yythunkpos35; 479 } if (!yy_Range()) goto l34; goto l33; 480 l34:; yypos= yypos34; yythunkpos= yythunkpos34; 481 } yyText(yybegin, yyend); if (!(YY_END)) goto l32; if (!yymatchChar(']')) goto l32; if (!yy_Spacing()) goto l32; 482 yyprintf((stderr, " ok %s @ %s\n", "Class", yybuf+yypos)); 483 return 1; 484 l32:; yypos= yypos0; yythunkpos= yythunkpos0; 485 yyprintf((stderr, " fail %s @ %s\n", "Class", yybuf+yypos)); 486 return 0; 487} 488YY_RULE(int) yy_Literal() 489{ int yypos0= yypos, yythunkpos0= yythunkpos; 490 yyprintf((stderr, "%s\n", "Literal")); 491 { int yypos37= yypos, yythunkpos37= 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 l38; yyText(yybegin, yyend); if (!(YY_BEGIN)) goto l38; 492 l39:; 493 { int yypos40= yypos, yythunkpos40= yythunkpos; 494 { int yypos41= yypos, yythunkpos41= 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 l41; goto l40; 495 l41:; yypos= yypos41; yythunkpos= yythunkpos41; 496 } if (!yy_Char()) goto l40; goto l39; 497 l40:; yypos= yypos40; yythunkpos= yythunkpos40; 498 } yyText(yybegin, yyend); if (!(YY_END)) goto l38; 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 l38; if (!yy_Spacing()) goto l38; goto l37; 499 l38:; yypos= yypos37; yythunkpos= yythunkpos37; 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 l36; yyText(yybegin, yyend); if (!(YY_BEGIN)) goto l36; 500 l42:; 501 { int yypos43= yypos, yythunkpos43= yythunkpos; 502 { int yypos44= yypos, yythunkpos44= 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 l44; goto l43; 503 l44:; yypos= yypos44; yythunkpos= yythunkpos44; 504 } if (!yy_Char()) goto l43; goto l42; 505 l43:; yypos= yypos43; yythunkpos= yythunkpos43; 506 } yyText(yybegin, yyend); if (!(YY_END)) goto l36; 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 l36; if (!yy_Spacing()) goto l36; 507 } 508 l37:; 509 yyprintf((stderr, " ok %s @ %s\n", "Literal", yybuf+yypos)); 510 return 1; 511 l36:; yypos= yypos0; yythunkpos= yythunkpos0; 512 yyprintf((stderr, " fail %s @ %s\n", "Literal", yybuf+yypos)); 513 return 0; 514} 515YY_RULE(int) yy_CLOSE() 516{ int yypos0= yypos, yythunkpos0= yythunkpos; 517 yyprintf((stderr, "%s\n", "CLOSE")); if (!yymatchChar(')')) goto l45; if (!yy_Spacing()) goto l45; 518 yyprintf((stderr, " ok %s @ %s\n", "CLOSE", yybuf+yypos)); 519 return 1; 520 l45:; yypos= yypos0; yythunkpos= yythunkpos0; 521 yyprintf((stderr, " fail %s @ %s\n", "CLOSE", yybuf+yypos)); 522 return 0; 523} 524YY_RULE(int) yy_OPEN() 525{ int yypos0= yypos, yythunkpos0= yythunkpos; 526 yyprintf((stderr, "%s\n", "OPEN")); if (!yymatchChar('(')) goto l46; if (!yy_Spacing()) goto l46; 527 yyprintf((stderr, " ok %s @ %s\n", "OPEN", yybuf+yypos)); 528 return 1; 529 l46:; yypos= yypos0; yythunkpos= yythunkpos0; 530 yyprintf((stderr, " fail %s @ %s\n", "OPEN", yybuf+yypos)); 531 return 0; 532} 533YY_RULE(int) yy_PLUS() 534{ int yypos0= yypos, yythunkpos0= yythunkpos; 535 yyprintf((stderr, "%s\n", "PLUS")); if (!yymatchChar('+')) goto l47; if (!yy_Spacing()) goto l47; 536 yyprintf((stderr, " ok %s @ %s\n", "PLUS", yybuf+yypos)); 537 return 1; 538 l47:; yypos= yypos0; yythunkpos= yythunkpos0; 539 yyprintf((stderr, " fail %s @ %s\n", "PLUS", yybuf+yypos)); 540 return 0; 541} 542YY_RULE(int) yy_STAR() 543{ int yypos0= yypos, yythunkpos0= yythunkpos; 544 yyprintf((stderr, "%s\n", "STAR")); if (!yymatchChar('*')) goto l48; if (!yy_Spacing()) goto l48; 545 yyprintf((stderr, " ok %s @ %s\n", "STAR", yybuf+yypos)); 546 return 1; 547 l48:; yypos= yypos0; yythunkpos= yythunkpos0; 548 yyprintf((stderr, " fail %s @ %s\n", "STAR", yybuf+yypos)); 549 return 0; 550} 551YY_RULE(int) yy_QUESTION() 552{ int yypos0= yypos, yythunkpos0= yythunkpos; 553 yyprintf((stderr, "%s\n", "QUESTION")); if (!yymatchChar('?')) goto l49; if (!yy_Spacing()) goto l49; 554 yyprintf((stderr, " ok %s @ %s\n", "QUESTION", yybuf+yypos)); 555 return 1; 556 l49:; yypos= yypos0; yythunkpos= yythunkpos0; 557 yyprintf((stderr, " fail %s @ %s\n", "QUESTION", yybuf+yypos)); 558 return 0; 559} 560YY_RULE(int) yy_Primary() 561{ int yypos0= yypos, yythunkpos0= yythunkpos; 562 yyprintf((stderr, "%s\n", "Primary")); 563 { int yypos51= yypos, yythunkpos51= yythunkpos; if (!yy_Identifier()) goto l52; 564 { int yypos53= yypos, yythunkpos53= yythunkpos; if (!yy_LEFTARROW()) goto l53; goto l52; 565 l53:; yypos= yypos53; yythunkpos= yythunkpos53; 566 } yyDo(yy_1_Primary, yybegin, yyend); goto l51; 567 l52:; yypos= yypos51; yythunkpos= yythunkpos51; if (!yy_OPEN()) goto l54; if (!yy_Expression()) goto l54; if (!yy_CLOSE()) goto l54; goto l51; 568 l54:; yypos= yypos51; yythunkpos= yythunkpos51; if (!yy_Literal()) goto l55; yyDo(yy_2_Primary, yybegin, yyend); goto l51; 569 l55:; yypos= yypos51; yythunkpos= yythunkpos51; if (!yy_Class()) goto l56; yyDo(yy_3_Primary, yybegin, yyend); goto l51; 570 l56:; yypos= yypos51; yythunkpos= yythunkpos51; if (!yy_DOT()) goto l57; yyDo(yy_4_Primary, yybegin, yyend); goto l51; 571 l57:; yypos= yypos51; yythunkpos= yythunkpos51; if (!yy_Action()) goto l58; yyDo(yy_5_Primary, yybegin, yyend); goto l51; 572 l58:; yypos= yypos51; yythunkpos= yythunkpos51; if (!yy_BEGIN()) goto l59; yyDo(yy_6_Primary, yybegin, yyend); goto l51; 573 l59:; yypos= yypos51; yythunkpos= yythunkpos51; if (!yy_END()) goto l50; yyDo(yy_7_Primary, yybegin, yyend); 574 } 575 l51:; 576 yyprintf((stderr, " ok %s @ %s\n", "Primary", yybuf+yypos)); 577 return 1; 578 l50:; yypos= yypos0; yythunkpos= yythunkpos0; 579 yyprintf((stderr, " fail %s @ %s\n", "Primary", yybuf+yypos)); 580 return 0; 581} 582YY_RULE(int) yy_NOT() 583{ int yypos0= yypos, yythunkpos0= yythunkpos; 584 yyprintf((stderr, "%s\n", "NOT")); if (!yymatchChar('!')) goto l60; if (!yy_Spacing()) goto l60; 585 yyprintf((stderr, " ok %s @ %s\n", "NOT", yybuf+yypos)); 586 return 1; 587 l60:; yypos= yypos0; yythunkpos= yythunkpos0; 588 yyprintf((stderr, " fail %s @ %s\n", "NOT", yybuf+yypos)); 589 return 0; 590} 591YY_RULE(int) yy_Suffix() 592{ int yypos0= yypos, yythunkpos0= yythunkpos; 593 yyprintf((stderr, "%s\n", "Suffix")); if (!yy_Primary()) goto l61; 594 { int yypos62= yypos, yythunkpos62= yythunkpos; 595 { int yypos64= yypos, yythunkpos64= yythunkpos; if (!yy_QUESTION()) goto l65; yyDo(yy_1_Suffix, yybegin, yyend); goto l64; 596 l65:; yypos= yypos64; yythunkpos= yythunkpos64; if (!yy_STAR()) goto l66; yyDo(yy_2_Suffix, yybegin, yyend); goto l64; 597 l66:; yypos= yypos64; yythunkpos= yythunkpos64; if (!yy_PLUS()) goto l62; yyDo(yy_3_Suffix, yybegin, yyend); 598 } 599 l64:; goto l63; 600 l62:; yypos= yypos62; yythunkpos= yythunkpos62; 601 } 602 l63:; 603 yyprintf((stderr, " ok %s @ %s\n", "Suffix", yybuf+yypos)); 604 return 1; 605 l61:; yypos= yypos0; yythunkpos= yythunkpos0; 606 yyprintf((stderr, " fail %s @ %s\n", "Suffix", yybuf+yypos)); 607 return 0; 608} 609YY_RULE(int) yy_Action() 610{ int yypos0= yypos, yythunkpos0= yythunkpos; 611 yyprintf((stderr, "%s\n", "Action")); if (!yymatchChar('{')) goto l67; yyText(yybegin, yyend); if (!(YY_BEGIN)) goto l67; 612 l68:; 613 { int yypos69= yypos, yythunkpos69= yythunkpos; if (!yymatchClass((unsigned char *)"\377\377\377\377\377\377\377\377\377\377\377\377\377\377\377\337\377\377\377\377\377\377\377\377\377\377\377\377\377\377\377\377")) goto l69; goto l68; 614 l69:; yypos= yypos69; yythunkpos= yythunkpos69; 615 } yyText(yybegin, yyend); if (!(YY_END)) goto l67; if (!yymatchChar('}')) goto l67; if (!yy_Spacing()) goto l67; 616 yyprintf((stderr, " ok %s @ %s\n", "Action", yybuf+yypos)); 617 return 1; 618 l67:; yypos= yypos0; yythunkpos= yythunkpos0; 619 yyprintf((stderr, " fail %s @ %s\n", "Action", yybuf+yypos)); 620 return 0; 621} 622YY_RULE(int) yy_AND() 623{ int yypos0= yypos, yythunkpos0= yythunkpos; 624 yyprintf((stderr, "%s\n", "AND")); if (!yymatchChar('&')) goto l70; if (!yy_Spacing()) goto l70; 625 yyprintf((stderr, " ok %s @ %s\n", "AND", yybuf+yypos)); 626 return 1; 627 l70:; yypos= yypos0; yythunkpos= yythunkpos0; 628 yyprintf((stderr, " fail %s @ %s\n", "AND", yybuf+yypos)); 629 return 0; 630} 631YY_RULE(int) yy_Prefix() 632{ int yypos0= yypos, yythunkpos0= yythunkpos; 633 yyprintf((stderr, "%s\n", "Prefix")); 634 { int yypos72= yypos, yythunkpos72= yythunkpos; if (!yy_AND()) goto l73; if (!yy_Action()) goto l73; yyDo(yy_1_Prefix, yybegin, yyend); goto l72; 635 l73:; yypos= yypos72; yythunkpos= yythunkpos72; if (!yy_AND()) goto l74; if (!yy_Suffix()) goto l74; yyDo(yy_2_Prefix, yybegin, yyend); goto l72; 636 l74:; yypos= yypos72; yythunkpos= yythunkpos72; if (!yy_NOT()) goto l75; if (!yy_Suffix()) goto l75; yyDo(yy_3_Prefix, yybegin, yyend); goto l72; 637 l75:; yypos= yypos72; yythunkpos= yythunkpos72; if (!yy_Suffix()) goto l71; 638 } 639 l72:; 640 yyprintf((stderr, " ok %s @ %s\n", "Prefix", yybuf+yypos)); 641 return 1; 642 l71:; yypos= yypos0; yythunkpos= yythunkpos0; 643 yyprintf((stderr, " fail %s @ %s\n", "Prefix", yybuf+yypos)); 644 return 0; 645} 646YY_RULE(int) yy_SLASH() 647{ int yypos0= yypos, yythunkpos0= yythunkpos; 648 yyprintf((stderr, "%s\n", "SLASH")); if (!yymatchChar('/')) goto l76; if (!yy_Spacing()) goto l76; 649 yyprintf((stderr, " ok %s @ %s\n", "SLASH", yybuf+yypos)); 650 return 1; 651 l76:; yypos= yypos0; yythunkpos= yythunkpos0; 652 yyprintf((stderr, " fail %s @ %s\n", "SLASH", yybuf+yypos)); 653 return 0; 654} 655YY_RULE(int) yy_Sequence() 656{ int yypos0= yypos, yythunkpos0= yythunkpos; 657 yyprintf((stderr, "%s\n", "Sequence")); 658 { int yypos78= yypos, yythunkpos78= yythunkpos; if (!yy_Prefix()) goto l79; 659 l80:; 660 { int yypos81= yypos, yythunkpos81= yythunkpos; if (!yy_Prefix()) goto l81; yyDo(yy_1_Sequence, yybegin, yyend); goto l80; 661 l81:; yypos= yypos81; yythunkpos= yythunkpos81; 662 } goto l78; 663 l79:; yypos= yypos78; yythunkpos= yythunkpos78; yyDo(yy_2_Sequence, yybegin, yyend); 664 } 665 l78:; 666 yyprintf((stderr, " ok %s @ %s\n", "Sequence", yybuf+yypos)); 667 return 1; 668 l77:; yypos= yypos0; yythunkpos= yythunkpos0; 669 yyprintf((stderr, " fail %s @ %s\n", "Sequence", yybuf+yypos)); 670 return 0; 671} 672YY_RULE(int) yy_Expression() 673{ int yypos0= yypos, yythunkpos0= yythunkpos; 674 yyprintf((stderr, "%s\n", "Expression")); if (!yy_Sequence()) goto l82; 675 l83:; 676 { int yypos84= yypos, yythunkpos84= yythunkpos; if (!yy_SLASH()) goto l84; if (!yy_Sequence()) goto l84; yyDo(yy_1_Expression, yybegin, yyend); goto l83; 677 l84:; yypos= yypos84; yythunkpos= yythunkpos84; 678 } 679 yyprintf((stderr, " ok %s @ %s\n", "Expression", yybuf+yypos)); 680 return 1; 681 l82:; yypos= yypos0; yythunkpos= yythunkpos0; 682 yyprintf((stderr, " fail %s @ %s\n", "Expression", yybuf+yypos)); 683 return 0; 684} 685YY_RULE(int) yy_LEFTARROW() 686{ int yypos0= yypos, yythunkpos0= yythunkpos; 687 yyprintf((stderr, "%s\n", "LEFTARROW")); if (!yymatchString("<-")) goto l85; if (!yy_Spacing()) goto l85; 688 yyprintf((stderr, " ok %s @ %s\n", "LEFTARROW", yybuf+yypos)); 689 return 1; 690 l85:; yypos= yypos0; yythunkpos= yythunkpos0; 691 yyprintf((stderr, " fail %s @ %s\n", "LEFTARROW", yybuf+yypos)); 692 return 0; 693} 694YY_RULE(int) yy_Identifier() 695{ int yypos0= yypos, yythunkpos0= yythunkpos; 696 yyprintf((stderr, "%s\n", "Identifier")); yyText(yybegin, yyend); if (!(YY_BEGIN)) goto l86; if (!yy_IdentStart()) goto l86; 697 l87:; 698 { int yypos88= yypos, yythunkpos88= yythunkpos; if (!yy_IdentCont()) goto l88; goto l87; 699 l88:; yypos= yypos88; yythunkpos= yythunkpos88; 700 } yyText(yybegin, yyend); if (!(YY_END)) goto l86; if (!yy_Spacing()) goto l86; 701 yyprintf((stderr, " ok %s @ %s\n", "Identifier", yybuf+yypos)); 702 return 1; 703 l86:; yypos= yypos0; yythunkpos= yythunkpos0; 704 yyprintf((stderr, " fail %s @ %s\n", "Identifier", yybuf+yypos)); 705 return 0; 706} 707YY_RULE(int) yy_EndOfFile() 708{ int yypos0= yypos, yythunkpos0= yythunkpos; 709 yyprintf((stderr, "%s\n", "EndOfFile")); 710 { int yypos90= yypos, yythunkpos90= yythunkpos; if (!yymatchDot()) goto l90; goto l89; 711 l90:; yypos= yypos90; yythunkpos= yythunkpos90; 712 } 713 yyprintf((stderr, " ok %s @ %s\n", "EndOfFile", yybuf+yypos)); 714 return 1; 715 l89:; yypos= yypos0; yythunkpos= yythunkpos0; 716 yyprintf((stderr, " fail %s @ %s\n", "EndOfFile", yybuf+yypos)); 717 return 0; 718} 719YY_RULE(int) yy_Definition() 720{ int yypos0= yypos, yythunkpos0= yythunkpos; 721 yyprintf((stderr, "%s\n", "Definition")); if (!yy_Identifier()) goto l91; yyDo(yy_1_Definition, yybegin, yyend); if (!yy_LEFTARROW()) goto l91; if (!yy_Expression()) goto l91; yyDo(yy_2_Definition, yybegin, yyend); yyText(yybegin, yyend); if (!( YYACCEPT )) goto l91; 722 yyprintf((stderr, " ok %s @ %s\n", "Definition", yybuf+yypos)); 723 return 1; 724 l91:; yypos= yypos0; yythunkpos= yythunkpos0; 725 yyprintf((stderr, " fail %s @ %s\n", "Definition", yybuf+yypos)); 726 return 0; 727} 728YY_RULE(int) yy_Spacing() 729{ 730 yyprintf((stderr, "%s\n", "Spacing")); 731 l93:; 732 { int yypos94= yypos, yythunkpos94= yythunkpos; 733 { int yypos95= yypos, yythunkpos95= yythunkpos; if (!yy_Space()) goto l96; goto l95; 734 l96:; yypos= yypos95; yythunkpos= yythunkpos95; if (!yy_Comment()) goto l94; 735 } 736 l95:; goto l93; 737 l94:; yypos= yypos94; yythunkpos= yythunkpos94; 738 } 739 yyprintf((stderr, " ok %s @ %s\n", "Spacing", yybuf+yypos)); 740 return 1; 741} 742YY_RULE(int) yy_Grammar() 743{ int yypos0= yypos, yythunkpos0= yythunkpos; 744 yyprintf((stderr, "%s\n", "Grammar")); if (!yy_Spacing()) goto l97; if (!yy_Definition()) goto l97; 745 l98:; 746 { int yypos99= yypos, yythunkpos99= yythunkpos; if (!yy_Definition()) goto l99; goto l98; 747 l99:; yypos= yypos99; yythunkpos= yythunkpos99; 748 } if (!yy_EndOfFile()) goto l97; 749 yyprintf((stderr, " ok %s @ %s\n", "Grammar", yybuf+yypos)); 750 return 1; 751 l97:; yypos= yypos0; yythunkpos= yythunkpos0; 752 yyprintf((stderr, " fail %s @ %s\n", "Grammar", yybuf+yypos)); 753 return 0; 754} 755 756#ifndef YY_PART 757 758typedef int (*yyrule)(); 759 760YY_PARSE(int) YYPARSEFROM(yyrule yystart) 761{ 762 int yyok; 763 if (!yybuflen) 764 { 765 yybuflen= 1024; 766 yybuf= malloc(yybuflen); 767 yytextlen= 1024; 768 yytext= malloc(yytextlen); 769 yythunkslen= 32; 770 yythunks= malloc(sizeof(yythunk) * yythunkslen); 771 yyvalslen= 32; 772 yyvals= malloc(sizeof(YYSTYPE) * yyvalslen); 773 yybegin= yyend= yypos= yylimit= yythunkpos= 0; 774 } 775 yybegin= yyend= yypos; 776 yythunkpos= 0; 777 yyval= yyvals; 778 yyok= yystart(); 779 if (yyok) yyDone(); 780 yyCommit(); 781 return yyok; 782 (void)yyrefill; 783 (void)yymatchDot; 784 (void)yymatchChar; 785 (void)yymatchString; 786 (void)yymatchClass; 787 (void)yyDo; 788 (void)yyText; 789 (void)yyDone; 790 (void)yyCommit; 791 (void)yyAccept; 792 (void)yyPush; 793 (void)yyPop; 794 (void)yySet; 795} 796 797YY_PARSE(int) YYPARSE(void) 798{ 799 return YYPARSEFROM(yy_Grammar); 800} 801 802#endif