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 1
7#define YYMINOR 9
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
191int      yydebug;
192int      yynerrs;
193
194int      yyerrflag;
195int      yychar;
196YYSTYPE  yyval;
197YYSTYPE  yylval;
198
199/* define the initial stack-sizes */
200#ifdef YYSTACKSIZE
201#undef YYMAXDEPTH
202#define YYMAXDEPTH  YYSTACKSIZE
203#else
204#ifdef YYMAXDEPTH
205#define YYSTACKSIZE YYMAXDEPTH
206#else
207#define YYSTACKSIZE 10000
208#define YYMAXDEPTH  10000
209#endif
210#endif
211
212#define YYINITSTACKSIZE 200
213
214typedef struct {
215    unsigned stacksize;
216    YYINT    *s_base;
217    YYINT    *s_mark;
218    YYINT    *s_last;
219    YYSTYPE  *l_base;
220    YYSTYPE  *l_mark;
221} YYSTACKDATA;
222/* variables for the parser stack */
223static YYSTACKDATA yystack;
224#line 16 "err_syntax20.y"
225
226#include <stdio.h>
227
228int
229main(void)
230{
231    printf("yyparse() = %d\n", yyparse());
232    return 0;
233}
234
235int
236yylex(void)
237{
238    return -1;
239}
240
241static void
242yyerror(const char* s)
243{
244    printf("%s\n", s);
245}
246#line 247 "err_syntax20.tab.c"
247
248#if YYDEBUG
249#include <stdio.h>		/* needed for printf */
250#endif
251
252#include <stdlib.h>	/* needed for malloc, etc */
253#include <string.h>	/* needed for memset */
254
255/* allocate initial stack or double stack size, up to YYMAXDEPTH */
256static int yygrowstack(YYSTACKDATA *data)
257{
258    int i;
259    unsigned newsize;
260    YYINT *newss;
261    YYSTYPE *newvs;
262
263    if ((newsize = data->stacksize) == 0)
264        newsize = YYINITSTACKSIZE;
265    else if (newsize >= YYMAXDEPTH)
266        return YYENOMEM;
267    else if ((newsize *= 2) > YYMAXDEPTH)
268        newsize = YYMAXDEPTH;
269
270    i = (int) (data->s_mark - data->s_base);
271    newss = (YYINT *)realloc(data->s_base, newsize * sizeof(*newss));
272    if (newss == 0)
273        return YYENOMEM;
274
275    data->s_base = newss;
276    data->s_mark = newss + i;
277
278    newvs = (YYSTYPE *)realloc(data->l_base, newsize * sizeof(*newvs));
279    if (newvs == 0)
280        return YYENOMEM;
281
282    data->l_base = newvs;
283    data->l_mark = newvs + i;
284
285    data->stacksize = newsize;
286    data->s_last = data->s_base + newsize - 1;
287    return 0;
288}
289
290#if YYPURE || defined(YY_NO_LEAKS)
291static void yyfreestack(YYSTACKDATA *data)
292{
293    free(data->s_base);
294    free(data->l_base);
295    memset(data, 0, sizeof(*data));
296}
297#else
298#define yyfreestack(data) /* nothing */
299#endif
300
301#define YYABORT  goto yyabort
302#define YYREJECT goto yyabort
303#define YYACCEPT goto yyaccept
304#define YYERROR  goto yyerrlab
305
306int
307YYPARSE_DECL()
308{
309    int yym, yyn, yystate;
310#if YYDEBUG
311    const char *yys;
312
313    if ((yys = getenv("YYDEBUG")) != 0)
314    {
315        yyn = *yys;
316        if (yyn >= '0' && yyn <= '9')
317            yydebug = yyn - '0';
318    }
319#endif
320
321    yynerrs = 0;
322    yyerrflag = 0;
323    yychar = YYEMPTY;
324    yystate = 0;
325
326#if YYPURE
327    memset(&yystack, 0, sizeof(yystack));
328#endif
329
330    if (yystack.s_base == NULL && yygrowstack(&yystack) == YYENOMEM) goto yyoverflow;
331    yystack.s_mark = yystack.s_base;
332    yystack.l_mark = yystack.l_base;
333    yystate = 0;
334    *yystack.s_mark = 0;
335
336yyloop:
337    if ((yyn = yydefred[yystate]) != 0) goto yyreduce;
338    if (yychar < 0)
339    {
340        if ((yychar = YYLEX) < 0) yychar = YYEOF;
341#if YYDEBUG
342        if (yydebug)
343        {
344            yys = yyname[YYTRANSLATE(yychar)];
345            printf("%sdebug: state %d, reading %d (%s)\n",
346                    YYPREFIX, yystate, yychar, yys);
347        }
348#endif
349    }
350    if ((yyn = yysindex[yystate]) && (yyn += yychar) >= 0 &&
351            yyn <= YYTABLESIZE && yycheck[yyn] == yychar)
352    {
353#if YYDEBUG
354        if (yydebug)
355            printf("%sdebug: state %d, shifting to state %d\n",
356                    YYPREFIX, yystate, yytable[yyn]);
357#endif
358        if (yystack.s_mark >= yystack.s_last && yygrowstack(&yystack) == YYENOMEM)
359        {
360            goto yyoverflow;
361        }
362        yystate = yytable[yyn];
363        *++yystack.s_mark = yytable[yyn];
364        *++yystack.l_mark = yylval;
365        yychar = YYEMPTY;
366        if (yyerrflag > 0)  --yyerrflag;
367        goto yyloop;
368    }
369    if ((yyn = yyrindex[yystate]) && (yyn += yychar) >= 0 &&
370            yyn <= YYTABLESIZE && yycheck[yyn] == yychar)
371    {
372        yyn = yytable[yyn];
373        goto yyreduce;
374    }
375    if (yyerrflag) goto yyinrecovery;
376
377    YYERROR_CALL("syntax error");
378
379    goto yyerrlab;
380
381yyerrlab:
382    ++yynerrs;
383
384yyinrecovery:
385    if (yyerrflag < 3)
386    {
387        yyerrflag = 3;
388        for (;;)
389        {
390            if ((yyn = yysindex[*yystack.s_mark]) && (yyn += YYERRCODE) >= 0 &&
391                    yyn <= YYTABLESIZE && yycheck[yyn] == YYERRCODE)
392            {
393#if YYDEBUG
394                if (yydebug)
395                    printf("%sdebug: state %d, error recovery shifting\
396 to state %d\n", YYPREFIX, *yystack.s_mark, yytable[yyn]);
397#endif
398                if (yystack.s_mark >= yystack.s_last && yygrowstack(&yystack) == YYENOMEM)
399                {
400                    goto yyoverflow;
401                }
402                yystate = yytable[yyn];
403                *++yystack.s_mark = yytable[yyn];
404                *++yystack.l_mark = yylval;
405                goto yyloop;
406            }
407            else
408            {
409#if YYDEBUG
410                if (yydebug)
411                    printf("%sdebug: error recovery discarding state %d\n",
412                            YYPREFIX, *yystack.s_mark);
413#endif
414                if (yystack.s_mark <= yystack.s_base) goto yyabort;
415                --yystack.s_mark;
416                --yystack.l_mark;
417            }
418        }
419    }
420    else
421    {
422        if (yychar == YYEOF) goto yyabort;
423#if YYDEBUG
424        if (yydebug)
425        {
426            yys = yyname[YYTRANSLATE(yychar)];
427            printf("%sdebug: state %d, error recovery discards token %d (%s)\n",
428                    YYPREFIX, yystate, yychar, yys);
429        }
430#endif
431        yychar = YYEMPTY;
432        goto yyloop;
433    }
434
435yyreduce:
436#if YYDEBUG
437    if (yydebug)
438        printf("%sdebug: state %d, reducing by rule %d (%s)\n",
439                YYPREFIX, yystate, yyn, yyrule[yyn]);
440#endif
441    yym = yylen[yyn];
442    if (yym)
443        yyval = yystack.l_mark[1-yym];
444    else
445        memset(&yyval, 0, sizeof yyval);
446    switch (yyn)
447    {
448case 1:
449#line 12 "err_syntax20.y"
450	{ yystack.l_mark[-1].rechk = 3; }
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            if ((yychar = YYLEX) < 0) yychar = YYEOF;
471#if YYDEBUG
472            if (yydebug)
473            {
474                yys = yyname[YYTRANSLATE(yychar)];
475                printf("%sdebug: state %d, reading %d (%s)\n",
476                        YYPREFIX, YYFINAL, yychar, yys);
477            }
478#endif
479        }
480        if (yychar == YYEOF) goto yyaccept;
481        goto yyloop;
482    }
483    if ((yyn = yygindex[yym]) && (yyn += yystate) >= 0 &&
484            yyn <= YYTABLESIZE && yycheck[yyn] == yystate)
485        yystate = yytable[yyn];
486    else
487        yystate = yydgoto[yym];
488#if YYDEBUG
489    if (yydebug)
490        printf("%sdebug: after reduction, shifting from state %d \
491to state %d\n", YYPREFIX, *yystack.s_mark, yystate);
492#endif
493    if (yystack.s_mark >= yystack.s_last && yygrowstack(&yystack) == YYENOMEM)
494    {
495        goto yyoverflow;
496    }
497    *++yystack.s_mark = (YYINT) yystate;
498    *++yystack.l_mark = yyval;
499    goto yyloop;
500
501yyoverflow:
502    YYERROR_CALL("yacc stack overflow");
503
504yyabort:
505    yyfreestack(&yystack);
506    return (1);
507
508yyaccept:
509    yyfreestack(&yystack);
510    return (0);
511}
512