Initial import, 0.1 + pk 0.2.4-B1

[unix-history] / usr.bin / yacc / test / error.tab.c

#ifndef lint
char yysccsid[] = "@(#)yaccpar  1.3 (Berkeley) 01/21/90";
#endif
#define YYERRCODE 256
short yylhs[] = {                                        -1,
   0,
};
short yylen[] = {                                         2,
   1,
};
short yydefred[] = {                                      0,
   1,    0,
};
short yydgoto[] = {                                       2,
};
short yysindex[] = {                                   -256,
   0,    0,
};
short yyrindex[] = {                                      0,
   0,    0,
};
short yygindex[] = {                                      0,
};
#define YYTABLESIZE 0
short yytable[] = {                                       1,
};
short yycheck[] = {                                     256,
};
#define YYFINAL 2
#ifndef YYDEBUG
#define YYDEBUG 0
#endif
#define YYMAXTOKEN 0
#if YYDEBUG
char *yyname[] = {
"end-of-file",
};
char *yyrule[] = {
"$accept : S",
"S : error",
};
#endif
#ifndef YYSTYPE
typedef int YYSTYPE;
#endif
#define yyclearin (yychar=(-1))
#define yyerrok (yyerrflag=0)
#ifndef YYSTACKSIZE
#ifdef YYMAXDEPTH
#define YYSTACKSIZE YYMAXDEPTH
#else
#define YYSTACKSIZE 300
#endif
#endif
int yydebug;
int yynerrs;
int yyerrflag;
int yychar;
short *yyssp;
YYSTYPE *yyvsp;
YYSTYPE yyval;
YYSTYPE yylval;
#define yystacksize YYSTACKSIZE
short yyss[YYSTACKSIZE];
YYSTYPE yyvs[YYSTACKSIZE];
#line 4 "error.y"
main(){printf("yyparse() = %d\n",yyparse());}
yylex(){return-1;}
yyerror(s)char*s;{printf("%s\n",s);}
#line 70 "error.tab.c"
#define YYABORT goto yyabort
#define YYACCEPT goto yyaccept
#define YYERROR goto yyerrlab
int
yyparse()
{
   register int yym, yyn, yystate;
#if YYDEBUG
   register char *yys;
   extern char *getenv();

   if (yys = getenv("YYDEBUG"))
   {
       yyn = *yys;
       if (yyn == '0')
           yydebug = 0;
       else if (yyn >= '1' && yyn <= '9')
           yydebug = yyn - '0';
   }
#endif

   yynerrs = 0;
   yyerrflag = 0;
   yychar = (-1);

   yyssp = yyss;
   yyvsp = yyvs;
   *yyssp = yystate = 0;

yyloop:
   if (yyn = yydefred[yystate]) goto yyreduce;
   if (yychar < 0)
   {
       if ((yychar = yylex()) < 0) yychar = 0;
#if YYDEBUG
       if (yydebug)
       {
           yys = 0;
           if (yychar <= YYMAXTOKEN) yys = yyname[yychar];
           if (!yys) yys = "illegal-symbol";
           printf("yydebug: state %d, reading %d (%s)\n", yystate,
                   yychar, yys);
       }
#endif
   }
   if ((yyn = yysindex[yystate]) && (yyn += yychar) >= 0 &&
           yyn <= YYTABLESIZE && yycheck[yyn] == yychar)
   {
#if YYDEBUG
       if (yydebug)
           printf("yydebug: state %d, shifting to state %d\n",
                   yystate, yytable[yyn]);
#endif
       if (yyssp >= yyss + yystacksize - 1)
       {
           goto yyoverflow;
       }
       *++yyssp = yystate = yytable[yyn];
       *++yyvsp = yylval;
       yychar = (-1);
       if (yyerrflag > 0)  --yyerrflag;
       goto yyloop;
   }
   if ((yyn = yyrindex[yystate]) && (yyn += yychar) >= 0 &&
           yyn <= YYTABLESIZE && yycheck[yyn] == yychar)
   {
       yyn = yytable[yyn];
       goto yyreduce;
   }
   if (yyerrflag) goto yyinrecovery;
#ifdef lint
   goto yynewerror;
#endif
yynewerror:
   yyerror("syntax error");
#ifdef lint
   goto yyerrlab;
#endif
yyerrlab:
   ++yynerrs;
yyinrecovery:
   if (yyerrflag < 3)
   {
       yyerrflag = 3;
       for (;;)
       {
           if ((yyn = yysindex[*yyssp]) && (yyn += YYERRCODE) >= 0 &&
                   yyn <= YYTABLESIZE && yycheck[yyn] == YYERRCODE)
           {
#if YYDEBUG
               if (yydebug)
                   printf("yydebug: state %d, error recovery shifting\
to state %d\n", *yyssp, yytable[yyn]);
#endif
               if (yyssp >= yyss + yystacksize - 1)
               {
                   goto yyoverflow;
               }
               *++yyssp = yystate = yytable[yyn];
               *++yyvsp = yylval;
               goto yyloop;
           }
           else
           {
#if YYDEBUG
               if (yydebug)
                   printf("yydebug: error recovery discarding state %d\n",
                           *yyssp);
#endif
               if (yyssp <= yyss) goto yyabort;
               --yyssp;
               --yyvsp;
           }
       }
   }
   else
   {
       if (yychar == 0) goto yyabort;
#if YYDEBUG
       if (yydebug)
       {
           yys = 0;
           if (yychar <= YYMAXTOKEN) yys = yyname[yychar];
           if (!yys) yys = "illegal-symbol";
           printf("yydebug: state %d, error recovery discards token %d (%s)\n",
                   yystate, yychar, yys);
       }
#endif
       yychar = (-1);
       goto yyloop;
   }
yyreduce:
#if YYDEBUG
   if (yydebug)
       printf("yydebug: state %d, reducing by rule %d (%s)\n",
               yystate, yyn, yyrule[yyn]);
#endif
   yym = yylen[yyn];
   yyval = yyvsp[1-yym];
   switch (yyn)
   {
   }
   yyssp -= yym;
   yystate = *yyssp;
   yyvsp -= yym;
   yym = yylhs[yyn];
   if (yystate == 0 && yym == 0)
   {
#ifdef YYDEBUG
       if (yydebug)
           printf("yydebug: after reduction, shifting from state 0 to\
state %d\n", YYFINAL);
#endif
       yystate = YYFINAL;
       *++yyssp = YYFINAL;
       *++yyvsp = yyval;
       if (yychar < 0)
       {
           if ((yychar = yylex()) < 0) yychar = 0;
#if YYDEBUG
           if (yydebug)
           {
               yys = 0;
               if (yychar <= YYMAXTOKEN) yys = yyname[yychar];
               if (!yys) yys = "illegal-symbol";
               printf("yydebug: state %d, reading %d (%s)\n",
                       YYFINAL, yychar, yys);
           }
#endif
       }
       if (yychar == 0) goto yyaccept;
       goto yyloop;
   }
   if ((yyn = yygindex[yym]) && (yyn += yystate) >= 0 &&
           yyn <= YYTABLESIZE && yycheck[yyn] == yystate)
       yystate = yytable[yyn];
   else
       yystate = yydgoto[yym];
#ifdef YYDEBUG
   if (yydebug)
       printf("yydebug: after reduction, shifting from state %d \
to state %d\n", *yyssp, yystate);
#endif
   if (yyssp >= yyss + yystacksize - 1)
   {
       goto yyoverflow;
   }
   *++yyssp = yystate;
   *++yyvsp = yyval;
   goto yyloop;
yyoverflow:
   yyerror("yacc stack overflow");
yyabort:
   return (1);
yyaccept:
   return (0);
}