code_error.code.c revision 277086 
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
167extern char *yyname[];
168extern char *yyrule[];
169#endif
170
171int      yydebug;
172int      yynerrs;
173
174int      yyerrflag;
175int      yychar;
176YYSTYPE  yyval;
177YYSTYPE  yylval;
178
179/* define the initial stack-sizes */
180#ifdef YYSTACKSIZE
181#undef YYMAXDEPTH
182#define YYMAXDEPTH  YYSTACKSIZE
183#else
184#ifdef YYMAXDEPTH
185#define YYSTACKSIZE YYMAXDEPTH
186#else
187#define YYSTACKSIZE 10000
188#define YYMAXDEPTH  10000
189#endif
190#endif
191
192#define YYINITSTACKSIZE 200
193
194typedef struct {
195    unsigned stacksize;
196    YYINT    *s_base;
197    YYINT    *s_mark;
198    YYINT    *s_last;
199    YYSTYPE  *l_base;
200    YYSTYPE  *l_mark;
201} YYSTACKDATA;
202/* variables for the parser stack */
203static YYSTACKDATA yystack;
204#line 12 "code_error.y"
205
206#include <stdio.h>
207
208#ifdef YYBYACC
209extern int YYLEX_DECL();
210#endif
211
212int
213main(void)
214{
215    printf("yyparse() = %d\n", yyparse());
216    return 0;
217}
218
219int
220yylex(void)
221{
222    return -1;
223}
224
225static void
226yyerror(const char* s)
227{
228    printf("%s\n", s);
229}
230#line 231 "code_error.code.c"
231
232#if YYDEBUG
233#include <stdio.h>		/* needed for printf */
234#endif
235
236#include <stdlib.h>	/* needed for malloc, etc */
237#include <string.h>	/* needed for memset */
238
239/* allocate initial stack or double stack size, up to YYMAXDEPTH */
240static int yygrowstack(YYSTACKDATA *data)
241{
242    int i;
243    unsigned newsize;
244    YYINT *newss;
245    YYSTYPE *newvs;
246
247    if ((newsize = data->stacksize) == 0)
248        newsize = YYINITSTACKSIZE;
249    else if (newsize >= YYMAXDEPTH)
250        return YYENOMEM;
251    else if ((newsize *= 2) > YYMAXDEPTH)
252        newsize = YYMAXDEPTH;
253
254    i = (int) (data->s_mark - data->s_base);
255    newss = (YYINT *)realloc(data->s_base, newsize * sizeof(*newss));
256    if (newss == 0)
257        return YYENOMEM;
258
259    data->s_base = newss;
260    data->s_mark = newss + i;
261
262    newvs = (YYSTYPE *)realloc(data->l_base, newsize * sizeof(*newvs));
263    if (newvs == 0)
264        return YYENOMEM;
265
266    data->l_base = newvs;
267    data->l_mark = newvs + i;
268
269    data->stacksize = newsize;
270    data->s_last = data->s_base + newsize - 1;
271    return 0;
272}
273
274#if YYPURE || defined(YY_NO_LEAKS)
275static void yyfreestack(YYSTACKDATA *data)
276{
277    free(data->s_base);
278    free(data->l_base);
279    memset(data, 0, sizeof(*data));
280}
281#else
282#define yyfreestack(data) /* nothing */
283#endif
284
285#define YYABORT  goto yyabort
286#define YYREJECT goto yyabort
287#define YYACCEPT goto yyaccept
288#define YYERROR  goto yyerrlab
289
290int
291YYPARSE_DECL()
292{
293    int yym, yyn, yystate;
294#if YYDEBUG
295    const char *yys;
296
297    if ((yys = getenv("YYDEBUG")) != 0)
298    {
299        yyn = *yys;
300        if (yyn >= '0' && yyn <= '9')
301            yydebug = yyn - '0';
302    }
303#endif
304
305    yynerrs = 0;
306    yyerrflag = 0;
307    yychar = YYEMPTY;
308    yystate = 0;
309
310#if YYPURE
311    memset(&yystack, 0, sizeof(yystack));
312#endif
313
314    if (yystack.s_base == NULL && yygrowstack(&yystack) == YYENOMEM) goto yyoverflow;
315    yystack.s_mark = yystack.s_base;
316    yystack.l_mark = yystack.l_base;
317    yystate = 0;
318    *yystack.s_mark = 0;
319
320yyloop:
321    if ((yyn = yydefred[yystate]) != 0) goto yyreduce;
322    if (yychar < 0)
323    {
324        if ((yychar = YYLEX) < 0) yychar = YYEOF;
325#if YYDEBUG
326        if (yydebug)
327        {
328            yys = yyname[YYTRANSLATE(yychar)];
329            printf("%sdebug: state %d, reading %d (%s)\n",
330                    YYPREFIX, yystate, yychar, yys);
331        }
332#endif
333    }
334    if ((yyn = yysindex[yystate]) && (yyn += yychar) >= 0 &&
335            yyn <= YYTABLESIZE && yycheck[yyn] == yychar)
336    {
337#if YYDEBUG
338        if (yydebug)
339            printf("%sdebug: state %d, shifting to state %d\n",
340                    YYPREFIX, yystate, yytable[yyn]);
341#endif
342        if (yystack.s_mark >= yystack.s_last && yygrowstack(&yystack) == YYENOMEM)
343        {
344            goto yyoverflow;
345        }
346        yystate = yytable[yyn];
347        *++yystack.s_mark = yytable[yyn];
348        *++yystack.l_mark = yylval;
349        yychar = YYEMPTY;
350        if (yyerrflag > 0)  --yyerrflag;
351        goto yyloop;
352    }
353    if ((yyn = yyrindex[yystate]) && (yyn += yychar) >= 0 &&
354            yyn <= YYTABLESIZE && yycheck[yyn] == yychar)
355    {
356        yyn = yytable[yyn];
357        goto yyreduce;
358    }
359    if (yyerrflag) goto yyinrecovery;
360
361    YYERROR_CALL("syntax error");
362
363    goto yyerrlab;
364
365yyerrlab:
366    ++yynerrs;
367
368yyinrecovery:
369    if (yyerrflag < 3)
370    {
371        yyerrflag = 3;
372        for (;;)
373        {
374            if ((yyn = yysindex[*yystack.s_mark]) && (yyn += YYERRCODE) >= 0 &&
375                    yyn <= YYTABLESIZE && yycheck[yyn] == YYERRCODE)
376            {
377#if YYDEBUG
378                if (yydebug)
379                    printf("%sdebug: state %d, error recovery shifting\
380 to state %d\n", YYPREFIX, *yystack.s_mark, yytable[yyn]);
381#endif
382                if (yystack.s_mark >= yystack.s_last && yygrowstack(&yystack) == YYENOMEM)
383                {
384                    goto yyoverflow;
385                }
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            yys = yyname[YYTRANSLATE(yychar)];
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)
427        yyval = yystack.l_mark[1-yym];
428    else
429        memset(&yyval, 0, sizeof yyval);
430    switch (yyn)
431    {
432    }
433    yystack.s_mark -= yym;
434    yystate = *yystack.s_mark;
435    yystack.l_mark -= yym;
436    yym = yylhs[yyn];
437    if (yystate == 0 && yym == 0)
438    {
439#if YYDEBUG
440        if (yydebug)
441            printf("%sdebug: after reduction, shifting from state 0 to\
442 state %d\n", YYPREFIX, YYFINAL);
443#endif
444        yystate = YYFINAL;
445        *++yystack.s_mark = YYFINAL;
446        *++yystack.l_mark = yyval;
447        if (yychar < 0)
448        {
449            if ((yychar = YYLEX) < 0) yychar = YYEOF;
450#if YYDEBUG
451            if (yydebug)
452            {
453                yys = yyname[YYTRANSLATE(yychar)];
454                printf("%sdebug: state %d, reading %d (%s)\n",
455                        YYPREFIX, YYFINAL, yychar, yys);
456            }
457#endif
458        }
459        if (yychar == YYEOF) goto yyaccept;
460        goto yyloop;
461    }
462    if ((yyn = yygindex[yym]) && (yyn += yystate) >= 0 &&
463            yyn <= YYTABLESIZE && yycheck[yyn] == yystate)
464        yystate = yytable[yyn];
465    else
466        yystate = yydgoto[yym];
467#if YYDEBUG
468    if (yydebug)
469        printf("%sdebug: after reduction, shifting from state %d \
470to state %d\n", YYPREFIX, *yystack.s_mark, yystate);
471#endif
472    if (yystack.s_mark >= yystack.s_last && yygrowstack(&yystack) == YYENOMEM)
473    {
474        goto yyoverflow;
475    }
476    *++yystack.s_mark = (YYINT) yystate;
477    *++yystack.l_mark = yyval;
478    goto yyloop;
479
480yyoverflow:
481    YYERROR_CALL("yacc stack overflow");
482
483yyabort:
484    yyfreestack(&yystack);
485    return (1);
486
487yyaccept:
488    yyfreestack(&yystack);
489    return (0);
490}
491