1*b53bb29fSJung-uk Kim /* original parser id follows */ 2*b53bb29fSJung-uk Kim /* yysccsid[] = "@(#)yaccpar 1.9 (Berkeley) 02/21/93" */ 3*b53bb29fSJung-uk Kim /* (use YYMAJOR/YYMINOR for ifdefs dependent on parser version) */ 4*b53bb29fSJung-uk Kim 5*b53bb29fSJung-uk Kim #define YYBYACC 1 6*b53bb29fSJung-uk Kim #define YYMAJOR 1 7*b53bb29fSJung-uk Kim #define YYMINOR 9 8*b53bb29fSJung-uk Kim #define YYCHECK "yyyymmdd" 9*b53bb29fSJung-uk Kim 10*b53bb29fSJung-uk Kim #define YYEMPTY (-1) 11*b53bb29fSJung-uk Kim #define yyclearin (yychar = YYEMPTY) 12*b53bb29fSJung-uk Kim #define yyerrok (yyerrflag = 0) 13*b53bb29fSJung-uk Kim #define YYRECOVERING() (yyerrflag != 0) 14*b53bb29fSJung-uk Kim #define YYENOMEM (-2) 15*b53bb29fSJung-uk Kim #define YYEOF 0 16*b53bb29fSJung-uk Kim 17*b53bb29fSJung-uk Kim /* %code "top" block start */ 18*b53bb29fSJung-uk Kim #line 5 "calc_code_all.y" 19*b53bb29fSJung-uk Kim /* CODE-TOP */ 20*b53bb29fSJung-uk Kim /* %code "top" block end */ 21*b53bb29fSJung-uk Kim #line 22 "calc_code_all.tab.c" 22*b53bb29fSJung-uk Kim #undef YYBTYACC 23*b53bb29fSJung-uk Kim #define YYBTYACC 0 24*b53bb29fSJung-uk Kim #define YYDEBUGSTR YYPREFIX "debug" 25*b53bb29fSJung-uk Kim 26*b53bb29fSJung-uk Kim #ifndef yyparse 27*b53bb29fSJung-uk Kim #define yyparse calc_code_all_parse 28*b53bb29fSJung-uk Kim #endif /* yyparse */ 29*b53bb29fSJung-uk Kim 30*b53bb29fSJung-uk Kim #ifndef yylex 31*b53bb29fSJung-uk Kim #define yylex calc_code_all_lex 32*b53bb29fSJung-uk Kim #endif /* yylex */ 33*b53bb29fSJung-uk Kim 34*b53bb29fSJung-uk Kim #ifndef yyerror 35*b53bb29fSJung-uk Kim #define yyerror calc_code_all_error 36*b53bb29fSJung-uk Kim #endif /* yyerror */ 37*b53bb29fSJung-uk Kim 38*b53bb29fSJung-uk Kim #ifndef yychar 39*b53bb29fSJung-uk Kim #define yychar calc_code_all_char 40*b53bb29fSJung-uk Kim #endif /* yychar */ 41*b53bb29fSJung-uk Kim 42*b53bb29fSJung-uk Kim #ifndef yyval 43*b53bb29fSJung-uk Kim #define yyval calc_code_all_val 44*b53bb29fSJung-uk Kim #endif /* yyval */ 45*b53bb29fSJung-uk Kim 46*b53bb29fSJung-uk Kim #ifndef yylval 47*b53bb29fSJung-uk Kim #define yylval calc_code_all_lval 48*b53bb29fSJung-uk Kim #endif /* yylval */ 49*b53bb29fSJung-uk Kim 50*b53bb29fSJung-uk Kim #ifndef yydebug 51*b53bb29fSJung-uk Kim #define yydebug calc_code_all_debug 52*b53bb29fSJung-uk Kim #endif /* yydebug */ 53*b53bb29fSJung-uk Kim 54*b53bb29fSJung-uk Kim #ifndef yynerrs 55*b53bb29fSJung-uk Kim #define yynerrs calc_code_all_nerrs 56*b53bb29fSJung-uk Kim #endif /* yynerrs */ 57*b53bb29fSJung-uk Kim 58*b53bb29fSJung-uk Kim #ifndef yyerrflag 59*b53bb29fSJung-uk Kim #define yyerrflag calc_code_all_errflag 60*b53bb29fSJung-uk Kim #endif /* yyerrflag */ 61*b53bb29fSJung-uk Kim 62*b53bb29fSJung-uk Kim #ifndef yylhs 63*b53bb29fSJung-uk Kim #define yylhs calc_code_all_lhs 64*b53bb29fSJung-uk Kim #endif /* yylhs */ 65*b53bb29fSJung-uk Kim 66*b53bb29fSJung-uk Kim #ifndef yylen 67*b53bb29fSJung-uk Kim #define yylen calc_code_all_len 68*b53bb29fSJung-uk Kim #endif /* yylen */ 69*b53bb29fSJung-uk Kim 70*b53bb29fSJung-uk Kim #ifndef yydefred 71*b53bb29fSJung-uk Kim #define yydefred calc_code_all_defred 72*b53bb29fSJung-uk Kim #endif /* yydefred */ 73*b53bb29fSJung-uk Kim 74*b53bb29fSJung-uk Kim #ifndef yystos 75*b53bb29fSJung-uk Kim #define yystos calc_code_all_stos 76*b53bb29fSJung-uk Kim #endif /* yystos */ 77*b53bb29fSJung-uk Kim 78*b53bb29fSJung-uk Kim #ifndef yydgoto 79*b53bb29fSJung-uk Kim #define yydgoto calc_code_all_dgoto 80*b53bb29fSJung-uk Kim #endif /* yydgoto */ 81*b53bb29fSJung-uk Kim 82*b53bb29fSJung-uk Kim #ifndef yysindex 83*b53bb29fSJung-uk Kim #define yysindex calc_code_all_sindex 84*b53bb29fSJung-uk Kim #endif /* yysindex */ 85*b53bb29fSJung-uk Kim 86*b53bb29fSJung-uk Kim #ifndef yyrindex 87*b53bb29fSJung-uk Kim #define yyrindex calc_code_all_rindex 88*b53bb29fSJung-uk Kim #endif /* yyrindex */ 89*b53bb29fSJung-uk Kim 90*b53bb29fSJung-uk Kim #ifndef yygindex 91*b53bb29fSJung-uk Kim #define yygindex calc_code_all_gindex 92*b53bb29fSJung-uk Kim #endif /* yygindex */ 93*b53bb29fSJung-uk Kim 94*b53bb29fSJung-uk Kim #ifndef yytable 95*b53bb29fSJung-uk Kim #define yytable calc_code_all_table 96*b53bb29fSJung-uk Kim #endif /* yytable */ 97*b53bb29fSJung-uk Kim 98*b53bb29fSJung-uk Kim #ifndef yycheck 99*b53bb29fSJung-uk Kim #define yycheck calc_code_all_check 100*b53bb29fSJung-uk Kim #endif /* yycheck */ 101*b53bb29fSJung-uk Kim 102*b53bb29fSJung-uk Kim #ifndef yyname 103*b53bb29fSJung-uk Kim #define yyname calc_code_all_name 104*b53bb29fSJung-uk Kim #endif /* yyname */ 105*b53bb29fSJung-uk Kim 106*b53bb29fSJung-uk Kim #ifndef yyrule 107*b53bb29fSJung-uk Kim #define yyrule calc_code_all_rule 108*b53bb29fSJung-uk Kim #endif /* yyrule */ 109*b53bb29fSJung-uk Kim 110*b53bb29fSJung-uk Kim #if YYBTYACC 111*b53bb29fSJung-uk Kim 112*b53bb29fSJung-uk Kim #ifndef yycindex 113*b53bb29fSJung-uk Kim #define yycindex calc_code_all_cindex 114*b53bb29fSJung-uk Kim #endif /* yycindex */ 115*b53bb29fSJung-uk Kim 116*b53bb29fSJung-uk Kim #ifndef yyctable 117*b53bb29fSJung-uk Kim #define yyctable calc_code_all_ctable 118*b53bb29fSJung-uk Kim #endif /* yyctable */ 119*b53bb29fSJung-uk Kim 120*b53bb29fSJung-uk Kim #endif /* YYBTYACC */ 121*b53bb29fSJung-uk Kim 122*b53bb29fSJung-uk Kim #define YYPREFIX "calc_code_all_" 123*b53bb29fSJung-uk Kim 124*b53bb29fSJung-uk Kim #define YYPURE 0 125*b53bb29fSJung-uk Kim 126*b53bb29fSJung-uk Kim #line 9 "calc_code_all.y" 127*b53bb29fSJung-uk Kim # include <stdio.h> 128*b53bb29fSJung-uk Kim # include <ctype.h> 129*b53bb29fSJung-uk Kim 130*b53bb29fSJung-uk Kim int regs[26]; 131*b53bb29fSJung-uk Kim int base; 132*b53bb29fSJung-uk Kim 133*b53bb29fSJung-uk Kim extern int yylex(void); 134*b53bb29fSJung-uk Kim static void yyerror(const char *s); 135*b53bb29fSJung-uk Kim 136*b53bb29fSJung-uk Kim #line 137 "calc_code_all.tab.c" 137*b53bb29fSJung-uk Kim 138*b53bb29fSJung-uk Kim #if ! defined(YYSTYPE) && ! defined(YYSTYPE_IS_DECLARED) 139*b53bb29fSJung-uk Kim /* Default: YYSTYPE is the semantic value type. */ 140*b53bb29fSJung-uk Kim typedef int YYSTYPE; 141*b53bb29fSJung-uk Kim # define YYSTYPE_IS_DECLARED 1 142*b53bb29fSJung-uk Kim #endif 143*b53bb29fSJung-uk Kim 144*b53bb29fSJung-uk Kim /* compatibility with bison */ 145*b53bb29fSJung-uk Kim #ifdef YYPARSE_PARAM 146*b53bb29fSJung-uk Kim /* compatibility with FreeBSD */ 147*b53bb29fSJung-uk Kim # ifdef YYPARSE_PARAM_TYPE 148*b53bb29fSJung-uk Kim # define YYPARSE_DECL() yyparse(YYPARSE_PARAM_TYPE YYPARSE_PARAM) 149*b53bb29fSJung-uk Kim # else 150*b53bb29fSJung-uk Kim # define YYPARSE_DECL() yyparse(void *YYPARSE_PARAM) 151*b53bb29fSJung-uk Kim # endif 152*b53bb29fSJung-uk Kim #else 153*b53bb29fSJung-uk Kim # define YYPARSE_DECL() yyparse(void) 154*b53bb29fSJung-uk Kim #endif 155*b53bb29fSJung-uk Kim 156*b53bb29fSJung-uk Kim /* Parameters sent to lex. */ 157*b53bb29fSJung-uk Kim #ifdef YYLEX_PARAM 158*b53bb29fSJung-uk Kim # define YYLEX_DECL() yylex(void *YYLEX_PARAM) 159*b53bb29fSJung-uk Kim # define YYLEX yylex(YYLEX_PARAM) 160*b53bb29fSJung-uk Kim #else 161*b53bb29fSJung-uk Kim # define YYLEX_DECL() yylex(void) 162*b53bb29fSJung-uk Kim # define YYLEX yylex() 163*b53bb29fSJung-uk Kim #endif 164*b53bb29fSJung-uk Kim 165*b53bb29fSJung-uk Kim /* Parameters sent to yyerror. */ 166*b53bb29fSJung-uk Kim #ifndef YYERROR_DECL 167*b53bb29fSJung-uk Kim #define YYERROR_DECL() yyerror(const char *s) 168*b53bb29fSJung-uk Kim #endif 169*b53bb29fSJung-uk Kim #ifndef YYERROR_CALL 170*b53bb29fSJung-uk Kim #define YYERROR_CALL(msg) yyerror(msg) 171*b53bb29fSJung-uk Kim #endif 172*b53bb29fSJung-uk Kim 173*b53bb29fSJung-uk Kim extern int YYPARSE_DECL(); 174*b53bb29fSJung-uk Kim 175*b53bb29fSJung-uk Kim #define DIGIT 257 176*b53bb29fSJung-uk Kim #define LETTER 258 177*b53bb29fSJung-uk Kim #define UMINUS 259 178*b53bb29fSJung-uk Kim #define YYERRCODE 256 179*b53bb29fSJung-uk Kim typedef int YYINT; 180*b53bb29fSJung-uk Kim static const YYINT calc_code_all_lhs[] = { -1, 181*b53bb29fSJung-uk Kim 0, 0, 0, 1, 1, 2, 2, 2, 2, 2, 182*b53bb29fSJung-uk Kim 2, 2, 2, 2, 2, 2, 3, 3, 183*b53bb29fSJung-uk Kim }; 184*b53bb29fSJung-uk Kim static const YYINT calc_code_all_len[] = { 2, 185*b53bb29fSJung-uk Kim 0, 3, 3, 1, 3, 3, 3, 3, 3, 3, 186*b53bb29fSJung-uk Kim 3, 3, 3, 2, 1, 1, 1, 2, 187*b53bb29fSJung-uk Kim }; 188*b53bb29fSJung-uk Kim static const YYINT calc_code_all_defred[] = { 1, 189*b53bb29fSJung-uk Kim 0, 0, 17, 0, 0, 0, 0, 0, 0, 3, 190*b53bb29fSJung-uk Kim 0, 15, 14, 0, 2, 0, 0, 0, 0, 0, 191*b53bb29fSJung-uk Kim 0, 0, 18, 0, 6, 0, 0, 0, 0, 9, 192*b53bb29fSJung-uk Kim 10, 11, 193*b53bb29fSJung-uk Kim }; 194*b53bb29fSJung-uk Kim #if defined(YYDESTRUCT_CALL) || defined(YYSTYPE_TOSTRING) 195*b53bb29fSJung-uk Kim static const YYINT calc_code_all_stos[] = { 0, 196*b53bb29fSJung-uk Kim 261, 256, 257, 258, 45, 40, 262, 263, 264, 10, 197*b53bb29fSJung-uk Kim 61, 258, 263, 263, 10, 124, 38, 43, 45, 42, 198*b53bb29fSJung-uk Kim 47, 37, 257, 263, 41, 263, 263, 263, 263, 263, 199*b53bb29fSJung-uk Kim 263, 263, 200*b53bb29fSJung-uk Kim }; 201*b53bb29fSJung-uk Kim #endif /* YYDESTRUCT_CALL || YYSTYPE_TOSTRING */ 202*b53bb29fSJung-uk Kim static const YYINT calc_code_all_dgoto[] = { 1, 203*b53bb29fSJung-uk Kim 7, 8, 9, 204*b53bb29fSJung-uk Kim }; 205*b53bb29fSJung-uk Kim static const YYINT calc_code_all_sindex[] = { 0, 206*b53bb29fSJung-uk Kim -40, -7, 0, -55, -38, -38, 1, -29, -247, 0, 207*b53bb29fSJung-uk Kim -38, 0, 0, 22, 0, -38, -38, -38, -38, -38, 208*b53bb29fSJung-uk Kim -38, -38, 0, -29, 0, 51, 60, -20, -20, 0, 209*b53bb29fSJung-uk Kim 0, 0, 210*b53bb29fSJung-uk Kim }; 211*b53bb29fSJung-uk Kim static const YYINT calc_code_all_rindex[] = { 0, 212*b53bb29fSJung-uk Kim 0, 0, 0, 2, 0, 0, 0, 9, -9, 0, 213*b53bb29fSJung-uk Kim 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 214*b53bb29fSJung-uk Kim 0, 0, 0, 10, 0, -6, 14, 5, 13, 0, 215*b53bb29fSJung-uk Kim 0, 0, 216*b53bb29fSJung-uk Kim }; 217*b53bb29fSJung-uk Kim #if YYBTYACC 218*b53bb29fSJung-uk Kim static const YYINT calc_code_all_cindex[] = { 0, 219*b53bb29fSJung-uk Kim 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 220*b53bb29fSJung-uk Kim 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 221*b53bb29fSJung-uk Kim 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 222*b53bb29fSJung-uk Kim 0, 0, 223*b53bb29fSJung-uk Kim }; 224*b53bb29fSJung-uk Kim #endif 225*b53bb29fSJung-uk Kim static const YYINT calc_code_all_gindex[] = { 0, 226*b53bb29fSJung-uk Kim 0, 65, 0, 227*b53bb29fSJung-uk Kim }; 228*b53bb29fSJung-uk Kim #define YYTABLESIZE 220 229*b53bb29fSJung-uk Kim static const YYINT calc_code_all_table[] = { 6, 230*b53bb29fSJung-uk Kim 16, 6, 10, 13, 5, 11, 5, 22, 17, 23, 231*b53bb29fSJung-uk Kim 15, 15, 20, 18, 7, 19, 22, 21, 4, 5, 232*b53bb29fSJung-uk Kim 0, 20, 8, 12, 0, 0, 21, 16, 16, 0, 233*b53bb29fSJung-uk Kim 0, 16, 16, 16, 13, 16, 0, 16, 15, 15, 234*b53bb29fSJung-uk Kim 0, 0, 7, 15, 15, 7, 15, 7, 15, 7, 235*b53bb29fSJung-uk Kim 8, 12, 0, 8, 12, 8, 0, 8, 22, 17, 236*b53bb29fSJung-uk Kim 0, 0, 25, 20, 18, 0, 19, 0, 21, 13, 237*b53bb29fSJung-uk Kim 14, 0, 0, 0, 0, 24, 0, 0, 0, 0, 238*b53bb29fSJung-uk Kim 26, 27, 28, 29, 30, 31, 32, 22, 17, 0, 239*b53bb29fSJung-uk Kim 0, 0, 20, 18, 16, 19, 22, 21, 0, 0, 240*b53bb29fSJung-uk Kim 0, 20, 18, 0, 19, 0, 21, 0, 0, 0, 241*b53bb29fSJung-uk Kim 0, 0, 0, 0, 16, 0, 0, 13, 0, 0, 242*b53bb29fSJung-uk Kim 0, 0, 0, 0, 0, 15, 0, 0, 7, 0, 243*b53bb29fSJung-uk Kim 0, 0, 0, 0, 0, 0, 8, 12, 0, 0, 244*b53bb29fSJung-uk Kim 0, 0, 0, 0, 0, 16, 0, 0, 0, 0, 245*b53bb29fSJung-uk Kim 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 246*b53bb29fSJung-uk Kim 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 247*b53bb29fSJung-uk Kim 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 248*b53bb29fSJung-uk Kim 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 249*b53bb29fSJung-uk Kim 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 250*b53bb29fSJung-uk Kim 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 251*b53bb29fSJung-uk Kim 0, 0, 0, 0, 0, 2, 3, 4, 3, 12, 252*b53bb29fSJung-uk Kim }; 253*b53bb29fSJung-uk Kim static const YYINT calc_code_all_check[] = { 40, 254*b53bb29fSJung-uk Kim 10, 40, 10, 10, 45, 61, 45, 37, 38, 257, 255*b53bb29fSJung-uk Kim 10, 10, 42, 43, 10, 45, 37, 47, 10, 10, 256*b53bb29fSJung-uk Kim -1, 42, 10, 10, -1, -1, 47, 37, 38, -1, 257*b53bb29fSJung-uk Kim -1, 41, 42, 43, 41, 45, -1, 47, 37, 38, 258*b53bb29fSJung-uk Kim -1, -1, 38, 42, 43, 41, 45, 43, 47, 45, 259*b53bb29fSJung-uk Kim 38, 38, -1, 41, 41, 43, -1, 45, 37, 38, 260*b53bb29fSJung-uk Kim -1, -1, 41, 42, 43, -1, 45, -1, 47, 5, 261*b53bb29fSJung-uk Kim 6, -1, -1, -1, -1, 11, -1, -1, -1, -1, 262*b53bb29fSJung-uk Kim 16, 17, 18, 19, 20, 21, 22, 37, 38, -1, 263*b53bb29fSJung-uk Kim -1, -1, 42, 43, 124, 45, 37, 47, -1, -1, 264*b53bb29fSJung-uk Kim -1, 42, 43, -1, 45, -1, 47, -1, -1, -1, 265*b53bb29fSJung-uk Kim -1, -1, -1, -1, 124, -1, -1, 124, -1, -1, 266*b53bb29fSJung-uk Kim -1, -1, -1, -1, -1, 124, -1, -1, 124, -1, 267*b53bb29fSJung-uk Kim -1, -1, -1, -1, -1, -1, 124, 124, -1, -1, 268*b53bb29fSJung-uk Kim -1, -1, -1, -1, -1, 124, -1, -1, -1, -1, 269*b53bb29fSJung-uk Kim -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 270*b53bb29fSJung-uk Kim -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 271*b53bb29fSJung-uk Kim -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 272*b53bb29fSJung-uk Kim -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 273*b53bb29fSJung-uk Kim -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 274*b53bb29fSJung-uk Kim -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 275*b53bb29fSJung-uk Kim -1, -1, -1, -1, -1, 256, 257, 258, 257, 258, 276*b53bb29fSJung-uk Kim }; 277*b53bb29fSJung-uk Kim #if YYBTYACC 278*b53bb29fSJung-uk Kim static const YYINT calc_code_all_ctable[] = { -1, 279*b53bb29fSJung-uk Kim -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 280*b53bb29fSJung-uk Kim -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 281*b53bb29fSJung-uk Kim -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 282*b53bb29fSJung-uk Kim -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 283*b53bb29fSJung-uk Kim -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 284*b53bb29fSJung-uk Kim -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 285*b53bb29fSJung-uk Kim -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 286*b53bb29fSJung-uk Kim -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 287*b53bb29fSJung-uk Kim -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 288*b53bb29fSJung-uk Kim -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 289*b53bb29fSJung-uk Kim -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 290*b53bb29fSJung-uk Kim -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 291*b53bb29fSJung-uk Kim -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 292*b53bb29fSJung-uk Kim -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 293*b53bb29fSJung-uk Kim -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 294*b53bb29fSJung-uk Kim -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 295*b53bb29fSJung-uk Kim -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 296*b53bb29fSJung-uk Kim -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 297*b53bb29fSJung-uk Kim -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 298*b53bb29fSJung-uk Kim -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 299*b53bb29fSJung-uk Kim -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 300*b53bb29fSJung-uk Kim -1, -1, -1, -1, -1, -1, -1, -1, -1, 301*b53bb29fSJung-uk Kim }; 302*b53bb29fSJung-uk Kim #endif 303*b53bb29fSJung-uk Kim #define YYFINAL 1 304*b53bb29fSJung-uk Kim #ifndef YYDEBUG 305*b53bb29fSJung-uk Kim #define YYDEBUG 0 306*b53bb29fSJung-uk Kim #endif 307*b53bb29fSJung-uk Kim #define YYMAXTOKEN 259 308*b53bb29fSJung-uk Kim #define YYUNDFTOKEN 265 309*b53bb29fSJung-uk Kim #define YYTRANSLATE(a) ((a) > YYMAXTOKEN ? YYUNDFTOKEN : (a)) 310*b53bb29fSJung-uk Kim #if YYDEBUG 311*b53bb29fSJung-uk Kim static const char *const calc_code_all_name[] = { 312*b53bb29fSJung-uk Kim 313*b53bb29fSJung-uk Kim "$end",0,0,0,0,0,0,0,0,0,"'\\n'",0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, 314*b53bb29fSJung-uk Kim 0,0,0,"'%'","'&'",0,"'('","')'","'*'","'+'",0,"'-'",0,"'/'",0,0,0,0,0,0,0,0,0,0, 315*b53bb29fSJung-uk Kim 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, 316*b53bb29fSJung-uk Kim 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, 317*b53bb29fSJung-uk Kim 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,0, 318*b53bb29fSJung-uk Kim 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,0, 319*b53bb29fSJung-uk Kim 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,0, 320*b53bb29fSJung-uk Kim 0,0,"error","DIGIT","LETTER","UMINUS","$accept","list","stat","expr","number", 321*b53bb29fSJung-uk Kim "illegal-symbol", 322*b53bb29fSJung-uk Kim }; 323*b53bb29fSJung-uk Kim static const char *const calc_code_all_rule[] = { 324*b53bb29fSJung-uk Kim "$accept : list", 325*b53bb29fSJung-uk Kim "list :", 326*b53bb29fSJung-uk Kim "list : list stat '\\n'", 327*b53bb29fSJung-uk Kim "list : list error '\\n'", 328*b53bb29fSJung-uk Kim "stat : expr", 329*b53bb29fSJung-uk Kim "stat : LETTER '=' expr", 330*b53bb29fSJung-uk Kim "expr : '(' expr ')'", 331*b53bb29fSJung-uk Kim "expr : expr '+' expr", 332*b53bb29fSJung-uk Kim "expr : expr '-' expr", 333*b53bb29fSJung-uk Kim "expr : expr '*' expr", 334*b53bb29fSJung-uk Kim "expr : expr '/' expr", 335*b53bb29fSJung-uk Kim "expr : expr '%' expr", 336*b53bb29fSJung-uk Kim "expr : expr '&' expr", 337*b53bb29fSJung-uk Kim "expr : expr '|' expr", 338*b53bb29fSJung-uk Kim "expr : '-' expr", 339*b53bb29fSJung-uk Kim "expr : LETTER", 340*b53bb29fSJung-uk Kim "expr : number", 341*b53bb29fSJung-uk Kim "number : DIGIT", 342*b53bb29fSJung-uk Kim "number : number DIGIT", 343*b53bb29fSJung-uk Kim 344*b53bb29fSJung-uk Kim }; 345*b53bb29fSJung-uk Kim #endif 346*b53bb29fSJung-uk Kim 347*b53bb29fSJung-uk Kim #if YYDEBUG 348*b53bb29fSJung-uk Kim int yydebug; 349*b53bb29fSJung-uk Kim #endif 350*b53bb29fSJung-uk Kim 351*b53bb29fSJung-uk Kim int yyerrflag; 352*b53bb29fSJung-uk Kim int yychar; 353*b53bb29fSJung-uk Kim YYSTYPE yyval; 354*b53bb29fSJung-uk Kim YYSTYPE yylval; 355*b53bb29fSJung-uk Kim int yynerrs; 356*b53bb29fSJung-uk Kim 357*b53bb29fSJung-uk Kim #if defined(YYLTYPE) || defined(YYLTYPE_IS_DECLARED) 358*b53bb29fSJung-uk Kim YYLTYPE yyloc; /* position returned by actions */ 359*b53bb29fSJung-uk Kim YYLTYPE yylloc; /* position from the lexer */ 360*b53bb29fSJung-uk Kim #endif 361*b53bb29fSJung-uk Kim 362*b53bb29fSJung-uk Kim /* %code "requires" block start */ 363*b53bb29fSJung-uk Kim #line 3 "calc_code_all.y" 364*b53bb29fSJung-uk Kim /* CODE-REQUIRES */ 365*b53bb29fSJung-uk Kim /* %code "requires" block end */ 366*b53bb29fSJung-uk Kim #line 367 "calc_code_all.tab.c" 367*b53bb29fSJung-uk Kim 368*b53bb29fSJung-uk Kim #if defined(YYLTYPE) || defined(YYLTYPE_IS_DECLARED) 369*b53bb29fSJung-uk Kim #ifndef YYLLOC_DEFAULT 370*b53bb29fSJung-uk Kim #define YYLLOC_DEFAULT(loc, rhs, n) \ 371*b53bb29fSJung-uk Kim do \ 372*b53bb29fSJung-uk Kim { \ 373*b53bb29fSJung-uk Kim if (n == 0) \ 374*b53bb29fSJung-uk Kim { \ 375*b53bb29fSJung-uk Kim (loc).first_line = YYRHSLOC(rhs, 0).last_line; \ 376*b53bb29fSJung-uk Kim (loc).first_column = YYRHSLOC(rhs, 0).last_column; \ 377*b53bb29fSJung-uk Kim (loc).last_line = YYRHSLOC(rhs, 0).last_line; \ 378*b53bb29fSJung-uk Kim (loc).last_column = YYRHSLOC(rhs, 0).last_column; \ 379*b53bb29fSJung-uk Kim } \ 380*b53bb29fSJung-uk Kim else \ 381*b53bb29fSJung-uk Kim { \ 382*b53bb29fSJung-uk Kim (loc).first_line = YYRHSLOC(rhs, 1).first_line; \ 383*b53bb29fSJung-uk Kim (loc).first_column = YYRHSLOC(rhs, 1).first_column; \ 384*b53bb29fSJung-uk Kim (loc).last_line = YYRHSLOC(rhs, n).last_line; \ 385*b53bb29fSJung-uk Kim (loc).last_column = YYRHSLOC(rhs, n).last_column; \ 386*b53bb29fSJung-uk Kim } \ 387*b53bb29fSJung-uk Kim } while (0) 388*b53bb29fSJung-uk Kim #endif /* YYLLOC_DEFAULT */ 389*b53bb29fSJung-uk Kim #endif /* defined(YYLTYPE) || defined(YYLTYPE_IS_DECLARED) */ 390*b53bb29fSJung-uk Kim #if YYBTYACC 391*b53bb29fSJung-uk Kim 392*b53bb29fSJung-uk Kim #ifndef YYLVQUEUEGROWTH 393*b53bb29fSJung-uk Kim #define YYLVQUEUEGROWTH 32 394*b53bb29fSJung-uk Kim #endif 395*b53bb29fSJung-uk Kim #endif /* YYBTYACC */ 396*b53bb29fSJung-uk Kim 397*b53bb29fSJung-uk Kim /* define the initial stack-sizes */ 398*b53bb29fSJung-uk Kim #ifdef YYSTACKSIZE 399*b53bb29fSJung-uk Kim #undef YYMAXDEPTH 400*b53bb29fSJung-uk Kim #define YYMAXDEPTH YYSTACKSIZE 401*b53bb29fSJung-uk Kim #else 402*b53bb29fSJung-uk Kim #ifdef YYMAXDEPTH 403*b53bb29fSJung-uk Kim #define YYSTACKSIZE YYMAXDEPTH 404*b53bb29fSJung-uk Kim #else 405*b53bb29fSJung-uk Kim #define YYSTACKSIZE 10000 406*b53bb29fSJung-uk Kim #define YYMAXDEPTH 10000 407*b53bb29fSJung-uk Kim #endif 408*b53bb29fSJung-uk Kim #endif 409*b53bb29fSJung-uk Kim 410*b53bb29fSJung-uk Kim #ifndef YYINITSTACKSIZE 411*b53bb29fSJung-uk Kim #define YYINITSTACKSIZE 200 412*b53bb29fSJung-uk Kim #endif 413*b53bb29fSJung-uk Kim 414*b53bb29fSJung-uk Kim typedef struct { 415*b53bb29fSJung-uk Kim unsigned stacksize; 416*b53bb29fSJung-uk Kim YYINT *s_base; 417*b53bb29fSJung-uk Kim YYINT *s_mark; 418*b53bb29fSJung-uk Kim YYINT *s_last; 419*b53bb29fSJung-uk Kim YYSTYPE *l_base; 420*b53bb29fSJung-uk Kim YYSTYPE *l_mark; 421*b53bb29fSJung-uk Kim #if defined(YYLTYPE) || defined(YYLTYPE_IS_DECLARED) 422*b53bb29fSJung-uk Kim YYLTYPE *p_base; 423*b53bb29fSJung-uk Kim YYLTYPE *p_mark; 424*b53bb29fSJung-uk Kim #endif 425*b53bb29fSJung-uk Kim } YYSTACKDATA; 426*b53bb29fSJung-uk Kim #if YYBTYACC 427*b53bb29fSJung-uk Kim 428*b53bb29fSJung-uk Kim struct YYParseState_s 429*b53bb29fSJung-uk Kim { 430*b53bb29fSJung-uk Kim struct YYParseState_s *save; /* Previously saved parser state */ 431*b53bb29fSJung-uk Kim YYSTACKDATA yystack; /* saved parser stack */ 432*b53bb29fSJung-uk Kim int state; /* saved parser state */ 433*b53bb29fSJung-uk Kim int errflag; /* saved error recovery status */ 434*b53bb29fSJung-uk Kim int lexeme; /* saved index of the conflict lexeme in the lexical queue */ 435*b53bb29fSJung-uk Kim YYINT ctry; /* saved index in yyctable[] for this conflict */ 436*b53bb29fSJung-uk Kim }; 437*b53bb29fSJung-uk Kim typedef struct YYParseState_s YYParseState; 438*b53bb29fSJung-uk Kim #endif /* YYBTYACC */ 439*b53bb29fSJung-uk Kim /* variables for the parser stack */ 440*b53bb29fSJung-uk Kim static YYSTACKDATA yystack; 441*b53bb29fSJung-uk Kim #if YYBTYACC 442*b53bb29fSJung-uk Kim 443*b53bb29fSJung-uk Kim /* Current parser state */ 444*b53bb29fSJung-uk Kim static YYParseState *yyps = 0; 445*b53bb29fSJung-uk Kim 446*b53bb29fSJung-uk Kim /* yypath != NULL: do the full parse, starting at *yypath parser state. */ 447*b53bb29fSJung-uk Kim static YYParseState *yypath = 0; 448*b53bb29fSJung-uk Kim 449*b53bb29fSJung-uk Kim /* Base of the lexical value queue */ 450*b53bb29fSJung-uk Kim static YYSTYPE *yylvals = 0; 451*b53bb29fSJung-uk Kim 452*b53bb29fSJung-uk Kim /* Current position at lexical value queue */ 453*b53bb29fSJung-uk Kim static YYSTYPE *yylvp = 0; 454*b53bb29fSJung-uk Kim 455*b53bb29fSJung-uk Kim /* End position of lexical value queue */ 456*b53bb29fSJung-uk Kim static YYSTYPE *yylve = 0; 457*b53bb29fSJung-uk Kim 458*b53bb29fSJung-uk Kim /* The last allocated position at the lexical value queue */ 459*b53bb29fSJung-uk Kim static YYSTYPE *yylvlim = 0; 460*b53bb29fSJung-uk Kim 461*b53bb29fSJung-uk Kim #if defined(YYLTYPE) || defined(YYLTYPE_IS_DECLARED) 462*b53bb29fSJung-uk Kim /* Base of the lexical position queue */ 463*b53bb29fSJung-uk Kim static YYLTYPE *yylpsns = 0; 464*b53bb29fSJung-uk Kim 465*b53bb29fSJung-uk Kim /* Current position at lexical position queue */ 466*b53bb29fSJung-uk Kim static YYLTYPE *yylpp = 0; 467*b53bb29fSJung-uk Kim 468*b53bb29fSJung-uk Kim /* End position of lexical position queue */ 469*b53bb29fSJung-uk Kim static YYLTYPE *yylpe = 0; 470*b53bb29fSJung-uk Kim 471*b53bb29fSJung-uk Kim /* The last allocated position at the lexical position queue */ 472*b53bb29fSJung-uk Kim static YYLTYPE *yylplim = 0; 473*b53bb29fSJung-uk Kim #endif 474*b53bb29fSJung-uk Kim 475*b53bb29fSJung-uk Kim /* Current position at lexical token queue */ 476*b53bb29fSJung-uk Kim static YYINT *yylexp = 0; 477*b53bb29fSJung-uk Kim 478*b53bb29fSJung-uk Kim static YYINT *yylexemes = 0; 479*b53bb29fSJung-uk Kim #endif /* YYBTYACC */ 480*b53bb29fSJung-uk Kim 481*b53bb29fSJung-uk Kim /* %code "provides" block start */ 482*b53bb29fSJung-uk Kim #line 4 "calc_code_all.y" 483*b53bb29fSJung-uk Kim /* CODE-PROVIDES */ 484*b53bb29fSJung-uk Kim #line 6 "calc_code_all.y" 485*b53bb29fSJung-uk Kim /* CODE-PROVIDES2 */ 486*b53bb29fSJung-uk Kim /* %code "provides" block end */ 487*b53bb29fSJung-uk Kim #line 488 "calc_code_all.tab.c" 488*b53bb29fSJung-uk Kim 489*b53bb29fSJung-uk Kim /* %code "" block start */ 490*b53bb29fSJung-uk Kim #line 1 "calc_code_all.y" 491*b53bb29fSJung-uk Kim /* CODE-DEFAULT2 */ 492*b53bb29fSJung-uk Kim #line 2 "calc_code_all.y" 493*b53bb29fSJung-uk Kim /* CODE-DEFAULT */ 494*b53bb29fSJung-uk Kim /* %code "" block end */ 495*b53bb29fSJung-uk Kim #line 496 "calc_code_all.tab.c" 496*b53bb29fSJung-uk Kim #line 73 "calc_code_all.y" 497*b53bb29fSJung-uk Kim /* start of programs */ 498*b53bb29fSJung-uk Kim 499*b53bb29fSJung-uk Kim int 500*b53bb29fSJung-uk Kim main (void) 501*b53bb29fSJung-uk Kim { 502*b53bb29fSJung-uk Kim while(!feof(stdin)) { 503*b53bb29fSJung-uk Kim yyparse(); 504*b53bb29fSJung-uk Kim } 505*b53bb29fSJung-uk Kim return 0; 506*b53bb29fSJung-uk Kim } 507*b53bb29fSJung-uk Kim 508*b53bb29fSJung-uk Kim static void 509*b53bb29fSJung-uk Kim yyerror(const char *s) 510*b53bb29fSJung-uk Kim { 511*b53bb29fSJung-uk Kim fprintf(stderr, "%s\n", s); 512*b53bb29fSJung-uk Kim } 513*b53bb29fSJung-uk Kim 514*b53bb29fSJung-uk Kim int 515*b53bb29fSJung-uk Kim yylex(void) 516*b53bb29fSJung-uk Kim { 517*b53bb29fSJung-uk Kim /* lexical analysis routine */ 518*b53bb29fSJung-uk Kim /* returns LETTER for a lower case letter, yylval = 0 through 25 */ 519*b53bb29fSJung-uk Kim /* return DIGIT for a digit, yylval = 0 through 9 */ 520*b53bb29fSJung-uk Kim /* all other characters are returned immediately */ 521*b53bb29fSJung-uk Kim 522*b53bb29fSJung-uk Kim int c; 523*b53bb29fSJung-uk Kim 524*b53bb29fSJung-uk Kim while( (c=getchar()) == ' ' ) { /* skip blanks */ } 525*b53bb29fSJung-uk Kim 526*b53bb29fSJung-uk Kim /* c is now nonblank */ 527*b53bb29fSJung-uk Kim 528*b53bb29fSJung-uk Kim if( islower( c )) { 529*b53bb29fSJung-uk Kim yylval = c - 'a'; 530*b53bb29fSJung-uk Kim return ( LETTER ); 531*b53bb29fSJung-uk Kim } 532*b53bb29fSJung-uk Kim if( isdigit( c )) { 533*b53bb29fSJung-uk Kim yylval = c - '0'; 534*b53bb29fSJung-uk Kim return ( DIGIT ); 535*b53bb29fSJung-uk Kim } 536*b53bb29fSJung-uk Kim return( c ); 537*b53bb29fSJung-uk Kim } 538*b53bb29fSJung-uk Kim #line 539 "calc_code_all.tab.c" 539*b53bb29fSJung-uk Kim 540*b53bb29fSJung-uk Kim /* For use in generated program */ 541*b53bb29fSJung-uk Kim #define yydepth (int)(yystack.s_mark - yystack.s_base) 542*b53bb29fSJung-uk Kim #if YYBTYACC 543*b53bb29fSJung-uk Kim #define yytrial (yyps->save) 544*b53bb29fSJung-uk Kim #endif /* YYBTYACC */ 545*b53bb29fSJung-uk Kim 546*b53bb29fSJung-uk Kim #if YYDEBUG 547*b53bb29fSJung-uk Kim #include <stdio.h> /* needed for printf */ 548*b53bb29fSJung-uk Kim #endif 549*b53bb29fSJung-uk Kim 550*b53bb29fSJung-uk Kim #include <stdlib.h> /* needed for malloc, etc */ 551*b53bb29fSJung-uk Kim #include <string.h> /* needed for memset */ 552*b53bb29fSJung-uk Kim 553*b53bb29fSJung-uk Kim /* allocate initial stack or double stack size, up to YYMAXDEPTH */ 554*b53bb29fSJung-uk Kim static int yygrowstack(YYSTACKDATA *data) 555*b53bb29fSJung-uk Kim { 556*b53bb29fSJung-uk Kim int i; 557*b53bb29fSJung-uk Kim unsigned newsize; 558*b53bb29fSJung-uk Kim YYINT *newss; 559*b53bb29fSJung-uk Kim YYSTYPE *newvs; 560*b53bb29fSJung-uk Kim #if defined(YYLTYPE) || defined(YYLTYPE_IS_DECLARED) 561*b53bb29fSJung-uk Kim YYLTYPE *newps; 562*b53bb29fSJung-uk Kim #endif 563*b53bb29fSJung-uk Kim 564*b53bb29fSJung-uk Kim if ((newsize = data->stacksize) == 0) 565*b53bb29fSJung-uk Kim newsize = YYINITSTACKSIZE; 566*b53bb29fSJung-uk Kim else if (newsize >= YYMAXDEPTH) 567*b53bb29fSJung-uk Kim return YYENOMEM; 568*b53bb29fSJung-uk Kim else if ((newsize *= 2) > YYMAXDEPTH) 569*b53bb29fSJung-uk Kim newsize = YYMAXDEPTH; 570*b53bb29fSJung-uk Kim 571*b53bb29fSJung-uk Kim i = (int) (data->s_mark - data->s_base); 572*b53bb29fSJung-uk Kim newss = (YYINT *)realloc(data->s_base, newsize * sizeof(*newss)); 573*b53bb29fSJung-uk Kim if (newss == 0) 574*b53bb29fSJung-uk Kim return YYENOMEM; 575*b53bb29fSJung-uk Kim 576*b53bb29fSJung-uk Kim data->s_base = newss; 577*b53bb29fSJung-uk Kim data->s_mark = newss + i; 578*b53bb29fSJung-uk Kim 579*b53bb29fSJung-uk Kim newvs = (YYSTYPE *)realloc(data->l_base, newsize * sizeof(*newvs)); 580*b53bb29fSJung-uk Kim if (newvs == 0) 581*b53bb29fSJung-uk Kim return YYENOMEM; 582*b53bb29fSJung-uk Kim 583*b53bb29fSJung-uk Kim data->l_base = newvs; 584*b53bb29fSJung-uk Kim data->l_mark = newvs + i; 585*b53bb29fSJung-uk Kim 586*b53bb29fSJung-uk Kim #if defined(YYLTYPE) || defined(YYLTYPE_IS_DECLARED) 587*b53bb29fSJung-uk Kim newps = (YYLTYPE *)realloc(data->p_base, newsize * sizeof(*newps)); 588*b53bb29fSJung-uk Kim if (newps == 0) 589*b53bb29fSJung-uk Kim return YYENOMEM; 590*b53bb29fSJung-uk Kim 591*b53bb29fSJung-uk Kim data->p_base = newps; 592*b53bb29fSJung-uk Kim data->p_mark = newps + i; 593*b53bb29fSJung-uk Kim #endif 594*b53bb29fSJung-uk Kim 595*b53bb29fSJung-uk Kim data->stacksize = newsize; 596*b53bb29fSJung-uk Kim data->s_last = data->s_base + newsize - 1; 597*b53bb29fSJung-uk Kim 598*b53bb29fSJung-uk Kim #if YYDEBUG 599*b53bb29fSJung-uk Kim if (yydebug) 600*b53bb29fSJung-uk Kim fprintf(stderr, "%sdebug: stack size increased to %d\n", YYPREFIX, newsize); 601*b53bb29fSJung-uk Kim #endif 602*b53bb29fSJung-uk Kim return 0; 603*b53bb29fSJung-uk Kim } 604*b53bb29fSJung-uk Kim 605*b53bb29fSJung-uk Kim #if YYPURE || defined(YY_NO_LEAKS) 606*b53bb29fSJung-uk Kim static void yyfreestack(YYSTACKDATA *data) 607*b53bb29fSJung-uk Kim { 608*b53bb29fSJung-uk Kim free(data->s_base); 609*b53bb29fSJung-uk Kim free(data->l_base); 610*b53bb29fSJung-uk Kim #if defined(YYLTYPE) || defined(YYLTYPE_IS_DECLARED) 611*b53bb29fSJung-uk Kim free(data->p_base); 612*b53bb29fSJung-uk Kim #endif 613*b53bb29fSJung-uk Kim memset(data, 0, sizeof(*data)); 614*b53bb29fSJung-uk Kim } 615*b53bb29fSJung-uk Kim #else 616*b53bb29fSJung-uk Kim #define yyfreestack(data) /* nothing */ 617*b53bb29fSJung-uk Kim #endif /* YYPURE || defined(YY_NO_LEAKS) */ 618*b53bb29fSJung-uk Kim #if YYBTYACC 619*b53bb29fSJung-uk Kim 620*b53bb29fSJung-uk Kim static YYParseState * 621*b53bb29fSJung-uk Kim yyNewState(unsigned size) 622*b53bb29fSJung-uk Kim { 623*b53bb29fSJung-uk Kim YYParseState *p = (YYParseState *) malloc(sizeof(YYParseState)); 624*b53bb29fSJung-uk Kim if (p == NULL) return NULL; 625*b53bb29fSJung-uk Kim 626*b53bb29fSJung-uk Kim p->yystack.stacksize = size; 627*b53bb29fSJung-uk Kim if (size == 0) 628*b53bb29fSJung-uk Kim { 629*b53bb29fSJung-uk Kim p->yystack.s_base = NULL; 630*b53bb29fSJung-uk Kim p->yystack.l_base = NULL; 631*b53bb29fSJung-uk Kim #if defined(YYLTYPE) || defined(YYLTYPE_IS_DECLARED) 632*b53bb29fSJung-uk Kim p->yystack.p_base = NULL; 633*b53bb29fSJung-uk Kim #endif 634*b53bb29fSJung-uk Kim return p; 635*b53bb29fSJung-uk Kim } 636*b53bb29fSJung-uk Kim p->yystack.s_base = (YYINT *) malloc(size * sizeof(YYINT)); 637*b53bb29fSJung-uk Kim if (p->yystack.s_base == NULL) return NULL; 638*b53bb29fSJung-uk Kim p->yystack.l_base = (YYSTYPE *) malloc(size * sizeof(YYSTYPE)); 639*b53bb29fSJung-uk Kim if (p->yystack.l_base == NULL) return NULL; 640*b53bb29fSJung-uk Kim memset(p->yystack.l_base, 0, size * sizeof(YYSTYPE)); 641*b53bb29fSJung-uk Kim #if defined(YYLTYPE) || defined(YYLTYPE_IS_DECLARED) 642*b53bb29fSJung-uk Kim p->yystack.p_base = (YYLTYPE *) malloc(size * sizeof(YYLTYPE)); 643*b53bb29fSJung-uk Kim if (p->yystack.p_base == NULL) return NULL; 644*b53bb29fSJung-uk Kim memset(p->yystack.p_base, 0, size * sizeof(YYLTYPE)); 645*b53bb29fSJung-uk Kim #endif 646*b53bb29fSJung-uk Kim 647*b53bb29fSJung-uk Kim return p; 648*b53bb29fSJung-uk Kim } 649*b53bb29fSJung-uk Kim 650*b53bb29fSJung-uk Kim static void 651*b53bb29fSJung-uk Kim yyFreeState(YYParseState *p) 652*b53bb29fSJung-uk Kim { 653*b53bb29fSJung-uk Kim yyfreestack(&p->yystack); 654*b53bb29fSJung-uk Kim free(p); 655*b53bb29fSJung-uk Kim } 656*b53bb29fSJung-uk Kim #endif /* YYBTYACC */ 657*b53bb29fSJung-uk Kim 658*b53bb29fSJung-uk Kim #define YYABORT goto yyabort 659*b53bb29fSJung-uk Kim #define YYREJECT goto yyabort 660*b53bb29fSJung-uk Kim #define YYACCEPT goto yyaccept 661*b53bb29fSJung-uk Kim #define YYERROR goto yyerrlab 662*b53bb29fSJung-uk Kim #if YYBTYACC 663*b53bb29fSJung-uk Kim #define YYVALID do { if (yyps->save) goto yyvalid; } while(0) 664*b53bb29fSJung-uk Kim #define YYVALID_NESTED do { if (yyps->save && \ 665*b53bb29fSJung-uk Kim yyps->save->save == 0) goto yyvalid; } while(0) 666*b53bb29fSJung-uk Kim #endif /* YYBTYACC */ 667*b53bb29fSJung-uk Kim 668*b53bb29fSJung-uk Kim int 669*b53bb29fSJung-uk Kim YYPARSE_DECL() 670*b53bb29fSJung-uk Kim { 671*b53bb29fSJung-uk Kim int yym, yyn, yystate, yyresult; 672*b53bb29fSJung-uk Kim #if YYBTYACC 673*b53bb29fSJung-uk Kim int yynewerrflag; 674*b53bb29fSJung-uk Kim YYParseState *yyerrctx = NULL; 675*b53bb29fSJung-uk Kim #endif /* YYBTYACC */ 676*b53bb29fSJung-uk Kim #if defined(YYLTYPE) || defined(YYLTYPE_IS_DECLARED) 677*b53bb29fSJung-uk Kim YYLTYPE yyerror_loc_range[3]; /* position of error start/end (0 unused) */ 678*b53bb29fSJung-uk Kim #endif 679*b53bb29fSJung-uk Kim #if YYDEBUG 680*b53bb29fSJung-uk Kim const char *yys; 681*b53bb29fSJung-uk Kim 682*b53bb29fSJung-uk Kim if ((yys = getenv("YYDEBUG")) != 0) 683*b53bb29fSJung-uk Kim { 684*b53bb29fSJung-uk Kim yyn = *yys; 685*b53bb29fSJung-uk Kim if (yyn >= '0' && yyn <= '9') 686*b53bb29fSJung-uk Kim yydebug = yyn - '0'; 687*b53bb29fSJung-uk Kim } 688*b53bb29fSJung-uk Kim if (yydebug) 689*b53bb29fSJung-uk Kim fprintf(stderr, "%sdebug[<# of symbols on state stack>]\n", YYPREFIX); 690*b53bb29fSJung-uk Kim #endif 691*b53bb29fSJung-uk Kim #if defined(YYLTYPE) || defined(YYLTYPE_IS_DECLARED) 692*b53bb29fSJung-uk Kim memset(yyerror_loc_range, 0, sizeof(yyerror_loc_range)); 693*b53bb29fSJung-uk Kim #endif 694*b53bb29fSJung-uk Kim 695*b53bb29fSJung-uk Kim #if YYBTYACC 696*b53bb29fSJung-uk Kim yyps = yyNewState(0); if (yyps == 0) goto yyenomem; 697*b53bb29fSJung-uk Kim yyps->save = 0; 698*b53bb29fSJung-uk Kim #endif /* YYBTYACC */ 699*b53bb29fSJung-uk Kim yym = 0; 700*b53bb29fSJung-uk Kim yyn = 0; 701*b53bb29fSJung-uk Kim yynerrs = 0; 702*b53bb29fSJung-uk Kim yyerrflag = 0; 703*b53bb29fSJung-uk Kim yychar = YYEMPTY; 704*b53bb29fSJung-uk Kim yystate = 0; 705*b53bb29fSJung-uk Kim 706*b53bb29fSJung-uk Kim #if YYPURE 707*b53bb29fSJung-uk Kim memset(&yystack, 0, sizeof(yystack)); 708*b53bb29fSJung-uk Kim #endif 709*b53bb29fSJung-uk Kim 710*b53bb29fSJung-uk Kim if (yystack.s_base == NULL && yygrowstack(&yystack) == YYENOMEM) goto yyoverflow; 711*b53bb29fSJung-uk Kim yystack.s_mark = yystack.s_base; 712*b53bb29fSJung-uk Kim yystack.l_mark = yystack.l_base; 713*b53bb29fSJung-uk Kim #if defined(YYLTYPE) || defined(YYLTYPE_IS_DECLARED) 714*b53bb29fSJung-uk Kim yystack.p_mark = yystack.p_base; 715*b53bb29fSJung-uk Kim #endif 716*b53bb29fSJung-uk Kim yystate = 0; 717*b53bb29fSJung-uk Kim *yystack.s_mark = 0; 718*b53bb29fSJung-uk Kim 719*b53bb29fSJung-uk Kim yyloop: 720*b53bb29fSJung-uk Kim if ((yyn = yydefred[yystate]) != 0) goto yyreduce; 721*b53bb29fSJung-uk Kim if (yychar < 0) 722*b53bb29fSJung-uk Kim { 723*b53bb29fSJung-uk Kim #if YYBTYACC 724*b53bb29fSJung-uk Kim do { 725*b53bb29fSJung-uk Kim if (yylvp < yylve) 726*b53bb29fSJung-uk Kim { 727*b53bb29fSJung-uk Kim /* we're currently re-reading tokens */ 728*b53bb29fSJung-uk Kim yylval = *yylvp++; 729*b53bb29fSJung-uk Kim #if defined(YYLTYPE) || defined(YYLTYPE_IS_DECLARED) 730*b53bb29fSJung-uk Kim yylloc = *yylpp++; 731*b53bb29fSJung-uk Kim #endif 732*b53bb29fSJung-uk Kim yychar = *yylexp++; 733*b53bb29fSJung-uk Kim break; 734*b53bb29fSJung-uk Kim } 735*b53bb29fSJung-uk Kim if (yyps->save) 736*b53bb29fSJung-uk Kim { 737*b53bb29fSJung-uk Kim /* in trial mode; save scanner results for future parse attempts */ 738*b53bb29fSJung-uk Kim if (yylvp == yylvlim) 739*b53bb29fSJung-uk Kim { /* Enlarge lexical value queue */ 740*b53bb29fSJung-uk Kim size_t p = (size_t) (yylvp - yylvals); 741*b53bb29fSJung-uk Kim size_t s = (size_t) (yylvlim - yylvals); 742*b53bb29fSJung-uk Kim 743*b53bb29fSJung-uk Kim s += YYLVQUEUEGROWTH; 744*b53bb29fSJung-uk Kim if ((yylexemes = (YYINT *)realloc(yylexemes, s * sizeof(YYINT))) == NULL) goto yyenomem; 745*b53bb29fSJung-uk Kim if ((yylvals = (YYSTYPE *)realloc(yylvals, s * sizeof(YYSTYPE))) == NULL) goto yyenomem; 746*b53bb29fSJung-uk Kim #if defined(YYLTYPE) || defined(YYLTYPE_IS_DECLARED) 747*b53bb29fSJung-uk Kim if ((yylpsns = (YYLTYPE *)realloc(yylpsns, s * sizeof(YYLTYPE))) == NULL) goto yyenomem; 748*b53bb29fSJung-uk Kim #endif 749*b53bb29fSJung-uk Kim yylvp = yylve = yylvals + p; 750*b53bb29fSJung-uk Kim yylvlim = yylvals + s; 751*b53bb29fSJung-uk Kim #if defined(YYLTYPE) || defined(YYLTYPE_IS_DECLARED) 752*b53bb29fSJung-uk Kim yylpp = yylpe = yylpsns + p; 753*b53bb29fSJung-uk Kim yylplim = yylpsns + s; 754*b53bb29fSJung-uk Kim #endif 755*b53bb29fSJung-uk Kim yylexp = yylexemes + p; 756*b53bb29fSJung-uk Kim } 757*b53bb29fSJung-uk Kim *yylexp = (YYINT) YYLEX; 758*b53bb29fSJung-uk Kim *yylvp++ = yylval; 759*b53bb29fSJung-uk Kim yylve++; 760*b53bb29fSJung-uk Kim #if defined(YYLTYPE) || defined(YYLTYPE_IS_DECLARED) 761*b53bb29fSJung-uk Kim *yylpp++ = yylloc; 762*b53bb29fSJung-uk Kim yylpe++; 763*b53bb29fSJung-uk Kim #endif 764*b53bb29fSJung-uk Kim yychar = *yylexp++; 765*b53bb29fSJung-uk Kim break; 766*b53bb29fSJung-uk Kim } 767*b53bb29fSJung-uk Kim /* normal operation, no conflict encountered */ 768*b53bb29fSJung-uk Kim #endif /* YYBTYACC */ 769*b53bb29fSJung-uk Kim yychar = YYLEX; 770*b53bb29fSJung-uk Kim #if YYBTYACC 771*b53bb29fSJung-uk Kim } while (0); 772*b53bb29fSJung-uk Kim #endif /* YYBTYACC */ 773*b53bb29fSJung-uk Kim if (yychar < 0) yychar = YYEOF; 774*b53bb29fSJung-uk Kim #if YYDEBUG 775*b53bb29fSJung-uk Kim if (yydebug) 776*b53bb29fSJung-uk Kim { 777*b53bb29fSJung-uk Kim if ((yys = yyname[YYTRANSLATE(yychar)]) == NULL) yys = yyname[YYUNDFTOKEN]; 778*b53bb29fSJung-uk Kim fprintf(stderr, "%s[%d]: state %d, reading token %d (%s)", 779*b53bb29fSJung-uk Kim YYDEBUGSTR, yydepth, yystate, yychar, yys); 780*b53bb29fSJung-uk Kim #ifdef YYSTYPE_TOSTRING 781*b53bb29fSJung-uk Kim #if YYBTYACC 782*b53bb29fSJung-uk Kim if (!yytrial) 783*b53bb29fSJung-uk Kim #endif /* YYBTYACC */ 784*b53bb29fSJung-uk Kim fprintf(stderr, " <%s>", YYSTYPE_TOSTRING(yychar, yylval)); 785*b53bb29fSJung-uk Kim #endif 786*b53bb29fSJung-uk Kim fputc('\n', stderr); 787*b53bb29fSJung-uk Kim } 788*b53bb29fSJung-uk Kim #endif 789*b53bb29fSJung-uk Kim } 790*b53bb29fSJung-uk Kim #if YYBTYACC 791*b53bb29fSJung-uk Kim 792*b53bb29fSJung-uk Kim /* Do we have a conflict? */ 793*b53bb29fSJung-uk Kim if (((yyn = yycindex[yystate]) != 0) && (yyn += yychar) >= 0 && 794*b53bb29fSJung-uk Kim yyn <= YYTABLESIZE && yycheck[yyn] == (YYINT) yychar) 795*b53bb29fSJung-uk Kim { 796*b53bb29fSJung-uk Kim YYINT ctry; 797*b53bb29fSJung-uk Kim 798*b53bb29fSJung-uk Kim if (yypath) 799*b53bb29fSJung-uk Kim { 800*b53bb29fSJung-uk Kim YYParseState *save; 801*b53bb29fSJung-uk Kim #if YYDEBUG 802*b53bb29fSJung-uk Kim if (yydebug) 803*b53bb29fSJung-uk Kim fprintf(stderr, "%s[%d]: CONFLICT in state %d: following successful trial parse\n", 804*b53bb29fSJung-uk Kim YYDEBUGSTR, yydepth, yystate); 805*b53bb29fSJung-uk Kim #endif 806*b53bb29fSJung-uk Kim /* Switch to the next conflict context */ 807*b53bb29fSJung-uk Kim save = yypath; 808*b53bb29fSJung-uk Kim yypath = save->save; 809*b53bb29fSJung-uk Kim save->save = NULL; 810*b53bb29fSJung-uk Kim ctry = save->ctry; 811*b53bb29fSJung-uk Kim if (save->state != yystate) YYABORT; 812*b53bb29fSJung-uk Kim yyFreeState(save); 813*b53bb29fSJung-uk Kim 814*b53bb29fSJung-uk Kim } 815*b53bb29fSJung-uk Kim else 816*b53bb29fSJung-uk Kim { 817*b53bb29fSJung-uk Kim 818*b53bb29fSJung-uk Kim /* Unresolved conflict - start/continue trial parse */ 819*b53bb29fSJung-uk Kim YYParseState *save; 820*b53bb29fSJung-uk Kim #if YYDEBUG 821*b53bb29fSJung-uk Kim if (yydebug) 822*b53bb29fSJung-uk Kim { 823*b53bb29fSJung-uk Kim fprintf(stderr, "%s[%d]: CONFLICT in state %d. ", YYDEBUGSTR, yydepth, yystate); 824*b53bb29fSJung-uk Kim if (yyps->save) 825*b53bb29fSJung-uk Kim fputs("ALREADY in conflict, continuing trial parse.\n", stderr); 826*b53bb29fSJung-uk Kim else 827*b53bb29fSJung-uk Kim fputs("Starting trial parse.\n", stderr); 828*b53bb29fSJung-uk Kim } 829*b53bb29fSJung-uk Kim #endif 830*b53bb29fSJung-uk Kim save = yyNewState((unsigned)(yystack.s_mark - yystack.s_base + 1)); 831*b53bb29fSJung-uk Kim if (save == NULL) goto yyenomem; 832*b53bb29fSJung-uk Kim save->save = yyps->save; 833*b53bb29fSJung-uk Kim save->state = yystate; 834*b53bb29fSJung-uk Kim save->errflag = yyerrflag; 835*b53bb29fSJung-uk Kim save->yystack.s_mark = save->yystack.s_base + (yystack.s_mark - yystack.s_base); 836*b53bb29fSJung-uk Kim memcpy (save->yystack.s_base, yystack.s_base, (size_t) (yystack.s_mark - yystack.s_base + 1) * sizeof(YYINT)); 837*b53bb29fSJung-uk Kim save->yystack.l_mark = save->yystack.l_base + (yystack.l_mark - yystack.l_base); 838*b53bb29fSJung-uk Kim memcpy (save->yystack.l_base, yystack.l_base, (size_t) (yystack.l_mark - yystack.l_base + 1) * sizeof(YYSTYPE)); 839*b53bb29fSJung-uk Kim #if defined(YYLTYPE) || defined(YYLTYPE_IS_DECLARED) 840*b53bb29fSJung-uk Kim save->yystack.p_mark = save->yystack.p_base + (yystack.p_mark - yystack.p_base); 841*b53bb29fSJung-uk Kim memcpy (save->yystack.p_base, yystack.p_base, (size_t) (yystack.p_mark - yystack.p_base + 1) * sizeof(YYLTYPE)); 842*b53bb29fSJung-uk Kim #endif 843*b53bb29fSJung-uk Kim ctry = yytable[yyn]; 844*b53bb29fSJung-uk Kim if (yyctable[ctry] == -1) 845*b53bb29fSJung-uk Kim { 846*b53bb29fSJung-uk Kim #if YYDEBUG 847*b53bb29fSJung-uk Kim if (yydebug && yychar >= YYEOF) 848*b53bb29fSJung-uk Kim fprintf(stderr, "%s[%d]: backtracking 1 token\n", YYDEBUGSTR, yydepth); 849*b53bb29fSJung-uk Kim #endif 850*b53bb29fSJung-uk Kim ctry++; 851*b53bb29fSJung-uk Kim } 852*b53bb29fSJung-uk Kim save->ctry = ctry; 853*b53bb29fSJung-uk Kim if (yyps->save == NULL) 854*b53bb29fSJung-uk Kim { 855*b53bb29fSJung-uk Kim /* If this is a first conflict in the stack, start saving lexemes */ 856*b53bb29fSJung-uk Kim if (!yylexemes) 857*b53bb29fSJung-uk Kim { 858*b53bb29fSJung-uk Kim yylexemes = (YYINT *) malloc((YYLVQUEUEGROWTH) * sizeof(YYINT)); 859*b53bb29fSJung-uk Kim if (yylexemes == NULL) goto yyenomem; 860*b53bb29fSJung-uk Kim yylvals = (YYSTYPE *) malloc((YYLVQUEUEGROWTH) * sizeof(YYSTYPE)); 861*b53bb29fSJung-uk Kim if (yylvals == NULL) goto yyenomem; 862*b53bb29fSJung-uk Kim yylvlim = yylvals + YYLVQUEUEGROWTH; 863*b53bb29fSJung-uk Kim #if defined(YYLTYPE) || defined(YYLTYPE_IS_DECLARED) 864*b53bb29fSJung-uk Kim yylpsns = (YYLTYPE *) malloc((YYLVQUEUEGROWTH) * sizeof(YYLTYPE)); 865*b53bb29fSJung-uk Kim if (yylpsns == NULL) goto yyenomem; 866*b53bb29fSJung-uk Kim yylplim = yylpsns + YYLVQUEUEGROWTH; 867*b53bb29fSJung-uk Kim #endif 868*b53bb29fSJung-uk Kim } 869*b53bb29fSJung-uk Kim if (yylvp == yylve) 870*b53bb29fSJung-uk Kim { 871*b53bb29fSJung-uk Kim yylvp = yylve = yylvals; 872*b53bb29fSJung-uk Kim #if defined(YYLTYPE) || defined(YYLTYPE_IS_DECLARED) 873*b53bb29fSJung-uk Kim yylpp = yylpe = yylpsns; 874*b53bb29fSJung-uk Kim #endif 875*b53bb29fSJung-uk Kim yylexp = yylexemes; 876*b53bb29fSJung-uk Kim if (yychar >= YYEOF) 877*b53bb29fSJung-uk Kim { 878*b53bb29fSJung-uk Kim *yylve++ = yylval; 879*b53bb29fSJung-uk Kim #if defined(YYLTYPE) || defined(YYLTYPE_IS_DECLARED) 880*b53bb29fSJung-uk Kim *yylpe++ = yylloc; 881*b53bb29fSJung-uk Kim #endif 882*b53bb29fSJung-uk Kim *yylexp = (YYINT) yychar; 883*b53bb29fSJung-uk Kim yychar = YYEMPTY; 884*b53bb29fSJung-uk Kim } 885*b53bb29fSJung-uk Kim } 886*b53bb29fSJung-uk Kim } 887*b53bb29fSJung-uk Kim if (yychar >= YYEOF) 888*b53bb29fSJung-uk Kim { 889*b53bb29fSJung-uk Kim yylvp--; 890*b53bb29fSJung-uk Kim #if defined(YYLTYPE) || defined(YYLTYPE_IS_DECLARED) 891*b53bb29fSJung-uk Kim yylpp--; 892*b53bb29fSJung-uk Kim #endif 893*b53bb29fSJung-uk Kim yylexp--; 894*b53bb29fSJung-uk Kim yychar = YYEMPTY; 895*b53bb29fSJung-uk Kim } 896*b53bb29fSJung-uk Kim save->lexeme = (int) (yylvp - yylvals); 897*b53bb29fSJung-uk Kim yyps->save = save; 898*b53bb29fSJung-uk Kim } 899*b53bb29fSJung-uk Kim if (yytable[yyn] == ctry) 900*b53bb29fSJung-uk Kim { 901*b53bb29fSJung-uk Kim #if YYDEBUG 902*b53bb29fSJung-uk Kim if (yydebug) 903*b53bb29fSJung-uk Kim fprintf(stderr, "%s[%d]: state %d, shifting to state %d\n", 904*b53bb29fSJung-uk Kim YYDEBUGSTR, yydepth, yystate, yyctable[ctry]); 905*b53bb29fSJung-uk Kim #endif 906*b53bb29fSJung-uk Kim if (yychar < 0) 907*b53bb29fSJung-uk Kim { 908*b53bb29fSJung-uk Kim yylvp++; 909*b53bb29fSJung-uk Kim #if defined(YYLTYPE) || defined(YYLTYPE_IS_DECLARED) 910*b53bb29fSJung-uk Kim yylpp++; 911*b53bb29fSJung-uk Kim #endif 912*b53bb29fSJung-uk Kim yylexp++; 913*b53bb29fSJung-uk Kim } 914*b53bb29fSJung-uk Kim if (yystack.s_mark >= yystack.s_last && yygrowstack(&yystack) == YYENOMEM) 915*b53bb29fSJung-uk Kim goto yyoverflow; 916*b53bb29fSJung-uk Kim yystate = yyctable[ctry]; 917*b53bb29fSJung-uk Kim *++yystack.s_mark = (YYINT) yystate; 918*b53bb29fSJung-uk Kim *++yystack.l_mark = yylval; 919*b53bb29fSJung-uk Kim #if defined(YYLTYPE) || defined(YYLTYPE_IS_DECLARED) 920*b53bb29fSJung-uk Kim *++yystack.p_mark = yylloc; 921*b53bb29fSJung-uk Kim #endif 922*b53bb29fSJung-uk Kim yychar = YYEMPTY; 923*b53bb29fSJung-uk Kim if (yyerrflag > 0) --yyerrflag; 924*b53bb29fSJung-uk Kim goto yyloop; 925*b53bb29fSJung-uk Kim } 926*b53bb29fSJung-uk Kim else 927*b53bb29fSJung-uk Kim { 928*b53bb29fSJung-uk Kim yyn = yyctable[ctry]; 929*b53bb29fSJung-uk Kim goto yyreduce; 930*b53bb29fSJung-uk Kim } 931*b53bb29fSJung-uk Kim } /* End of code dealing with conflicts */ 932*b53bb29fSJung-uk Kim #endif /* YYBTYACC */ 933*b53bb29fSJung-uk Kim if (((yyn = yysindex[yystate]) != 0) && (yyn += yychar) >= 0 && 934*b53bb29fSJung-uk Kim yyn <= YYTABLESIZE && yycheck[yyn] == (YYINT) yychar) 935*b53bb29fSJung-uk Kim { 936*b53bb29fSJung-uk Kim #if YYDEBUG 937*b53bb29fSJung-uk Kim if (yydebug) 938*b53bb29fSJung-uk Kim fprintf(stderr, "%s[%d]: state %d, shifting to state %d\n", 939*b53bb29fSJung-uk Kim YYDEBUGSTR, yydepth, yystate, yytable[yyn]); 940*b53bb29fSJung-uk Kim #endif 941*b53bb29fSJung-uk Kim if (yystack.s_mark >= yystack.s_last && yygrowstack(&yystack) == YYENOMEM) goto yyoverflow; 942*b53bb29fSJung-uk Kim yystate = yytable[yyn]; 943*b53bb29fSJung-uk Kim *++yystack.s_mark = yytable[yyn]; 944*b53bb29fSJung-uk Kim *++yystack.l_mark = yylval; 945*b53bb29fSJung-uk Kim #if defined(YYLTYPE) || defined(YYLTYPE_IS_DECLARED) 946*b53bb29fSJung-uk Kim *++yystack.p_mark = yylloc; 947*b53bb29fSJung-uk Kim #endif 948*b53bb29fSJung-uk Kim yychar = YYEMPTY; 949*b53bb29fSJung-uk Kim if (yyerrflag > 0) --yyerrflag; 950*b53bb29fSJung-uk Kim goto yyloop; 951*b53bb29fSJung-uk Kim } 952*b53bb29fSJung-uk Kim if (((yyn = yyrindex[yystate]) != 0) && (yyn += yychar) >= 0 && 953*b53bb29fSJung-uk Kim yyn <= YYTABLESIZE && yycheck[yyn] == (YYINT) yychar) 954*b53bb29fSJung-uk Kim { 955*b53bb29fSJung-uk Kim yyn = yytable[yyn]; 956*b53bb29fSJung-uk Kim goto yyreduce; 957*b53bb29fSJung-uk Kim } 958*b53bb29fSJung-uk Kim if (yyerrflag != 0) goto yyinrecovery; 959*b53bb29fSJung-uk Kim #if YYBTYACC 960*b53bb29fSJung-uk Kim 961*b53bb29fSJung-uk Kim yynewerrflag = 1; 962*b53bb29fSJung-uk Kim goto yyerrhandler; 963*b53bb29fSJung-uk Kim goto yyerrlab; /* redundant goto avoids 'unused label' warning */ 964*b53bb29fSJung-uk Kim 965*b53bb29fSJung-uk Kim yyerrlab: 966*b53bb29fSJung-uk Kim /* explicit YYERROR from an action -- pop the rhs of the rule reduced 967*b53bb29fSJung-uk Kim * before looking for error recovery */ 968*b53bb29fSJung-uk Kim yystack.s_mark -= yym; 969*b53bb29fSJung-uk Kim yystate = *yystack.s_mark; 970*b53bb29fSJung-uk Kim yystack.l_mark -= yym; 971*b53bb29fSJung-uk Kim #if defined(YYLTYPE) || defined(YYLTYPE_IS_DECLARED) 972*b53bb29fSJung-uk Kim yystack.p_mark -= yym; 973*b53bb29fSJung-uk Kim #endif 974*b53bb29fSJung-uk Kim 975*b53bb29fSJung-uk Kim yynewerrflag = 0; 976*b53bb29fSJung-uk Kim yyerrhandler: 977*b53bb29fSJung-uk Kim while (yyps->save) 978*b53bb29fSJung-uk Kim { 979*b53bb29fSJung-uk Kim int ctry; 980*b53bb29fSJung-uk Kim YYParseState *save = yyps->save; 981*b53bb29fSJung-uk Kim #if YYDEBUG 982*b53bb29fSJung-uk Kim if (yydebug) 983*b53bb29fSJung-uk Kim fprintf(stderr, "%s[%d]: ERROR in state %d, CONFLICT BACKTRACKING to state %d, %d tokens\n", 984*b53bb29fSJung-uk Kim YYDEBUGSTR, yydepth, yystate, yyps->save->state, 985*b53bb29fSJung-uk Kim (int)(yylvp - yylvals - yyps->save->lexeme)); 986*b53bb29fSJung-uk Kim #endif 987*b53bb29fSJung-uk Kim /* Memorize most forward-looking error state in case it's really an error. */ 988*b53bb29fSJung-uk Kim if (yyerrctx == NULL || yyerrctx->lexeme < yylvp - yylvals) 989*b53bb29fSJung-uk Kim { 990*b53bb29fSJung-uk Kim /* Free old saved error context state */ 991*b53bb29fSJung-uk Kim if (yyerrctx) yyFreeState(yyerrctx); 992*b53bb29fSJung-uk Kim /* Create and fill out new saved error context state */ 993*b53bb29fSJung-uk Kim yyerrctx = yyNewState((unsigned)(yystack.s_mark - yystack.s_base + 1)); 994*b53bb29fSJung-uk Kim if (yyerrctx == NULL) goto yyenomem; 995*b53bb29fSJung-uk Kim yyerrctx->save = yyps->save; 996*b53bb29fSJung-uk Kim yyerrctx->state = yystate; 997*b53bb29fSJung-uk Kim yyerrctx->errflag = yyerrflag; 998*b53bb29fSJung-uk Kim yyerrctx->yystack.s_mark = yyerrctx->yystack.s_base + (yystack.s_mark - yystack.s_base); 999*b53bb29fSJung-uk Kim memcpy (yyerrctx->yystack.s_base, yystack.s_base, (size_t) (yystack.s_mark - yystack.s_base + 1) * sizeof(YYINT)); 1000*b53bb29fSJung-uk Kim yyerrctx->yystack.l_mark = yyerrctx->yystack.l_base + (yystack.l_mark - yystack.l_base); 1001*b53bb29fSJung-uk Kim memcpy (yyerrctx->yystack.l_base, yystack.l_base, (size_t) (yystack.l_mark - yystack.l_base + 1) * sizeof(YYSTYPE)); 1002*b53bb29fSJung-uk Kim #if defined(YYLTYPE) || defined(YYLTYPE_IS_DECLARED) 1003*b53bb29fSJung-uk Kim yyerrctx->yystack.p_mark = yyerrctx->yystack.p_base + (yystack.p_mark - yystack.p_base); 1004*b53bb29fSJung-uk Kim memcpy (yyerrctx->yystack.p_base, yystack.p_base, (size_t) (yystack.p_mark - yystack.p_base + 1) * sizeof(YYLTYPE)); 1005*b53bb29fSJung-uk Kim #endif 1006*b53bb29fSJung-uk Kim yyerrctx->lexeme = (int) (yylvp - yylvals); 1007*b53bb29fSJung-uk Kim } 1008*b53bb29fSJung-uk Kim yylvp = yylvals + save->lexeme; 1009*b53bb29fSJung-uk Kim #if defined(YYLTYPE) || defined(YYLTYPE_IS_DECLARED) 1010*b53bb29fSJung-uk Kim yylpp = yylpsns + save->lexeme; 1011*b53bb29fSJung-uk Kim #endif 1012*b53bb29fSJung-uk Kim yylexp = yylexemes + save->lexeme; 1013*b53bb29fSJung-uk Kim yychar = YYEMPTY; 1014*b53bb29fSJung-uk Kim yystack.s_mark = yystack.s_base + (save->yystack.s_mark - save->yystack.s_base); 1015*b53bb29fSJung-uk Kim memcpy (yystack.s_base, save->yystack.s_base, (size_t) (yystack.s_mark - yystack.s_base + 1) * sizeof(YYINT)); 1016*b53bb29fSJung-uk Kim yystack.l_mark = yystack.l_base + (save->yystack.l_mark - save->yystack.l_base); 1017*b53bb29fSJung-uk Kim memcpy (yystack.l_base, save->yystack.l_base, (size_t) (yystack.l_mark - yystack.l_base + 1) * sizeof(YYSTYPE)); 1018*b53bb29fSJung-uk Kim #if defined(YYLTYPE) || defined(YYLTYPE_IS_DECLARED) 1019*b53bb29fSJung-uk Kim yystack.p_mark = yystack.p_base + (save->yystack.p_mark - save->yystack.p_base); 1020*b53bb29fSJung-uk Kim memcpy (yystack.p_base, save->yystack.p_base, (size_t) (yystack.p_mark - yystack.p_base + 1) * sizeof(YYLTYPE)); 1021*b53bb29fSJung-uk Kim #endif 1022*b53bb29fSJung-uk Kim ctry = ++save->ctry; 1023*b53bb29fSJung-uk Kim yystate = save->state; 1024*b53bb29fSJung-uk Kim /* We tried shift, try reduce now */ 1025*b53bb29fSJung-uk Kim if ((yyn = yyctable[ctry]) >= 0) goto yyreduce; 1026*b53bb29fSJung-uk Kim yyps->save = save->save; 1027*b53bb29fSJung-uk Kim save->save = NULL; 1028*b53bb29fSJung-uk Kim yyFreeState(save); 1029*b53bb29fSJung-uk Kim 1030*b53bb29fSJung-uk Kim /* Nothing left on the stack -- error */ 1031*b53bb29fSJung-uk Kim if (!yyps->save) 1032*b53bb29fSJung-uk Kim { 1033*b53bb29fSJung-uk Kim #if YYDEBUG 1034*b53bb29fSJung-uk Kim if (yydebug) 1035*b53bb29fSJung-uk Kim fprintf(stderr, "%sdebug[%d,trial]: trial parse FAILED, entering ERROR mode\n", 1036*b53bb29fSJung-uk Kim YYPREFIX, yydepth); 1037*b53bb29fSJung-uk Kim #endif 1038*b53bb29fSJung-uk Kim /* Restore state as it was in the most forward-advanced error */ 1039*b53bb29fSJung-uk Kim yylvp = yylvals + yyerrctx->lexeme; 1040*b53bb29fSJung-uk Kim #if defined(YYLTYPE) || defined(YYLTYPE_IS_DECLARED) 1041*b53bb29fSJung-uk Kim yylpp = yylpsns + yyerrctx->lexeme; 1042*b53bb29fSJung-uk Kim #endif 1043*b53bb29fSJung-uk Kim yylexp = yylexemes + yyerrctx->lexeme; 1044*b53bb29fSJung-uk Kim yychar = yylexp[-1]; 1045*b53bb29fSJung-uk Kim yylval = yylvp[-1]; 1046*b53bb29fSJung-uk Kim #if defined(YYLTYPE) || defined(YYLTYPE_IS_DECLARED) 1047*b53bb29fSJung-uk Kim yylloc = yylpp[-1]; 1048*b53bb29fSJung-uk Kim #endif 1049*b53bb29fSJung-uk Kim yystack.s_mark = yystack.s_base + (yyerrctx->yystack.s_mark - yyerrctx->yystack.s_base); 1050*b53bb29fSJung-uk Kim memcpy (yystack.s_base, yyerrctx->yystack.s_base, (size_t) (yystack.s_mark - yystack.s_base + 1) * sizeof(YYINT)); 1051*b53bb29fSJung-uk Kim yystack.l_mark = yystack.l_base + (yyerrctx->yystack.l_mark - yyerrctx->yystack.l_base); 1052*b53bb29fSJung-uk Kim memcpy (yystack.l_base, yyerrctx->yystack.l_base, (size_t) (yystack.l_mark - yystack.l_base + 1) * sizeof(YYSTYPE)); 1053*b53bb29fSJung-uk Kim #if defined(YYLTYPE) || defined(YYLTYPE_IS_DECLARED) 1054*b53bb29fSJung-uk Kim yystack.p_mark = yystack.p_base + (yyerrctx->yystack.p_mark - yyerrctx->yystack.p_base); 1055*b53bb29fSJung-uk Kim memcpy (yystack.p_base, yyerrctx->yystack.p_base, (size_t) (yystack.p_mark - yystack.p_base + 1) * sizeof(YYLTYPE)); 1056*b53bb29fSJung-uk Kim #endif 1057*b53bb29fSJung-uk Kim yystate = yyerrctx->state; 1058*b53bb29fSJung-uk Kim yyFreeState(yyerrctx); 1059*b53bb29fSJung-uk Kim yyerrctx = NULL; 1060*b53bb29fSJung-uk Kim } 1061*b53bb29fSJung-uk Kim yynewerrflag = 1; 1062*b53bb29fSJung-uk Kim } 1063*b53bb29fSJung-uk Kim if (yynewerrflag == 0) goto yyinrecovery; 1064*b53bb29fSJung-uk Kim #endif /* YYBTYACC */ 1065*b53bb29fSJung-uk Kim 1066*b53bb29fSJung-uk Kim YYERROR_CALL("syntax error"); 1067*b53bb29fSJung-uk Kim #if defined(YYLTYPE) || defined(YYLTYPE_IS_DECLARED) 1068*b53bb29fSJung-uk Kim yyerror_loc_range[1] = yylloc; /* lookahead position is error start position */ 1069*b53bb29fSJung-uk Kim #endif 1070*b53bb29fSJung-uk Kim 1071*b53bb29fSJung-uk Kim #if !YYBTYACC 1072*b53bb29fSJung-uk Kim goto yyerrlab; /* redundant goto avoids 'unused label' warning */ 1073*b53bb29fSJung-uk Kim yyerrlab: 1074*b53bb29fSJung-uk Kim #endif 1075*b53bb29fSJung-uk Kim ++yynerrs; 1076*b53bb29fSJung-uk Kim 1077*b53bb29fSJung-uk Kim yyinrecovery: 1078*b53bb29fSJung-uk Kim if (yyerrflag < 3) 1079*b53bb29fSJung-uk Kim { 1080*b53bb29fSJung-uk Kim yyerrflag = 3; 1081*b53bb29fSJung-uk Kim for (;;) 1082*b53bb29fSJung-uk Kim { 1083*b53bb29fSJung-uk Kim if (((yyn = yysindex[*yystack.s_mark]) != 0) && (yyn += YYERRCODE) >= 0 && 1084*b53bb29fSJung-uk Kim yyn <= YYTABLESIZE && yycheck[yyn] == (YYINT) YYERRCODE) 1085*b53bb29fSJung-uk Kim { 1086*b53bb29fSJung-uk Kim #if YYDEBUG 1087*b53bb29fSJung-uk Kim if (yydebug) 1088*b53bb29fSJung-uk Kim fprintf(stderr, "%s[%d]: state %d, error recovery shifting to state %d\n", 1089*b53bb29fSJung-uk Kim YYDEBUGSTR, yydepth, *yystack.s_mark, yytable[yyn]); 1090*b53bb29fSJung-uk Kim #endif 1091*b53bb29fSJung-uk Kim if (yystack.s_mark >= yystack.s_last && yygrowstack(&yystack) == YYENOMEM) goto yyoverflow; 1092*b53bb29fSJung-uk Kim yystate = yytable[yyn]; 1093*b53bb29fSJung-uk Kim *++yystack.s_mark = yytable[yyn]; 1094*b53bb29fSJung-uk Kim *++yystack.l_mark = yylval; 1095*b53bb29fSJung-uk Kim #if defined(YYLTYPE) || defined(YYLTYPE_IS_DECLARED) 1096*b53bb29fSJung-uk Kim /* lookahead position is error end position */ 1097*b53bb29fSJung-uk Kim yyerror_loc_range[2] = yylloc; 1098*b53bb29fSJung-uk Kim YYLLOC_DEFAULT(yyloc, yyerror_loc_range, 2); /* position of error span */ 1099*b53bb29fSJung-uk Kim *++yystack.p_mark = yyloc; 1100*b53bb29fSJung-uk Kim #endif 1101*b53bb29fSJung-uk Kim goto yyloop; 1102*b53bb29fSJung-uk Kim } 1103*b53bb29fSJung-uk Kim else 1104*b53bb29fSJung-uk Kim { 1105*b53bb29fSJung-uk Kim #if YYDEBUG 1106*b53bb29fSJung-uk Kim if (yydebug) 1107*b53bb29fSJung-uk Kim fprintf(stderr, "%s[%d]: error recovery discarding state %d\n", 1108*b53bb29fSJung-uk Kim YYDEBUGSTR, yydepth, *yystack.s_mark); 1109*b53bb29fSJung-uk Kim #endif 1110*b53bb29fSJung-uk Kim if (yystack.s_mark <= yystack.s_base) goto yyabort; 1111*b53bb29fSJung-uk Kim #if defined(YYLTYPE) || defined(YYLTYPE_IS_DECLARED) 1112*b53bb29fSJung-uk Kim /* the current TOS position is the error start position */ 1113*b53bb29fSJung-uk Kim yyerror_loc_range[1] = *yystack.p_mark; 1114*b53bb29fSJung-uk Kim #endif 1115*b53bb29fSJung-uk Kim #if defined(YYDESTRUCT_CALL) 1116*b53bb29fSJung-uk Kim #if YYBTYACC 1117*b53bb29fSJung-uk Kim if (!yytrial) 1118*b53bb29fSJung-uk Kim #endif /* YYBTYACC */ 1119*b53bb29fSJung-uk Kim #if defined(YYLTYPE) || defined(YYLTYPE_IS_DECLARED) 1120*b53bb29fSJung-uk Kim YYDESTRUCT_CALL("error: discarding state", 1121*b53bb29fSJung-uk Kim yystos[*yystack.s_mark], yystack.l_mark, yystack.p_mark); 1122*b53bb29fSJung-uk Kim #else 1123*b53bb29fSJung-uk Kim YYDESTRUCT_CALL("error: discarding state", 1124*b53bb29fSJung-uk Kim yystos[*yystack.s_mark], yystack.l_mark); 1125*b53bb29fSJung-uk Kim #endif /* defined(YYLTYPE) || defined(YYLTYPE_IS_DECLARED) */ 1126*b53bb29fSJung-uk Kim #endif /* defined(YYDESTRUCT_CALL) */ 1127*b53bb29fSJung-uk Kim --yystack.s_mark; 1128*b53bb29fSJung-uk Kim --yystack.l_mark; 1129*b53bb29fSJung-uk Kim #if defined(YYLTYPE) || defined(YYLTYPE_IS_DECLARED) 1130*b53bb29fSJung-uk Kim --yystack.p_mark; 1131*b53bb29fSJung-uk Kim #endif 1132*b53bb29fSJung-uk Kim } 1133*b53bb29fSJung-uk Kim } 1134*b53bb29fSJung-uk Kim } 1135*b53bb29fSJung-uk Kim else 1136*b53bb29fSJung-uk Kim { 1137*b53bb29fSJung-uk Kim if (yychar == YYEOF) goto yyabort; 1138*b53bb29fSJung-uk Kim #if YYDEBUG 1139*b53bb29fSJung-uk Kim if (yydebug) 1140*b53bb29fSJung-uk Kim { 1141*b53bb29fSJung-uk Kim if ((yys = yyname[YYTRANSLATE(yychar)]) == NULL) yys = yyname[YYUNDFTOKEN]; 1142*b53bb29fSJung-uk Kim fprintf(stderr, "%s[%d]: state %d, error recovery discarding token %d (%s)\n", 1143*b53bb29fSJung-uk Kim YYDEBUGSTR, yydepth, yystate, yychar, yys); 1144*b53bb29fSJung-uk Kim } 1145*b53bb29fSJung-uk Kim #endif 1146*b53bb29fSJung-uk Kim #if defined(YYDESTRUCT_CALL) 1147*b53bb29fSJung-uk Kim #if YYBTYACC 1148*b53bb29fSJung-uk Kim if (!yytrial) 1149*b53bb29fSJung-uk Kim #endif /* YYBTYACC */ 1150*b53bb29fSJung-uk Kim #if defined(YYLTYPE) || defined(YYLTYPE_IS_DECLARED) 1151*b53bb29fSJung-uk Kim YYDESTRUCT_CALL("error: discarding token", yychar, &yylval, &yylloc); 1152*b53bb29fSJung-uk Kim #else 1153*b53bb29fSJung-uk Kim YYDESTRUCT_CALL("error: discarding token", yychar, &yylval); 1154*b53bb29fSJung-uk Kim #endif /* defined(YYLTYPE) || defined(YYLTYPE_IS_DECLARED) */ 1155*b53bb29fSJung-uk Kim #endif /* defined(YYDESTRUCT_CALL) */ 1156*b53bb29fSJung-uk Kim yychar = YYEMPTY; 1157*b53bb29fSJung-uk Kim goto yyloop; 1158*b53bb29fSJung-uk Kim } 1159*b53bb29fSJung-uk Kim 1160*b53bb29fSJung-uk Kim yyreduce: 1161*b53bb29fSJung-uk Kim yym = yylen[yyn]; 1162*b53bb29fSJung-uk Kim #if YYDEBUG 1163*b53bb29fSJung-uk Kim if (yydebug) 1164*b53bb29fSJung-uk Kim { 1165*b53bb29fSJung-uk Kim fprintf(stderr, "%s[%d]: state %d, reducing by rule %d (%s)", 1166*b53bb29fSJung-uk Kim YYDEBUGSTR, yydepth, yystate, yyn, yyrule[yyn]); 1167*b53bb29fSJung-uk Kim #ifdef YYSTYPE_TOSTRING 1168*b53bb29fSJung-uk Kim #if YYBTYACC 1169*b53bb29fSJung-uk Kim if (!yytrial) 1170*b53bb29fSJung-uk Kim #endif /* YYBTYACC */ 1171*b53bb29fSJung-uk Kim if (yym > 0) 1172*b53bb29fSJung-uk Kim { 1173*b53bb29fSJung-uk Kim int i; 1174*b53bb29fSJung-uk Kim fputc('<', stderr); 1175*b53bb29fSJung-uk Kim for (i = yym; i > 0; i--) 1176*b53bb29fSJung-uk Kim { 1177*b53bb29fSJung-uk Kim if (i != yym) fputs(", ", stderr); 1178*b53bb29fSJung-uk Kim fputs(YYSTYPE_TOSTRING(yystos[yystack.s_mark[1-i]], 1179*b53bb29fSJung-uk Kim yystack.l_mark[1-i]), stderr); 1180*b53bb29fSJung-uk Kim } 1181*b53bb29fSJung-uk Kim fputc('>', stderr); 1182*b53bb29fSJung-uk Kim } 1183*b53bb29fSJung-uk Kim #endif 1184*b53bb29fSJung-uk Kim fputc('\n', stderr); 1185*b53bb29fSJung-uk Kim } 1186*b53bb29fSJung-uk Kim #endif 1187*b53bb29fSJung-uk Kim if (yym > 0) 1188*b53bb29fSJung-uk Kim yyval = yystack.l_mark[1-yym]; 1189*b53bb29fSJung-uk Kim else 1190*b53bb29fSJung-uk Kim memset(&yyval, 0, sizeof yyval); 1191*b53bb29fSJung-uk Kim #if defined(YYLTYPE) || defined(YYLTYPE_IS_DECLARED) 1192*b53bb29fSJung-uk Kim 1193*b53bb29fSJung-uk Kim /* Perform position reduction */ 1194*b53bb29fSJung-uk Kim memset(&yyloc, 0, sizeof(yyloc)); 1195*b53bb29fSJung-uk Kim #if YYBTYACC 1196*b53bb29fSJung-uk Kim if (!yytrial) 1197*b53bb29fSJung-uk Kim #endif /* YYBTYACC */ 1198*b53bb29fSJung-uk Kim { 1199*b53bb29fSJung-uk Kim YYLLOC_DEFAULT(yyloc, &yystack.p_mark[-yym], yym); 1200*b53bb29fSJung-uk Kim /* just in case YYERROR is invoked within the action, save 1201*b53bb29fSJung-uk Kim the start of the rhs as the error start position */ 1202*b53bb29fSJung-uk Kim yyerror_loc_range[1] = yystack.p_mark[1-yym]; 1203*b53bb29fSJung-uk Kim } 1204*b53bb29fSJung-uk Kim #endif 1205*b53bb29fSJung-uk Kim 1206*b53bb29fSJung-uk Kim switch (yyn) 1207*b53bb29fSJung-uk Kim { 1208*b53bb29fSJung-uk Kim case 3: 1209*b53bb29fSJung-uk Kim #line 35 "calc_code_all.y" 1210*b53bb29fSJung-uk Kim { yyerrok ; } 1211*b53bb29fSJung-uk Kim break; 1212*b53bb29fSJung-uk Kim case 4: 1213*b53bb29fSJung-uk Kim #line 39 "calc_code_all.y" 1214*b53bb29fSJung-uk Kim { printf("%d\n",yystack.l_mark[0]);} 1215*b53bb29fSJung-uk Kim break; 1216*b53bb29fSJung-uk Kim case 5: 1217*b53bb29fSJung-uk Kim #line 41 "calc_code_all.y" 1218*b53bb29fSJung-uk Kim { regs[yystack.l_mark[-2]] = yystack.l_mark[0]; } 1219*b53bb29fSJung-uk Kim break; 1220*b53bb29fSJung-uk Kim case 6: 1221*b53bb29fSJung-uk Kim #line 45 "calc_code_all.y" 1222*b53bb29fSJung-uk Kim { yyval = yystack.l_mark[-1]; } 1223*b53bb29fSJung-uk Kim break; 1224*b53bb29fSJung-uk Kim case 7: 1225*b53bb29fSJung-uk Kim #line 47 "calc_code_all.y" 1226*b53bb29fSJung-uk Kim { yyval = yystack.l_mark[-2] + yystack.l_mark[0]; } 1227*b53bb29fSJung-uk Kim break; 1228*b53bb29fSJung-uk Kim case 8: 1229*b53bb29fSJung-uk Kim #line 49 "calc_code_all.y" 1230*b53bb29fSJung-uk Kim { yyval = yystack.l_mark[-2] - yystack.l_mark[0]; } 1231*b53bb29fSJung-uk Kim break; 1232*b53bb29fSJung-uk Kim case 9: 1233*b53bb29fSJung-uk Kim #line 51 "calc_code_all.y" 1234*b53bb29fSJung-uk Kim { yyval = yystack.l_mark[-2] * yystack.l_mark[0]; } 1235*b53bb29fSJung-uk Kim break; 1236*b53bb29fSJung-uk Kim case 10: 1237*b53bb29fSJung-uk Kim #line 53 "calc_code_all.y" 1238*b53bb29fSJung-uk Kim { yyval = yystack.l_mark[-2] / yystack.l_mark[0]; } 1239*b53bb29fSJung-uk Kim break; 1240*b53bb29fSJung-uk Kim case 11: 1241*b53bb29fSJung-uk Kim #line 55 "calc_code_all.y" 1242*b53bb29fSJung-uk Kim { yyval = yystack.l_mark[-2] % yystack.l_mark[0]; } 1243*b53bb29fSJung-uk Kim break; 1244*b53bb29fSJung-uk Kim case 12: 1245*b53bb29fSJung-uk Kim #line 57 "calc_code_all.y" 1246*b53bb29fSJung-uk Kim { yyval = yystack.l_mark[-2] & yystack.l_mark[0]; } 1247*b53bb29fSJung-uk Kim break; 1248*b53bb29fSJung-uk Kim case 13: 1249*b53bb29fSJung-uk Kim #line 59 "calc_code_all.y" 1250*b53bb29fSJung-uk Kim { yyval = yystack.l_mark[-2] | yystack.l_mark[0]; } 1251*b53bb29fSJung-uk Kim break; 1252*b53bb29fSJung-uk Kim case 14: 1253*b53bb29fSJung-uk Kim #line 61 "calc_code_all.y" 1254*b53bb29fSJung-uk Kim { yyval = - yystack.l_mark[0]; } 1255*b53bb29fSJung-uk Kim break; 1256*b53bb29fSJung-uk Kim case 15: 1257*b53bb29fSJung-uk Kim #line 63 "calc_code_all.y" 1258*b53bb29fSJung-uk Kim { yyval = regs[yystack.l_mark[0]]; } 1259*b53bb29fSJung-uk Kim break; 1260*b53bb29fSJung-uk Kim case 17: 1261*b53bb29fSJung-uk Kim #line 68 "calc_code_all.y" 1262*b53bb29fSJung-uk Kim { yyval = yystack.l_mark[0]; base = (yystack.l_mark[0]==0) ? 8 : 10; } 1263*b53bb29fSJung-uk Kim break; 1264*b53bb29fSJung-uk Kim case 18: 1265*b53bb29fSJung-uk Kim #line 70 "calc_code_all.y" 1266*b53bb29fSJung-uk Kim { yyval = base * yystack.l_mark[-1] + yystack.l_mark[0]; } 1267*b53bb29fSJung-uk Kim break; 1268*b53bb29fSJung-uk Kim #line 1269 "calc_code_all.tab.c" 1269*b53bb29fSJung-uk Kim default: 1270*b53bb29fSJung-uk Kim break; 1271*b53bb29fSJung-uk Kim } 1272*b53bb29fSJung-uk Kim yystack.s_mark -= yym; 1273*b53bb29fSJung-uk Kim yystate = *yystack.s_mark; 1274*b53bb29fSJung-uk Kim yystack.l_mark -= yym; 1275*b53bb29fSJung-uk Kim #if defined(YYLTYPE) || defined(YYLTYPE_IS_DECLARED) 1276*b53bb29fSJung-uk Kim yystack.p_mark -= yym; 1277*b53bb29fSJung-uk Kim #endif 1278*b53bb29fSJung-uk Kim yym = yylhs[yyn]; 1279*b53bb29fSJung-uk Kim if (yystate == 0 && yym == 0) 1280*b53bb29fSJung-uk Kim { 1281*b53bb29fSJung-uk Kim #if YYDEBUG 1282*b53bb29fSJung-uk Kim if (yydebug) 1283*b53bb29fSJung-uk Kim { 1284*b53bb29fSJung-uk Kim fprintf(stderr, "%s[%d]: after reduction, ", YYDEBUGSTR, yydepth); 1285*b53bb29fSJung-uk Kim #ifdef YYSTYPE_TOSTRING 1286*b53bb29fSJung-uk Kim #if YYBTYACC 1287*b53bb29fSJung-uk Kim if (!yytrial) 1288*b53bb29fSJung-uk Kim #endif /* YYBTYACC */ 1289*b53bb29fSJung-uk Kim fprintf(stderr, "result is <%s>, ", YYSTYPE_TOSTRING(yystos[YYFINAL], yyval)); 1290*b53bb29fSJung-uk Kim #endif 1291*b53bb29fSJung-uk Kim fprintf(stderr, "shifting from state 0 to final state %d\n", YYFINAL); 1292*b53bb29fSJung-uk Kim } 1293*b53bb29fSJung-uk Kim #endif 1294*b53bb29fSJung-uk Kim yystate = YYFINAL; 1295*b53bb29fSJung-uk Kim *++yystack.s_mark = YYFINAL; 1296*b53bb29fSJung-uk Kim *++yystack.l_mark = yyval; 1297*b53bb29fSJung-uk Kim #if defined(YYLTYPE) || defined(YYLTYPE_IS_DECLARED) 1298*b53bb29fSJung-uk Kim *++yystack.p_mark = yyloc; 1299*b53bb29fSJung-uk Kim #endif 1300*b53bb29fSJung-uk Kim if (yychar < 0) 1301*b53bb29fSJung-uk Kim { 1302*b53bb29fSJung-uk Kim #if YYBTYACC 1303*b53bb29fSJung-uk Kim do { 1304*b53bb29fSJung-uk Kim if (yylvp < yylve) 1305*b53bb29fSJung-uk Kim { 1306*b53bb29fSJung-uk Kim /* we're currently re-reading tokens */ 1307*b53bb29fSJung-uk Kim yylval = *yylvp++; 1308*b53bb29fSJung-uk Kim #if defined(YYLTYPE) || defined(YYLTYPE_IS_DECLARED) 1309*b53bb29fSJung-uk Kim yylloc = *yylpp++; 1310*b53bb29fSJung-uk Kim #endif 1311*b53bb29fSJung-uk Kim yychar = *yylexp++; 1312*b53bb29fSJung-uk Kim break; 1313*b53bb29fSJung-uk Kim } 1314*b53bb29fSJung-uk Kim if (yyps->save) 1315*b53bb29fSJung-uk Kim { 1316*b53bb29fSJung-uk Kim /* in trial mode; save scanner results for future parse attempts */ 1317*b53bb29fSJung-uk Kim if (yylvp == yylvlim) 1318*b53bb29fSJung-uk Kim { /* Enlarge lexical value queue */ 1319*b53bb29fSJung-uk Kim size_t p = (size_t) (yylvp - yylvals); 1320*b53bb29fSJung-uk Kim size_t s = (size_t) (yylvlim - yylvals); 1321*b53bb29fSJung-uk Kim 1322*b53bb29fSJung-uk Kim s += YYLVQUEUEGROWTH; 1323*b53bb29fSJung-uk Kim if ((yylexemes = (YYINT *)realloc(yylexemes, s * sizeof(YYINT))) == NULL) 1324*b53bb29fSJung-uk Kim goto yyenomem; 1325*b53bb29fSJung-uk Kim if ((yylvals = (YYSTYPE *)realloc(yylvals, s * sizeof(YYSTYPE))) == NULL) 1326*b53bb29fSJung-uk Kim goto yyenomem; 1327*b53bb29fSJung-uk Kim #if defined(YYLTYPE) || defined(YYLTYPE_IS_DECLARED) 1328*b53bb29fSJung-uk Kim if ((yylpsns = (YYLTYPE *)realloc(yylpsns, s * sizeof(YYLTYPE))) == NULL) 1329*b53bb29fSJung-uk Kim goto yyenomem; 1330*b53bb29fSJung-uk Kim #endif 1331*b53bb29fSJung-uk Kim yylvp = yylve = yylvals + p; 1332*b53bb29fSJung-uk Kim yylvlim = yylvals + s; 1333*b53bb29fSJung-uk Kim #if defined(YYLTYPE) || defined(YYLTYPE_IS_DECLARED) 1334*b53bb29fSJung-uk Kim yylpp = yylpe = yylpsns + p; 1335*b53bb29fSJung-uk Kim yylplim = yylpsns + s; 1336*b53bb29fSJung-uk Kim #endif 1337*b53bb29fSJung-uk Kim yylexp = yylexemes + p; 1338*b53bb29fSJung-uk Kim } 1339*b53bb29fSJung-uk Kim *yylexp = (YYINT) YYLEX; 1340*b53bb29fSJung-uk Kim *yylvp++ = yylval; 1341*b53bb29fSJung-uk Kim yylve++; 1342*b53bb29fSJung-uk Kim #if defined(YYLTYPE) || defined(YYLTYPE_IS_DECLARED) 1343*b53bb29fSJung-uk Kim *yylpp++ = yylloc; 1344*b53bb29fSJung-uk Kim yylpe++; 1345*b53bb29fSJung-uk Kim #endif 1346*b53bb29fSJung-uk Kim yychar = *yylexp++; 1347*b53bb29fSJung-uk Kim break; 1348*b53bb29fSJung-uk Kim } 1349*b53bb29fSJung-uk Kim /* normal operation, no conflict encountered */ 1350*b53bb29fSJung-uk Kim #endif /* YYBTYACC */ 1351*b53bb29fSJung-uk Kim yychar = YYLEX; 1352*b53bb29fSJung-uk Kim #if YYBTYACC 1353*b53bb29fSJung-uk Kim } while (0); 1354*b53bb29fSJung-uk Kim #endif /* YYBTYACC */ 1355*b53bb29fSJung-uk Kim if (yychar < 0) yychar = YYEOF; 1356*b53bb29fSJung-uk Kim #if YYDEBUG 1357*b53bb29fSJung-uk Kim if (yydebug) 1358*b53bb29fSJung-uk Kim { 1359*b53bb29fSJung-uk Kim if ((yys = yyname[YYTRANSLATE(yychar)]) == NULL) yys = yyname[YYUNDFTOKEN]; 1360*b53bb29fSJung-uk Kim fprintf(stderr, "%s[%d]: state %d, reading token %d (%s)\n", 1361*b53bb29fSJung-uk Kim YYDEBUGSTR, yydepth, YYFINAL, yychar, yys); 1362*b53bb29fSJung-uk Kim } 1363*b53bb29fSJung-uk Kim #endif 1364*b53bb29fSJung-uk Kim } 1365*b53bb29fSJung-uk Kim if (yychar == YYEOF) goto yyaccept; 1366*b53bb29fSJung-uk Kim goto yyloop; 1367*b53bb29fSJung-uk Kim } 1368*b53bb29fSJung-uk Kim if (((yyn = yygindex[yym]) != 0) && (yyn += yystate) >= 0 && 1369*b53bb29fSJung-uk Kim yyn <= YYTABLESIZE && yycheck[yyn] == (YYINT) yystate) 1370*b53bb29fSJung-uk Kim yystate = yytable[yyn]; 1371*b53bb29fSJung-uk Kim else 1372*b53bb29fSJung-uk Kim yystate = yydgoto[yym]; 1373*b53bb29fSJung-uk Kim #if YYDEBUG 1374*b53bb29fSJung-uk Kim if (yydebug) 1375*b53bb29fSJung-uk Kim { 1376*b53bb29fSJung-uk Kim fprintf(stderr, "%s[%d]: after reduction, ", YYDEBUGSTR, yydepth); 1377*b53bb29fSJung-uk Kim #ifdef YYSTYPE_TOSTRING 1378*b53bb29fSJung-uk Kim #if YYBTYACC 1379*b53bb29fSJung-uk Kim if (!yytrial) 1380*b53bb29fSJung-uk Kim #endif /* YYBTYACC */ 1381*b53bb29fSJung-uk Kim fprintf(stderr, "result is <%s>, ", YYSTYPE_TOSTRING(yystos[yystate], yyval)); 1382*b53bb29fSJung-uk Kim #endif 1383*b53bb29fSJung-uk Kim fprintf(stderr, "shifting from state %d to state %d\n", *yystack.s_mark, yystate); 1384*b53bb29fSJung-uk Kim } 1385*b53bb29fSJung-uk Kim #endif 1386*b53bb29fSJung-uk Kim if (yystack.s_mark >= yystack.s_last && yygrowstack(&yystack) == YYENOMEM) goto yyoverflow; 1387*b53bb29fSJung-uk Kim *++yystack.s_mark = (YYINT) yystate; 1388*b53bb29fSJung-uk Kim *++yystack.l_mark = yyval; 1389*b53bb29fSJung-uk Kim #if defined(YYLTYPE) || defined(YYLTYPE_IS_DECLARED) 1390*b53bb29fSJung-uk Kim *++yystack.p_mark = yyloc; 1391*b53bb29fSJung-uk Kim #endif 1392*b53bb29fSJung-uk Kim goto yyloop; 1393*b53bb29fSJung-uk Kim #if YYBTYACC 1394*b53bb29fSJung-uk Kim 1395*b53bb29fSJung-uk Kim /* Reduction declares that this path is valid. Set yypath and do a full parse */ 1396*b53bb29fSJung-uk Kim yyvalid: 1397*b53bb29fSJung-uk Kim if (yypath) YYABORT; 1398*b53bb29fSJung-uk Kim while (yyps->save) 1399*b53bb29fSJung-uk Kim { 1400*b53bb29fSJung-uk Kim YYParseState *save = yyps->save; 1401*b53bb29fSJung-uk Kim yyps->save = save->save; 1402*b53bb29fSJung-uk Kim save->save = yypath; 1403*b53bb29fSJung-uk Kim yypath = save; 1404*b53bb29fSJung-uk Kim } 1405*b53bb29fSJung-uk Kim #if YYDEBUG 1406*b53bb29fSJung-uk Kim if (yydebug) 1407*b53bb29fSJung-uk Kim fprintf(stderr, "%s[%d]: state %d, CONFLICT trial successful, backtracking to state %d, %d tokens\n", 1408*b53bb29fSJung-uk Kim YYDEBUGSTR, yydepth, yystate, yypath->state, (int)(yylvp - yylvals - yypath->lexeme)); 1409*b53bb29fSJung-uk Kim #endif 1410*b53bb29fSJung-uk Kim if (yyerrctx) 1411*b53bb29fSJung-uk Kim { 1412*b53bb29fSJung-uk Kim yyFreeState(yyerrctx); 1413*b53bb29fSJung-uk Kim yyerrctx = NULL; 1414*b53bb29fSJung-uk Kim } 1415*b53bb29fSJung-uk Kim yylvp = yylvals + yypath->lexeme; 1416*b53bb29fSJung-uk Kim #if defined(YYLTYPE) || defined(YYLTYPE_IS_DECLARED) 1417*b53bb29fSJung-uk Kim yylpp = yylpsns + yypath->lexeme; 1418*b53bb29fSJung-uk Kim #endif 1419*b53bb29fSJung-uk Kim yylexp = yylexemes + yypath->lexeme; 1420*b53bb29fSJung-uk Kim yychar = YYEMPTY; 1421*b53bb29fSJung-uk Kim yystack.s_mark = yystack.s_base + (yypath->yystack.s_mark - yypath->yystack.s_base); 1422*b53bb29fSJung-uk Kim memcpy (yystack.s_base, yypath->yystack.s_base, (size_t) (yystack.s_mark - yystack.s_base + 1) * sizeof(YYINT)); 1423*b53bb29fSJung-uk Kim yystack.l_mark = yystack.l_base + (yypath->yystack.l_mark - yypath->yystack.l_base); 1424*b53bb29fSJung-uk Kim memcpy (yystack.l_base, yypath->yystack.l_base, (size_t) (yystack.l_mark - yystack.l_base + 1) * sizeof(YYSTYPE)); 1425*b53bb29fSJung-uk Kim #if defined(YYLTYPE) || defined(YYLTYPE_IS_DECLARED) 1426*b53bb29fSJung-uk Kim yystack.p_mark = yystack.p_base + (yypath->yystack.p_mark - yypath->yystack.p_base); 1427*b53bb29fSJung-uk Kim memcpy (yystack.p_base, yypath->yystack.p_base, (size_t) (yystack.p_mark - yystack.p_base + 1) * sizeof(YYLTYPE)); 1428*b53bb29fSJung-uk Kim #endif 1429*b53bb29fSJung-uk Kim yystate = yypath->state; 1430*b53bb29fSJung-uk Kim goto yyloop; 1431*b53bb29fSJung-uk Kim #endif /* YYBTYACC */ 1432*b53bb29fSJung-uk Kim 1433*b53bb29fSJung-uk Kim yyoverflow: 1434*b53bb29fSJung-uk Kim YYERROR_CALL("yacc stack overflow"); 1435*b53bb29fSJung-uk Kim #if YYBTYACC 1436*b53bb29fSJung-uk Kim goto yyabort_nomem; 1437*b53bb29fSJung-uk Kim yyenomem: 1438*b53bb29fSJung-uk Kim YYERROR_CALL("memory exhausted"); 1439*b53bb29fSJung-uk Kim yyabort_nomem: 1440*b53bb29fSJung-uk Kim #endif /* YYBTYACC */ 1441*b53bb29fSJung-uk Kim yyresult = 2; 1442*b53bb29fSJung-uk Kim goto yyreturn; 1443*b53bb29fSJung-uk Kim 1444*b53bb29fSJung-uk Kim yyabort: 1445*b53bb29fSJung-uk Kim yyresult = 1; 1446*b53bb29fSJung-uk Kim goto yyreturn; 1447*b53bb29fSJung-uk Kim 1448*b53bb29fSJung-uk Kim yyaccept: 1449*b53bb29fSJung-uk Kim #if YYBTYACC 1450*b53bb29fSJung-uk Kim if (yyps->save) goto yyvalid; 1451*b53bb29fSJung-uk Kim #endif /* YYBTYACC */ 1452*b53bb29fSJung-uk Kim yyresult = 0; 1453*b53bb29fSJung-uk Kim 1454*b53bb29fSJung-uk Kim yyreturn: 1455*b53bb29fSJung-uk Kim #if defined(YYDESTRUCT_CALL) 1456*b53bb29fSJung-uk Kim if (yychar != YYEOF && yychar != YYEMPTY) 1457*b53bb29fSJung-uk Kim #if defined(YYLTYPE) || defined(YYLTYPE_IS_DECLARED) 1458*b53bb29fSJung-uk Kim YYDESTRUCT_CALL("cleanup: discarding token", yychar, &yylval, &yylloc); 1459*b53bb29fSJung-uk Kim #else 1460*b53bb29fSJung-uk Kim YYDESTRUCT_CALL("cleanup: discarding token", yychar, &yylval); 1461*b53bb29fSJung-uk Kim #endif /* defined(YYLTYPE) || defined(YYLTYPE_IS_DECLARED) */ 1462*b53bb29fSJung-uk Kim 1463*b53bb29fSJung-uk Kim { 1464*b53bb29fSJung-uk Kim YYSTYPE *pv; 1465*b53bb29fSJung-uk Kim #if defined(YYLTYPE) || defined(YYLTYPE_IS_DECLARED) 1466*b53bb29fSJung-uk Kim YYLTYPE *pp; 1467*b53bb29fSJung-uk Kim 1468*b53bb29fSJung-uk Kim for (pv = yystack.l_base, pp = yystack.p_base; pv <= yystack.l_mark; ++pv, ++pp) 1469*b53bb29fSJung-uk Kim YYDESTRUCT_CALL("cleanup: discarding state", 1470*b53bb29fSJung-uk Kim yystos[*(yystack.s_base + (pv - yystack.l_base))], pv, pp); 1471*b53bb29fSJung-uk Kim #else 1472*b53bb29fSJung-uk Kim for (pv = yystack.l_base; pv <= yystack.l_mark; ++pv) 1473*b53bb29fSJung-uk Kim YYDESTRUCT_CALL("cleanup: discarding state", 1474*b53bb29fSJung-uk Kim yystos[*(yystack.s_base + (pv - yystack.l_base))], pv); 1475*b53bb29fSJung-uk Kim #endif /* defined(YYLTYPE) || defined(YYLTYPE_IS_DECLARED) */ 1476*b53bb29fSJung-uk Kim } 1477*b53bb29fSJung-uk Kim #endif /* defined(YYDESTRUCT_CALL) */ 1478*b53bb29fSJung-uk Kim 1479*b53bb29fSJung-uk Kim #if YYBTYACC 1480*b53bb29fSJung-uk Kim if (yyerrctx) 1481*b53bb29fSJung-uk Kim { 1482*b53bb29fSJung-uk Kim yyFreeState(yyerrctx); 1483*b53bb29fSJung-uk Kim yyerrctx = NULL; 1484*b53bb29fSJung-uk Kim } 1485*b53bb29fSJung-uk Kim while (yyps) 1486*b53bb29fSJung-uk Kim { 1487*b53bb29fSJung-uk Kim YYParseState *save = yyps; 1488*b53bb29fSJung-uk Kim yyps = save->save; 1489*b53bb29fSJung-uk Kim save->save = NULL; 1490*b53bb29fSJung-uk Kim yyFreeState(save); 1491*b53bb29fSJung-uk Kim } 1492*b53bb29fSJung-uk Kim while (yypath) 1493*b53bb29fSJung-uk Kim { 1494*b53bb29fSJung-uk Kim YYParseState *save = yypath; 1495*b53bb29fSJung-uk Kim yypath = save->save; 1496*b53bb29fSJung-uk Kim save->save = NULL; 1497*b53bb29fSJung-uk Kim yyFreeState(save); 1498*b53bb29fSJung-uk Kim } 1499*b53bb29fSJung-uk Kim #endif /* YYBTYACC */ 1500*b53bb29fSJung-uk Kim yyfreestack(&yystack); 1501*b53bb29fSJung-uk Kim return (yyresult); 1502*b53bb29fSJung-uk Kim } 1503