1/* original parser id follows */
2/* yysccsid[] = "@(#)yaccpar	1.9 (Berkeley) 02/21/93" */
3/* (use YYMAJOR/YYMINOR for ifdefs dependent on parser version) */
4
5#define YYBYACC 1
6#define YYMAJOR 2
7#define YYMINOR 0
8#define YYCHECK "yyyymmdd"
9
10#define YYEMPTY        (-1)
11#define yyclearin      (yychar = YYEMPTY)
12#define yyerrok        (yyerrflag = 0)
13#define YYRECOVERING() (yyerrflag != 0)
14#define YYENOMEM       (-2)
15#define YYEOF          0
16
17#ifndef yyparse
18#define yyparse    err_syntax20_parse
19#endif /* yyparse */
20
21#ifndef yylex
22#define yylex      err_syntax20_lex
23#endif /* yylex */
24
25#ifndef yyerror
26#define yyerror    err_syntax20_error
27#endif /* yyerror */
28
29#ifndef yychar
30#define yychar     err_syntax20_char
31#endif /* yychar */
32
33#ifndef yyval
34#define yyval      err_syntax20_val
35#endif /* yyval */
36
37#ifndef yylval
38#define yylval     err_syntax20_lval
39#endif /* yylval */
40
41#ifndef yydebug
42#define yydebug    err_syntax20_debug
43#endif /* yydebug */
44
45#ifndef yynerrs
46#define yynerrs    err_syntax20_nerrs
47#endif /* yynerrs */
48
49#ifndef yyerrflag
50#define yyerrflag  err_syntax20_errflag
51#endif /* yyerrflag */
52
53#ifndef yylhs
54#define yylhs      err_syntax20_lhs
55#endif /* yylhs */
56
57#ifndef yylen
58#define yylen      err_syntax20_len
59#endif /* yylen */
60
61#ifndef yydefred
62#define yydefred   err_syntax20_defred
63#endif /* yydefred */
64
65#ifndef yydgoto
66#define yydgoto    err_syntax20_dgoto
67#endif /* yydgoto */
68
69#ifndef yysindex
70#define yysindex   err_syntax20_sindex
71#endif /* yysindex */
72
73#ifndef yyrindex
74#define yyrindex   err_syntax20_rindex
75#endif /* yyrindex */
76
77#ifndef yygindex
78#define yygindex   err_syntax20_gindex
79#endif /* yygindex */
80
81#ifndef yytable
82#define yytable    err_syntax20_table
83#endif /* yytable */
84
85#ifndef yycheck
86#define yycheck    err_syntax20_check
87#endif /* yycheck */
88
89#ifndef yyname
90#define yyname     err_syntax20_name
91#endif /* yyname */
92
93#ifndef yyrule
94#define yyrule     err_syntax20_rule
95#endif /* yyrule */
96#define YYPREFIX "err_syntax20_"
97
98#define YYPURE 0
99
100#line 2 "err_syntax20.y"
101int yylex(void);
102static void yyerror(const char *);
103#line 104 "err_syntax20.tab.c"
104
105/* compatibility with bison */
106#ifdef YYPARSE_PARAM
107/* compatibility with FreeBSD */
108# ifdef YYPARSE_PARAM_TYPE
109#  define YYPARSE_DECL() yyparse(YYPARSE_PARAM_TYPE YYPARSE_PARAM)
110# else
111#  define YYPARSE_DECL() yyparse(void *YYPARSE_PARAM)
112# endif
113#else
114# define YYPARSE_DECL() yyparse(void)
115#endif
116
117/* Parameters sent to lex. */
118#ifdef YYLEX_PARAM
119# define YYLEX_DECL() yylex(void *YYLEX_PARAM)
120# define YYLEX yylex(YYLEX_PARAM)
121#else
122# define YYLEX_DECL() yylex(void)
123# define YYLEX yylex()
124#endif
125
126/* Parameters sent to yyerror. */
127#ifndef YYERROR_DECL
128#define YYERROR_DECL() yyerror(const char *s)
129#endif
130#ifndef YYERROR_CALL
131#define YYERROR_CALL(msg) yyerror(msg)
132#endif
133
134extern int YYPARSE_DECL();
135
136#define recur 257
137#define YYERRCODE 256
138typedef int YYINT;
139static const YYINT err_syntax20_lhs[] = {                -1,
140    0,
141};
142static const YYINT err_syntax20_len[] = {                 2,
143    3,
144};
145static const YYINT err_syntax20_defred[] = {              0,
146    0,    0,    0,    1,
147};
148static const YYINT err_syntax20_dgoto[] = {               2,
149};
150static const YYINT err_syntax20_sindex[] = {            -40,
151 -256,    0,  -39,    0,
152};
153static const YYINT err_syntax20_rindex[] = {              0,
154    0,    0,    0,    0,
155};
156static const YYINT err_syntax20_gindex[] = {              0,
157};
158#define YYTABLESIZE 2
159static const YYINT err_syntax20_table[] = {               1,
160    3,    4,
161};
162static const YYINT err_syntax20_check[] = {              40,
163  257,   41,
164};
165#define YYFINAL 2
166#ifndef YYDEBUG
167#define YYDEBUG 0
168#endif
169#define YYMAXTOKEN 257
170#define YYUNDFTOKEN 260
171#define YYTRANSLATE(a) ((a) > YYMAXTOKEN ? YYUNDFTOKEN : (a))
172#if YYDEBUG
173static const char *const err_syntax20_name[] = {
174
175"end-of-file",0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
1760,0,0,0,0,0,"'('","')'",0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
1770,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
1780,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
1790,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
1800,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
1810,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"recur",0,0,
182"illegal-symbol",
183};
184static const char *const err_syntax20_rule[] = {
185"$accept : expr",
186"expr : '(' recur ')'",
187
188};
189#endif
190
191#if YYDEBUG
192int      yydebug;
193#endif
194
195int      yyerrflag;
196int      yychar;
197YYSTYPE  yyval;
198YYSTYPE  yylval;
199int      yynerrs;
200
201/* define the initial stack-sizes */
202#ifdef YYSTACKSIZE
203#undef YYMAXDEPTH
204#define YYMAXDEPTH  YYSTACKSIZE
205#else
206#ifdef YYMAXDEPTH
207#define YYSTACKSIZE YYMAXDEPTH
208#else
209#define YYSTACKSIZE 10000
210#define YYMAXDEPTH  10000
211#endif
212#endif
213
214#define YYINITSTACKSIZE 200
215
216typedef struct {
217    unsigned stacksize;
218    YYINT    *s_base;
219    YYINT    *s_mark;
220    YYINT    *s_last;
221    YYSTYPE  *l_base;
222    YYSTYPE  *l_mark;
223} YYSTACKDATA;
224/* variables for the parser stack */
225static YYSTACKDATA yystack;
226#line 16 "err_syntax20.y"
227
228#include <stdio.h>
229
230int
231main(void)
232{
233    printf("yyparse() = %d\n", yyparse());
234    return 0;
235}
236
237int
238yylex(void)
239{
240    return -1;
241}
242
243static void
244yyerror(const char* s)
245{
246    printf("%s\n", s);
247}
248#line 249 "err_syntax20.tab.c"
249
250#if YYDEBUG
251#include <stdio.h>	/* needed for printf */
252#endif
253
254#include <stdlib.h>	/* needed for malloc, etc */
255#include <string.h>	/* needed for memset */
256
257/* allocate initial stack or double stack size, up to YYMAXDEPTH */
258static int yygrowstack(YYSTACKDATA *data)
259{
260    int i;
261    unsigned newsize;
262    YYINT *newss;
263    YYSTYPE *newvs;
264
265    if ((newsize = data->stacksize) == 0)
266        newsize = YYINITSTACKSIZE;
267    else if (newsize >= YYMAXDEPTH)
268        return YYENOMEM;
269    else if ((newsize *= 2) > YYMAXDEPTH)
270        newsize = YYMAXDEPTH;
271
272    i = (int) (data->s_mark - data->s_base);
273    newss = (YYINT *)realloc(data->s_base, newsize * sizeof(*newss));
274    if (newss == NULL)
275        return YYENOMEM;
276
277    data->s_base = newss;
278    data->s_mark = newss + i;
279
280    newvs = (YYSTYPE *)realloc(data->l_base, newsize * sizeof(*newvs));
281    if (newvs == NULL)
282        return YYENOMEM;
283
284    data->l_base = newvs;
285    data->l_mark = newvs + i;
286
287    data->stacksize = newsize;
288    data->s_last = data->s_base + newsize - 1;
289    return 0;
290}
291
292#if YYPURE || defined(YY_NO_LEAKS)
293static void yyfreestack(YYSTACKDATA *data)
294{
295    free(data->s_base);
296    free(data->l_base);
297    memset(data, 0, sizeof(*data));
298}
299#else
300#define yyfreestack(data) /* nothing */
301#endif
302
303#define YYABORT  goto yyabort
304#define YYREJECT goto yyabort
305#define YYACCEPT goto yyaccept
306#define YYERROR  goto yyerrlab
307
308int
309YYPARSE_DECL()
310{
311    int yym, yyn, yystate;
312#if YYDEBUG
313    const char *yys;
314
315    if ((yys = getenv("YYDEBUG")) != NULL)
316    {
317        yyn = *yys;
318        if (yyn >= '0' && yyn <= '9')
319            yydebug = yyn - '0';
320    }
321#endif
322
323    /* yym is set below */
324    /* yyn is set below */
325    yynerrs = 0;
326    yyerrflag = 0;
327    yychar = YYEMPTY;
328    yystate = 0;
329
330#if YYPURE
331    memset(&yystack, 0, sizeof(yystack));
332#endif
333
334    if (yystack.s_base == NULL && yygrowstack(&yystack) == YYENOMEM) goto yyoverflow;
335    yystack.s_mark = yystack.s_base;
336    yystack.l_mark = yystack.l_base;
337    yystate = 0;
338    *yystack.s_mark = 0;
339
340yyloop:
341    if ((yyn = yydefred[yystate]) != 0) goto yyreduce;
342    if (yychar < 0)
343    {
344        yychar = YYLEX;
345        if (yychar < 0) yychar = YYEOF;
346#if YYDEBUG
347        if (yydebug)
348        {
349            if ((yys = yyname[YYTRANSLATE(yychar)]) == NULL) yys = yyname[YYUNDFTOKEN];
350            printf("%sdebug: state %d, reading %d (%s)\n",
351                    YYPREFIX, yystate, yychar, yys);
352        }
353#endif
354    }
355    if (((yyn = yysindex[yystate]) != 0) && (yyn += yychar) >= 0 &&
356            yyn <= YYTABLESIZE && yycheck[yyn] == (YYINT) yychar)
357    {
358#if YYDEBUG
359        if (yydebug)
360            printf("%sdebug: state %d, shifting to state %d\n",
361                    YYPREFIX, yystate, yytable[yyn]);
362#endif
363        if (yystack.s_mark >= yystack.s_last && yygrowstack(&yystack) == YYENOMEM) goto yyoverflow;
364        yystate = yytable[yyn];
365        *++yystack.s_mark = yytable[yyn];
366        *++yystack.l_mark = yylval;
367        yychar = YYEMPTY;
368        if (yyerrflag > 0)  --yyerrflag;
369        goto yyloop;
370    }
371    if (((yyn = yyrindex[yystate]) != 0) && (yyn += yychar) >= 0 &&
372            yyn <= YYTABLESIZE && yycheck[yyn] == (YYINT) yychar)
373    {
374        yyn = yytable[yyn];
375        goto yyreduce;
376    }
377    if (yyerrflag != 0) goto yyinrecovery;
378
379    YYERROR_CALL("syntax error");
380
381    goto yyerrlab; /* redundant goto avoids 'unused label' warning */
382yyerrlab:
383    ++yynerrs;
384
385yyinrecovery:
386    if (yyerrflag < 3)
387    {
388        yyerrflag = 3;
389        for (;;)
390        {
391            if (((yyn = yysindex[*yystack.s_mark]) != 0) && (yyn += YYERRCODE) >= 0 &&
392                    yyn <= YYTABLESIZE && yycheck[yyn] == (YYINT) YYERRCODE)
393            {
394#if YYDEBUG
395                if (yydebug)
396                    printf("%sdebug: state %d, error recovery shifting\
397 to state %d\n", YYPREFIX, *yystack.s_mark, yytable[yyn]);
398#endif
399                if (yystack.s_mark >= yystack.s_last && yygrowstack(&yystack) == YYENOMEM) goto yyoverflow;
400                yystate = yytable[yyn];
401                *++yystack.s_mark = yytable[yyn];
402                *++yystack.l_mark = yylval;
403                goto yyloop;
404            }
405            else
406            {
407#if YYDEBUG
408                if (yydebug)
409                    printf("%sdebug: error recovery discarding state %d\n",
410                            YYPREFIX, *yystack.s_mark);
411#endif
412                if (yystack.s_mark <= yystack.s_base) goto yyabort;
413                --yystack.s_mark;
414                --yystack.l_mark;
415            }
416        }
417    }
418    else
419    {
420        if (yychar == YYEOF) goto yyabort;
421#if YYDEBUG
422        if (yydebug)
423        {
424            if ((yys = yyname[YYTRANSLATE(yychar)]) == NULL) yys = yyname[YYUNDFTOKEN];
425            printf("%sdebug: state %d, error recovery discards token %d (%s)\n",
426                    YYPREFIX, yystate, yychar, yys);
427        }
428#endif
429        yychar = YYEMPTY;
430        goto yyloop;
431    }
432
433yyreduce:
434#if YYDEBUG
435    if (yydebug)
436        printf("%sdebug: state %d, reducing by rule %d (%s)\n",
437                YYPREFIX, yystate, yyn, yyrule[yyn]);
438#endif
439    yym = yylen[yyn];
440    if (yym > 0)
441        yyval = yystack.l_mark[1-yym];
442    else
443        memset(&yyval, 0, sizeof yyval);
444
445    switch (yyn)
446    {
447case 1:
448#line 12 "err_syntax20.y"
449	{ yystack.l_mark[-1].rechk = 3; }
450#line 451 "err_syntax20.tab.c"
451break;
452#line 453 "err_syntax20.tab.c"
453    }
454    yystack.s_mark -= yym;
455    yystate = *yystack.s_mark;
456    yystack.l_mark -= yym;
457    yym = yylhs[yyn];
458    if (yystate == 0 && yym == 0)
459    {
460#if YYDEBUG
461        if (yydebug)
462            printf("%sdebug: after reduction, shifting from state 0 to\
463 state %d\n", YYPREFIX, YYFINAL);
464#endif
465        yystate = YYFINAL;
466        *++yystack.s_mark = YYFINAL;
467        *++yystack.l_mark = yyval;
468        if (yychar < 0)
469        {
470            yychar = YYLEX;
471            if (yychar < 0) yychar = YYEOF;
472#if YYDEBUG
473            if (yydebug)
474            {
475                if ((yys = yyname[YYTRANSLATE(yychar)]) == NULL) yys = yyname[YYUNDFTOKEN];
476                printf("%sdebug: state %d, reading %d (%s)\n",
477                        YYPREFIX, YYFINAL, yychar, yys);
478            }
479#endif
480        }
481        if (yychar == YYEOF) goto yyaccept;
482        goto yyloop;
483    }
484    if (((yyn = yygindex[yym]) != 0) && (yyn += yystate) >= 0 &&
485            yyn <= YYTABLESIZE && yycheck[yyn] == (YYINT) yystate)
486        yystate = yytable[yyn];
487    else
488        yystate = yydgoto[yym];
489#if YYDEBUG
490    if (yydebug)
491        printf("%sdebug: after reduction, shifting from state %d \
492to state %d\n", YYPREFIX, *yystack.s_mark, yystate);
493#endif
494    if (yystack.s_mark >= yystack.s_last && yygrowstack(&yystack) == YYENOMEM) goto yyoverflow;
495    *++yystack.s_mark = (YYINT) yystate;
496    *++yystack.l_mark = yyval;
497    goto yyloop;
498
499yyoverflow:
500    YYERROR_CALL("yacc stack overflow");
501
502yyabort:
503    yyfreestack(&yystack);
504    return (1);
505
506yyaccept:
507    yyfreestack(&yystack);
508    return (0);
509}
510