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