y_tab.c

《编译方法》课程设计内容２．《编译方法》课程设计内容

    }
    if ((yyn = yysindex[yystate]) && (yyn += yychar) >= 0 &&
            yyn <= YYTABLESIZE && yycheck[yyn] == yychar)
    {
#if YYDEBUG
        if (yydebug)
            if (5 > yydebug)
                printf("yydebug: state %d, shifting to state %d\n",
                        yystate, yytable[yyn]);
            else
                YYDEBUG_SHIFT_LEXEME(yystate, yytable[yyn], yys, yyssp-yyss);
#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)
                    if (5 > yydebug)
                        printf("yydebug: state %d, error recovery shifting\
 to state %d\n", *yyssp, yytable[yyn]);
                    else
                        YYDEBUG_SHIFT_ERROR_LEXEME(*yyssp, yytable[yyn], yyssp-yyss);
#endif
                if (yyssp >= yyss + yystacksize - 1)
                {
                    goto yyoverflow;
                }
                *++yyssp = yystate = yytable[yyn];
                *++yyvsp = yylval;
                goto yyloop;
            }
            else
            {
#if YYDEBUG
                if (yydebug)
                    if (5 > yydebug)
                        printf("yydebug: error recovery discarding state %d\n",
                            *yyssp);
                    else
                        YYDEBUG_DISCARD_STATE(*yyssp, yyssp-yyss-1);
#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";
            if (5 > yydebug)
                printf("yydebug: state %d, error recovery discards token %d (%s)\n",
                    yystate, yychar, yys);
            else 
                YYDEBUG_DISCARD_TOKEN(yystate, yychar, yys, yyssp-yyss);
        }
#endif
        yychar = (-1);
        goto yyloop;
    }
yyreduce:
    yym = yylen[yyn];
    yyval = yyvsp[1-yym];
#if YYDEBUG
    if (yydebug)
        if (5 > yydebug)
            printf("yydebug: state %d, reducing by rule %d (%s)\n",
                    yystate, yyn, yyrule[yyn]);
        else
            YYDEBUG_REDUCE(yystate, yyn, yyrule[yyn], yyssp-yyss-yym, yym);
