PageRenderTime 129ms CodeModel.GetById 37ms app.highlight 84ms RepoModel.GetById 2ms app.codeStats 0ms

/peg/peg-go.go

http://github.com/feyeleanor/RubyGoLightly
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