#endif
    switch (yyn)
    {
case 4:
#line 70 "vas.y"
{
			labtab[yyvsp[-3]] = pc ;
		}
break;
case 5:
#line 74 "vas.y"
{
			labtab[yyvsp[-5]] = pc ;
		}
break;
case 7:
#line 80 "vas.y"
{ yyval = yyvsp[0] ; }
break;
case 9:
#line 84 "vas.y"
{yyval = -yyvsp[0];}
break;
case 10:
#line 86 "vas.y"
{
			yyval = yyvsp[-1] * 10 + yyvsp[0] ;
		}
break;
case 12:
#line 92 "vas.y"
{ yyval = 0x0 ; }
break;
case 13:
#line 93 "vas.y"
{ yyval = 0x1 ; }
break;
case 14:
#line 94 "vas.y"
{ yyval = 0x2 ; }
break;
case 15:
#line 95 "vas.y"
{ yyval = 0x3 ; }
break;
case 16:
#line 96 "vas.y"
{ yyval = 0x4 ; }
break;
case 17:
#line 97 "vas.y"
{ yyval = 0x5 ; }
break;
case 18:
#line 98 "vas.y"
{ yyval = 0x6 ; }
break;
case 19:
#line 99 "vas.y"
{ yyval = 0x7 ; }
break;
case 20:
#line 100 "vas.y"
{ yyval = 0x8 ; }
break;
case 21:
#line 101 "vas.y"
{ yyval = 0x9 ; }
break;
case 42:
#line 129 "vas.y"
{ pbyte( I_HALT ) ; }
break;
case 43:
#line 132 "vas.y"
{ pbyte( I_NOP ) ; }
break;
case 44:
#line 135 "vas.y"
{ pbyte( I_TRAP ) ; }
break;
case 45:
#line 139 "vas.y"
{
			pbyte( I_ADD ) ;
			pbyte( (yyvsp[-2] << 4) | yyvsp[0] ) ;
		}
break;
case 46:
#line 146 "vas.y"
{
			pbyte( I_SUB ) ;
			pbyte( (yyvsp[-2] << 4) | yyvsp[0] ) ;
		}
break;
case 47:
#line 153 "vas.y"
{
			pbyte( I_MUL ) ;
			pbyte( (yyvsp[-2] << 4) | yyvsp[0] ) ;
		}
break;
case 48:
#line 160 "vas.y"
{
			pbyte( I_DIV ) ;
			pbyte( (yyvsp[-2] << 4) | yyvsp[0] ) ;
		}
break;
case 49:
#line 167 "vas.y"
{
			pbyte( I_STI ) ;
			pbyte( (yyvsp[-5] << 4) | yyvsp[-1] ) ;
			pword( yyvsp[-3] ) ;
		}
break;
case 50:
#line 173 "vas.y"
{
			pbyte( I_STI ) ;
			pbyte( yyvsp[-2] << 4 ) ;
			pword( labtab[yyvsp[0]] ) ;
		}
break;
case 51:
#line 181 "vas.y"
{
			pbyte( I_LDI ) ;
			pbyte( (yyvsp[-3] << 4) | yyvsp[0] ) ;
			pword( yyvsp[-5] ) ;
		}
break;
case 52:
#line 187 "vas.y"
{
			pbyte( I_LDI ) ;
			pbyte( yyvsp[0] ) ;
			pword( labtab[yyvsp[-2]] ) ;
		}
break;
case 53:
#line 195 "vas.y"
{
			pbyte( I_LDA ) ;
			pbyte( (yyvsp[-3] << 4) | yyvsp[0] ) ;
			pword( yyvsp[-5] ) ;
		}
break;
case 54:
#line 201 "vas.y"
{
			pbyte( I_LDA ) ;
			pbyte( yyvsp[0] ) ;
			pword( labtab[yyvsp[-2]] ) ;
		}
break;
case 55:
#line 209 "vas.y"
{
			pbyte( I_LDR ) ;
			pbyte( (yyvsp[-2] << 4) | yyvsp[0] ) ;
		}
break;
case 56:
#line 216 "vas.y"
{
			pbyte( I_BZE ) ;
			pword( yyvsp[0] ) ;
		}
break;
case 57:
#line 221 "vas.y"
{
			pbyte( I_BZE ) ;
			pword( labtab[yyvsp[0]] - pc + 1 ) ;
		}
break;
case 58:
#line 228 "vas.y"
{
			pbyte( I_BNZ ) ;
			pword( yyvsp[0] ) ;
		}
break;
case 59:
#line 233 "vas.y"
{
			pbyte( I_BNZ ) ;
			pword( labtab[yyvsp[0]] - pc + 1 ) ;
		}
break;
case 60:
#line 240 "vas.y"
{
			pbyte( I_BRA ) ;
			pword( yyvsp[0] ) ;
		}
break;
case 61:
#line 245 "vas.y"
{
			pbyte( I_BRA ) ;
			pword( labtab[yyvsp[0]] - pc + 1 ) ;
		}
break;
case 62:
#line 252 "vas.y"
{
			pbyte( I_BAL ) ;
			pbyte( (yyvsp[-2] << 4) | yyvsp[0] ) ;
		}
break;
case 63:
#line 259 "vas.y"
{
			pbyte( yyvsp[0] ) ;
		}
break;
case 80:
#line 312 "vas.y"
{ yyval = yyvsp[0] ; }
break;
#line 1120 "y_tab.c"
    }
    yyssp -= yym;
    yystate = *yyssp;
    yyvsp -= yym;
    yym = yylhs[yyn];
    if (yystate == 0 && yym == 0)
    {
#if YYDEBUG
        if (yydebug && 5 > 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";
                if (5 > yydebug)
                    printf("yydebug: state %d, reading %d (%s)\n",
                        YYFINAL, yychar, yys);
                else
                    YYDEBUG_LOOK_AHEAD(YYFINAL, yychar, yys, yyssp-yyss);
            }
#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];
#if YYDEBUG
    if (yydebug && 5 > 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);
}