#ifndef lint static char const yysccsid[] = "@(#)yaccpar 1.9 (Berkeley) 02/21/93"; #endif #include #define YYBYACC 1 #define YYMAJOR 1 #define YYMINOR 9 #define YYLEX yylex() #define YYEMPTY -1 #define yyclearin (yychar=(YYEMPTY)) #define yyerrok (yyerrflag=0) #define YYRECOVERING (yyerrflag!=0) #if defined(c_plusplus) || defined(__cplusplus) #include #else extern char *getenv(); extern void *realloc(); #endif static int yygrowstack(); #define YYPREFIX "yy" #line 3 "parse.y" #define malloc(x) GC_malloc(x) #define realloc(x,y) GC_realloc(x,y) #define free(x) GC_free(x) #if defined(THINK_C) #define alloca(x) GC_malloc(x) #endif #if defined(TOWNS) #include #endif #include #include "ca.h" #if !defined(THINK_C) #include #include #endif #include "parse.h" #define NOPR (prresult=0) extern int gdef; extern SNODE parse_snode; extern int main_parser; int prresult; static int ind; static FNODE t; static NODE a,b; static NODE2 a2; static pointer val; extern jmp_buf env; #line 39 "parse.y" typedef union { FNODE f; SNODE s; NODE n; NODE2 n2; int i; pointer p; } YYSTYPE; #line 64 "y.tab.c" #define STRUCT 257 #define POINT 258 #define NEWSTRUCT 259 #define ANS 260 #define FDEF 261 #define PFDEF 262 #define GLOBAL 263 #define CMP 264 #define OR 265 #define AND 266 #define CAR 267 #define CDR 268 #define DO 269 #define WHILE 270 #define FOR 271 #define IF 272 #define ELSE 273 #define BREAK 274 #define RETURN 275 #define CONTINUE 276 #define PARIF 277 #define MAP 278 #define TIMER 279 #define GF2NGEN 280 #define GFPNGEN 281 #define GETOPT 282 #define FOP_AND 283 #define FOP_OR 284 #define FOP_IMPL 285 #define FOP_REPL 286 #define FOP_EQUIV 287 #define FOP_NOT 288 #define LOP 289 #define FORMULA 290 #define UCASE 291 #define LCASE 292 #define STR 293 #define SELF 294 #define BOPASS 295 #define PLUS 296 #define MINUS 297 #define YYERRCODE 256 const short yylhs[] = { -1, 0, 6, 16, 17, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 18, 6, 6, 15, 15, 1, 1, 7, 12, 12, 12, 13, 13, 11, 11, 8, 8, 9, 9, 10, 10, 14, 14, 2, 2, 5, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, }; const short yylen[] = { 2, 1, 1, 0, 0, 5, 6, 7, 4, 2, 1, 2, 2, 2, 3, 5, 7, 9, 5, 7, 8, 5, 0, 10, 2, 1, 1, 0, 1, 3, 0, 3, 5, 1, 3, 1, 3, 0, 2, 0, 1, 1, 3, 1, 3, 1, 1, 3, 1, 1, 1, 1, 1, 1, 4, 6, 7, 4, 6, 8, 6, 7, 4, 4, 3, 1, 4, 3, 1, 5, 3, 3, 2, 2, 3, 2, 2, 3, 3, 3, 3, 3, 3, 3, 2, 3, 3, 2, 3, 3, 3, 3, 3, 3, 5, 3, 4, }; const short yydefred[] = { 0, 0, 0, 0, 50, 0, 0, 3, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 51, 52, 0, 0, 49, 65, 0, 48, 0, 0, 0, 0, 37, 0, 25, 26, 0, 0, 0, 0, 0, 1, 10, 2, 24, 45, 46, 0, 0, 22, 0, 0, 0, 0, 0, 0, 0, 0, 11, 0, 0, 13, 12, 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, 72, 0, 0, 0, 0, 0, 0, 0, 0, 0, 9, 0, 0, 35, 30, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 14, 0, 0, 0, 0, 0, 0, 29, 38, 0, 0, 64, 74, 0, 95, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 67, 0, 0, 0, 8, 96, 0, 0, 0, 62, 63, 0, 0, 0, 0, 0, 0, 0, 0, 57, 0, 0, 0, 0, 0, 0, 0, 66, 0, 0, 33, 0, 36, 0, 21, 5, 0, 18, 0, 0, 54, 0, 0, 0, 0, 0, 0, 43, 0, 0, 0, 0, 0, 0, 0, 6, 0, 31, 0, 0, 0, 0, 60, 58, 0, 0, 0, 0, 55, 0, 0, 0, 7, 34, 28, 0, 19, 0, 16, 0, 56, 0, 0, 44, 61, 32, 37, 0, 59, 20, 0, 17, 23, }; const short yydgoto[] = { 38, 226, 181, 78, 40, 198, 126, 42, 74, 79, 80, 106, 153, 182, 199, 43, 51, 159, 108, }; const short yysindex[] = { 119, 3, -214, -16, 0, -288, -275, 0, 8, 18, 119, 25, 29, 32, 3, 155, 3, 34, 41, 42, 0, 0, 44, 458, 0, 0, -25, 0, 458, 458, 458, 458, 0, 193, 0, 0, 458, 458, 0, 1376, -84, 0, 0, 0, 0, 0, 0, -114, -214, 0, 46, -201, 458, 458, -179, 458, 458, 458, 0, -20, 1376, 0, 0, -195, -187, 458, -214, 2001, 458, 458, -186, 12, 12, -186, 40, -214, 458, 1522, 1943, 17, 63, 47, 458, 458, 458, 458, 458, 458, 458, 458, 458, 0, 458, 458, 458, 458, 458, 458, 458, 458, 458, 0, -214, 458, 0, 0, 7, 70, 72, 458, 71, 1675, 1733, 74, 76, 62, 86, 458, 0, 84, 92, 1776, 96, 19, -31, 0, 0, 101, 1789, 0, 0, 458, 0, -7, 600, 987, 467, 2118, 2056, 1860, 720, 757, 1943, 12, 12, -92, -92, -92, -92, 1943, 1826, 0, 1853, -122, -148, 0, 0, 458, 104, 3, 0, 0, 458, 119, 458, 119, 6, 458, 458, 458, 0, 106, 90, -214, 2037, 109, 1943, 458, 0, -214, -17, 0, 20, 0, 110, 0, 0, 113, 0, 97, -116, 0, 117, 120, 1887, 458, 99, 105, 0, -28, 422, -84, 458, 1988, -214, 7, 0, -214, 0, -125, 3, 458, 119, 0, 0, 458, 132, 458, 458, 0, -214, 135, 20, 0, 0, 0, 57, 0, 141, 0, 1930, 0, 1376, 1943, 0, 0, 0, 0, 119, 0, 0, 80, 0, 0, }; const short yyrindex[] = { 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, 1100, 0, 0, 0, 0, 0, 0, 0, 0, 0, 93, 121, 0, 0, 526, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 146, 137, 146, 0, 489, 0, 0, 0, 0, 0, 0, 0, -30, 79, 14, 818, 1032, 1209, 846, 0, 0, 0, 0, 88, 0, 435, 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, 146, 16, 0, 0, 0, 0, 0, 0, 14, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1418, 1477, 1464, -36, 1424, 131, 1631, 605, 1571, 60, 1267, 1309, 886, 914, 954, 999, 1149, 0, 0, 0, 0, 0, 0, 0, 146, 0, 0, 0, 0, 146, 0, 137, 0, 0, 146, 146, 0, 0, 0, 1361, 0, 0, 0, 397, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 146, 0, 0, 0, 0, 0, 563, 146, 9, 0, 0, 0, 0, 0, 78, 0, 146, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -23, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, }; const short yygindex[] = { 0, 0, 694, 2334, 23, -21, 468, 0, -29, 2398, 0, -39, 0, 2, 0, 2309, 0, 0, 0, }; #define YYTABLESIZE 2609 const short yytable[] = { 88, 15, 97, 180, 49, 88, 87, 103, 88, 105, 172, 87, 110, 219, 87, 69, 220, 50, 47, 35, 117, 47, 88, 88, 48, 88, 88, 88, 87, 87, 98, 87, 87, 87, 15, 95, 93, 15, 94, 35, 96, 15, 34, 35, 15, 94, 15, 191, 52, 98, 94, 154, 4, 94, 95, 39, 35, 88, 53, 96, 15, 15, 34, 87, 207, 55, 34, 94, 94, 56, 94, 94, 57, 31, 63, 4, 35, 45, 46, 34, 33, 64, 65, 29, 66, 30, 109, 97, 88, 88, 104, 113, 15, 173, 87, 87, 71, 119, 68, 34, 37, 71, 94, 68, 71, 120, 97, 131, 91, 132, 130, 156, 157, 31, 162, 154, 35, 163, 71, 71, 33, 164, 71, 29, 15, 30, 15, 165, 167, 41, 173, 36, 41, 94, 94, 179, 168, 170, 39, 34, 37, 205, 174, 183, 171, 185, 195, 41, 196, 202, 41, 209, 31, 71, 210, 35, 211, 212, 213, 33, 217, 214, 29, 32, 30, 125, 218, 90, 225, 45, 46, 36, 90, 231, 102, 90, 235, 104, 34, 37, 237, 41, 238, 39, 71, 71, 39, 39, 31, 90, 90, 35, 90, 90, 90, 33, 39, 201, 29, 234, 30, 27, 91, 32, 39, 243, 222, 0, 241, 0, 36, 0, 41, 41, 34, 37, 0, 0, 0, 0, 0, 0, 0, 0, 90, 0, 31, 0, 0, 0, 0, 0, 0, 33, 0, 76, 29, 0, 30, 0, 0, 0, 32, 0, 0, 0, 36, 88, 88, 88, 88, 88, 0, 37, 0, 90, 90, 15, 15, 88, 15, 15, 15, 15, 15, 87, 0, 0, 15, 15, 15, 15, 15, 15, 104, 15, 15, 15, 15, 15, 15, 15, 15, 15, 36, 0, 0, 91, 0, 15, 0, 15, 15, 15, 15, 15, 1, 2, 0, 3, 4, 5, 6, 7, 94, 0, 91, 8, 9, 10, 11, 12, 13, 0, 14, 15, 16, 17, 18, 19, 20, 21, 22, 0, 0, 0, 0, 0, 23, 0, 24, 25, 26, 27, 28, 0, 1, 2, 0, 3, 4, 5, 6, 7, 0, 0, 0, 8, 9, 10, 11, 12, 13, 0, 14, 15, 16, 17, 18, 19, 20, 21, 22, 0, 0, 0, 0, 0, 23, 0, 24, 25, 26, 27, 28, 1, 2, 0, 3, 4, 5, 6, 7, 0, 0, 0, 8, 9, 10, 11, 12, 13, 0, 14, 15, 16, 17, 18, 19, 20, 21, 22, 0, 0, 0, 0, 0, 23, 0, 24, 25, 26, 27, 28, 3, 4, 90, 90, 90, 0, 0, 0, 8, 9, 0, 0, 90, 0, 0, 0, 0, 0, 17, 18, 19, 20, 21, 22, 42, 0, 0, 42, 0, 23, 0, 24, 25, 59, 27, 28, 75, 0, 3, 4, 0, 31, 42, 0, 0, 42, 8, 9, 33, 0, 76, 29, 0, 30, 41, 0, 17, 18, 19, 20, 21, 22, 40, 0, 54, 0, 0, 23, 37, 24, 25, 59, 27, 28, 0, 0, 42, 31, 0, 0, 40, 0, 0, 40, 33, 0, 0, 29, 0, 30, 98, 0, 0, 0, 0, 95, 93, 0, 94, 36, 96, 0, 0, 0, 37, 0, 0, 42, 42, 0, 0, 53, 53, 0, 40, 0, 53, 53, 53, 53, 53, 0, 53, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 53, 53, 36, 53, 53, 53, 0, 0, 0, 0, 0, 0, 40, 40, 97, 68, 68, 0, 0, 0, 68, 68, 68, 68, 68, 0, 68, 0, 0, 0, 0, 0, 0, 53, 0, 53, 53, 68, 68, 0, 68, 68, 68, 0, 0, 0, 0, 0, 0, 0, 0, 0, 69, 69, 0, 0, 0, 69, 69, 69, 69, 69, 0, 69, 0, 0, 53, 53, 0, 0, 0, 0, 68, 68, 69, 69, 0, 69, 69, 69, 0, 0, 0, 0, 188, 0, 190, 0, 0, 0, 98, 0, 0, 0, 92, 95, 93, 0, 94, 92, 96, 0, 92, 68, 68, 0, 0, 0, 0, 69, 69, 0, 0, 0, 0, 0, 92, 92, 0, 92, 92, 92, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 229, 3, 4, 0, 0, 0, 0, 69, 69, 8, 9, 0, 0, 0, 97, 0, 47, 0, 92, 17, 18, 19, 20, 21, 22, 0, 242, 0, 0, 0, 23, 0, 24, 25, 59, 27, 28, 3, 4, 0, 0, 0, 0, 0, 0, 8, 9, 0, 0, 92, 92, 82, 83, 84, 0, 17, 18, 19, 20, 21, 22, 0, 107, 0, 0, 0, 23, 53, 24, 25, 59, 27, 28, 53, 53, 53, 90, 98, 0, 0, 122, 91, 95, 93, 0, 94, 0, 96, 0, 127, 0, 0, 53, 53, 53, 53, 53, 0, 53, 0, 0, 0, 0, 53, 53, 0, 0, 0, 0, 0, 68, 68, 68, 0, 98, 0, 151, 0, 0, 95, 93, 0, 94, 0, 96, 0, 0, 0, 0, 68, 68, 68, 68, 68, 97, 68, 0, 0, 0, 0, 68, 68, 0, 0, 0, 0, 0, 69, 69, 69, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 69, 69, 69, 69, 69, 97, 69, 0, 73, 73, 0, 69, 69, 73, 73, 73, 73, 73, 82, 73, 84, 197, 0, 0, 0, 0, 0, 204, 0, 0, 73, 73, 0, 73, 73, 73, 84, 84, 0, 0, 0, 84, 84, 84, 84, 84, 92, 84, 91, 0, 0, 0, 0, 0, 92, 224, 0, 0, 84, 84, 0, 84, 84, 84, 0, 73, 73, 0, 197, 0, 0, 0, 0, 0, 0, 0, 79, 79, 0, 0, 0, 79, 79, 79, 79, 79, 0, 79, 0, 0, 0, 0, 0, 84, 84, 0, 73, 73, 79, 79, 0, 79, 79, 79, 80, 80, 0, 0, 0, 80, 80, 80, 80, 80, 0, 80, 0, 0, 0, 0, 0, 0, 0, 0, 84, 84, 80, 80, 0, 80, 80, 80, 0, 79, 0, 0, 0, 0, 82, 83, 84, 0, 0, 0, 82, 82, 0, 0, 0, 82, 82, 82, 82, 82, 0, 82, 0, 85, 86, 87, 88, 80, 0, 90, 79, 79, 82, 82, 91, 82, 82, 82, 0, 0, 0, 82, 83, 84, 98, 0, 0, 0, 0, 95, 93, 0, 94, 0, 96, 81, 81, 0, 80, 80, 81, 81, 81, 81, 81, 0, 81, 82, 0, 0, 0, 91, 0, 0, 0, 0, 0, 81, 81, 0, 81, 81, 81, 0, 0, 0, 0, 0, 75, 0, 0, 0, 0, 75, 0, 75, 75, 75, 82, 82, 0, 97, 73, 73, 73, 0, 0, 0, 0, 0, 75, 75, 81, 75, 75, 75, 0, 0, 0, 0, 0, 73, 73, 73, 73, 73, 0, 73, 0, 0, 84, 84, 84, 73, 0, 0, 0, 0, 0, 0, 0, 0, 0, 81, 81, 75, 0, 0, 0, 84, 84, 84, 84, 84, 0, 84, 53, 53, 0, 0, 0, 84, 53, 53, 0, 53, 0, 53, 0, 0, 79, 79, 79, 0, 0, 0, 75, 75, 0, 53, 0, 53, 0, 53, 0, 0, 0, 0, 0, 79, 79, 79, 79, 79, 0, 79, 0, 0, 80, 80, 80, 79, 0, 0, 0, 70, 0, 0, 0, 0, 70, 53, 0, 70, 53, 0, 0, 80, 80, 80, 80, 80, 0, 80, 0, 0, 0, 70, 70, 80, 0, 70, 0, 0, 0, 0, 0, 0, 82, 82, 82, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 82, 82, 82, 82, 82, 70, 82, 0, 76, 0, 0, 0, 82, 76, 82, 76, 76, 76, 0, 0, 0, 0, 0, 0, 0, 0, 81, 81, 81, 0, 76, 76, 0, 76, 76, 76, 70, 70, 0, 0, 0, 0, 0, 0, 91, 81, 81, 81, 81, 81, 0, 81, 0, 0, 0, 0, 0, 81, 0, 75, 75, 75, 0, 0, 0, 76, 77, 0, 0, 0, 0, 77, 0, 77, 77, 77, 0, 0, 75, 75, 75, 75, 75, 0, 75, 0, 0, 0, 77, 77, 75, 77, 77, 77, 0, 0, 76, 76, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 78, 0, 0, 0, 0, 78, 0, 78, 78, 78, 0, 0, 0, 53, 0, 77, 0, 0, 0, 53, 53, 53, 78, 78, 0, 78, 78, 78, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 53, 53, 53, 53, 53, 0, 53, 0, 77, 77, 0, 53, 53, 0, 54, 54, 0, 0, 0, 78, 54, 54, 0, 54, 0, 54, 0, 0, 0, 35, 98, 0, 0, 0, 0, 95, 93, 54, 94, 54, 96, 54, 0, 0, 0, 0, 0, 0, 0, 0, 78, 78, 34, 0, 99, 0, 100, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 54, 0, 83, 54, 0, 0, 0, 83, 89, 0, 83, 0, 0, 89, 0, 0, 89, 0, 97, 0, 0, 76, 76, 76, 83, 83, 0, 83, 83, 83, 89, 89, 0, 89, 89, 89, 0, 0, 0, 0, 76, 76, 76, 76, 76, 0, 76, 0, 86, 0, 0, 0, 76, 86, 0, 0, 86, 0, 0, 83, 0, 85, 0, 0, 0, 89, 85, 0, 0, 85, 86, 86, 0, 86, 86, 86, 0, 0, 0, 77, 77, 77, 0, 85, 85, 0, 85, 85, 85, 0, 83, 83, 0, 0, 0, 0, 89, 89, 77, 77, 77, 77, 77, 0, 77, 86, 0, 98, 0, 0, 77, 129, 95, 93, 0, 94, 0, 96, 85, 0, 0, 78, 78, 78, 0, 0, 0, 0, 0, 0, 0, 99, 0, 100, 0, 0, 86, 86, 0, 0, 78, 78, 78, 78, 78, 0, 78, 0, 0, 85, 85, 0, 78, 0, 0, 93, 0, 0, 0, 0, 93, 0, 0, 93, 97, 0, 0, 54, 0, 0, 0, 0, 0, 54, 54, 54, 0, 93, 93, 0, 93, 93, 93, 0, 0, 0, 0, 0, 82, 83, 84, 0, 54, 54, 54, 54, 54, 0, 54, 0, 0, 0, 0, 54, 54, 0, 0, 85, 86, 87, 88, 89, 93, 90, 0, 91, 0, 0, 91, 92, 91, 0, 0, 91, 0, 0, 0, 0, 0, 0, 83, 83, 83, 0, 0, 0, 0, 91, 91, 0, 91, 91, 91, 93, 93, 0, 0, 0, 0, 83, 83, 83, 83, 83, 0, 83, 89, 89, 89, 89, 98, 83, 0, 0, 160, 95, 93, 89, 94, 0, 96, 0, 91, 0, 0, 0, 0, 86, 86, 0, 0, 0, 0, 0, 99, 0, 100, 0, 0, 0, 85, 0, 0, 0, 0, 86, 86, 86, 86, 86, 0, 86, 0, 91, 91, 0, 0, 86, 85, 85, 85, 85, 85, 0, 85, 0, 0, 97, 98, 0, 85, 0, 161, 95, 93, 0, 94, 0, 96, 0, 0, 0, 0, 0, 82, 83, 84, 0, 0, 0, 0, 0, 99, 0, 100, 0, 0, 0, 0, 0, 0, 0, 0, 85, 86, 87, 88, 89, 0, 90, 0, 98, 0, 0, 91, 92, 95, 93, 169, 94, 0, 96, 0, 0, 98, 97, 0, 0, 175, 95, 93, 0, 94, 0, 96, 99, 0, 100, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 99, 0, 100, 0, 93, 93, 93, 93, 93, 0, 93, 0, 0, 98, 0, 0, 93, 0, 95, 93, 97, 94, 0, 96, 0, 0, 0, 0, 0, 0, 0, 0, 0, 97, 177, 0, 0, 99, 0, 100, 98, 0, 0, 0, 0, 95, 93, 98, 94, 0, 96, 0, 95, 93, 0, 94, 0, 96, 0, 0, 0, 0, 0, 0, 99, 0, 100, 91, 91, 0, 97, 0, 0, 0, 98, 0, 91, 0, 0, 95, 93, 215, 94, 0, 96, 0, 0, 0, 0, 82, 83, 84, 0, 0, 0, 0, 178, 97, 99, 0, 100, 0, 0, 0, 97, 0, 0, 0, 85, 86, 87, 88, 89, 0, 90, 0, 0, 98, 0, 91, 92, 239, 95, 93, 0, 94, 0, 96, 0, 0, 98, 97, 0, 0, 0, 95, 93, 0, 94, 0, 96, 99, 0, 100, 0, 0, 0, 82, 83, 84, 0, 0, 0, 0, 99, 0, 100, 0, 0, 0, 0, 0, 0, 0, 0, 0, 85, 86, 87, 88, 89, 0, 90, 0, 97, 98, 0, 91, 92, 0, 95, 93, 0, 94, 0, 96, 0, 97, 98, 0, 82, 83, 84, 95, 93, 0, 94, 0, 96, 0, 0, 100, 0, 82, 83, 84, 0, 0, 0, 85, 86, 87, 88, 89, 0, 90, 0, 0, 0, 0, 91, 92, 85, 86, 87, 88, 89, 200, 90, 0, 0, 0, 97, 91, 92, 0, 0, 0, 0, 0, 82, 83, 84, 98, 0, 97, 0, 0, 95, 93, 0, 94, 0, 96, 0, 0, 0, 0, 0, 85, 86, 87, 88, 89, 0, 90, 0, 82, 83, 84, 91, 92, 0, 0, 82, 83, 84, 0, 0, 0, 0, 0, 0, 0, 0, 0, 85, 86, 87, 88, 89, 0, 90, 85, 86, 87, 0, 91, 92, 90, 97, 82, 83, 84, 91, 98, 0, 0, 0, 0, 95, 93, 0, 94, 0, 96, 0, 0, 0, 0, 85, 86, 87, 88, 89, 0, 90, 0, 0, 0, 0, 91, 92, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 82, 83, 84, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 82, 83, 84, 0, 0, 97, 85, 86, 87, 88, 89, 0, 90, 0, 0, 0, 0, 91, 92, 85, 86, 87, 88, 89, 0, 90, 0, 0, 0, 0, 91, 92, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 82, 83, 84, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 82, 83, 84, 0, 0, 0, 85, 86, 87, 88, 89, 0, 90, 0, 0, 0, 0, 91, 0, 85, 86, 87, 88, 89, 0, 90, 0, 0, 0, 0, 91, 0, 4, 0, 0, 0, 0, 0, 0, 8, 9, 0, 0, 0, 0, 44, 0, 0, 0, 17, 18, 19, 20, 21, 22, 82, 83, 84, 58, 61, 62, 0, 24, 25, 59, 27, 0, 0, 0, 39, 0, 0, 0, 0, 85, 86, 0, 0, 0, 39, 90, 0, 0, 101, 60, 91, 0, 0, 0, 0, 0, 0, 67, 0, 0, 0, 0, 70, 71, 72, 73, 0, 77, 0, 118, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 82, 83, 84, 0, 111, 112, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 121, 0, 85, 0, 0, 0, 0, 0, 90, 39, 0, 128, 0, 91, 0, 0, 155, 133, 134, 135, 136, 137, 138, 139, 140, 141, 0, 142, 143, 144, 145, 146, 147, 148, 149, 150, 81, 0, 152, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 114, 115, 116, 0, 0, 0, 0, 0, 0, 0, 0, 0, 176, 123, 124, 186, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 206, 0, 208, 0, 0, 0, 0, 0, 39, 0, 39, 0, 0, 0, 194, 0, 0, 0, 158, 0, 0, 0, 203, 0, 0, 223, 166, 0, 0, 0, 227, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 236, 0, 0, 77, 0, 0, 0, 0, 0, 0, 240, 0, 0, 0, 0, 39, 0, 0, 230, 0, 232, 233, 0, 0, 184, 0, 0, 0, 0, 187, 0, 189, 0, 0, 192, 193, 0, 0, 0, 0, 0, 39, 0, 0, 39, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 216, 0, 0, 0, 0, 0, 0, 221, 0, 0, 0, 0, 0, 0, 0, 0, 228, }; const short yycheck[] = { 36, 0, 94, 125, 292, 41, 36, 91, 44, 123, 41, 41, 51, 41, 44, 40, 44, 292, 41, 36, 40, 44, 58, 59, 40, 61, 62, 63, 58, 59, 37, 61, 62, 63, 33, 42, 43, 36, 45, 36, 47, 40, 59, 36, 43, 36, 45, 41, 40, 37, 41, 44, 36, 44, 42, 41, 36, 93, 40, 47, 59, 60, 59, 93, 44, 40, 59, 58, 59, 40, 61, 62, 40, 33, 40, 59, 36, 291, 292, 59, 40, 40, 40, 43, 40, 45, 40, 94, 124, 125, 291, 270, 91, 124, 124, 125, 36, 292, 123, 59, 60, 41, 93, 123, 44, 292, 94, 44, 294, 62, 93, 41, 40, 33, 40, 44, 36, 41, 58, 59, 40, 59, 62, 43, 123, 45, 125, 41, 44, 41, 124, 91, 44, 124, 125, 257, 44, 41, 124, 59, 60, 180, 41, 291, 125, 41, 40, 59, 58, 40, 62, 41, 33, 93, 41, 36, 59, 273, 41, 40, 61, 41, 43, 123, 45, 125, 61, 36, 293, 291, 292, 91, 41, 41, 258, 44, 41, 291, 59, 60, 123, 93, 41, 62, 124, 125, 93, 41, 33, 58, 59, 36, 61, 62, 63, 40, 59, 174, 43, 220, 45, 123, 294, 123, 125, 125, 204, -1, 237, -1, 91, -1, 124, 125, 59, 60, -1, -1, -1, -1, -1, -1, -1, -1, 93, -1, 33, -1, -1, -1, -1, -1, -1, 40, -1, 42, 43, -1, 45, -1, -1, -1, 123, -1, -1, -1, 91, 283, 284, 285, 286, 287, -1, 60, -1, 124, 125, 256, 257, 295, 259, 260, 261, 262, 263, 295, -1, -1, 267, 268, 269, 270, 271, 272, 291, 274, 275, 276, 277, 278, 279, 280, 281, 282, 91, -1, -1, 294, -1, 288, -1, 290, 291, 292, 293, 294, 256, 257, -1, 259, 260, 261, 262, 263, 295, -1, 294, 267, 268, 269, 270, 271, 272, -1, 274, 275, 276, 277, 278, 279, 280, 281, 282, -1, -1, -1, -1, -1, 288, -1, 290, 291, 292, 293, 294, -1, 256, 257, -1, 259, 260, 261, 262, 263, -1, -1, -1, 267, 268, 269, 270, 271, 272, -1, 274, 275, 276, 277, 278, 279, 280, 281, 282, -1, -1, -1, -1, -1, 288, -1, 290, 291, 292, 293, 294, 256, 257, -1, 259, 260, 261, 262, 263, -1, -1, -1, 267, 268, 269, 270, 271, 272, -1, 274, 275, 276, 277, 278, 279, 280, 281, 282, -1, -1, -1, -1, -1, 288, -1, 290, 291, 292, 293, 294, 259, 260, 285, 286, 287, -1, -1, -1, 267, 268, -1, -1, 295, -1, -1, -1, -1, -1, 277, 278, 279, 280, 281, 282, 41, -1, -1, 44, -1, 288, -1, 290, 291, 292, 293, 294, 257, -1, 259, 260, -1, 33, 59, -1, -1, 62, 267, 268, 40, -1, 42, 43, -1, 45, 0, -1, 277, 278, 279, 280, 281, 282, 41, -1, 10, -1, -1, 288, 60, 290, 291, 292, 293, 294, -1, -1, 93, 33, -1, -1, 59, -1, -1, 62, 40, -1, -1, 43, -1, 45, 37, -1, -1, -1, -1, 42, 43, -1, 45, 91, 47, -1, -1, -1, 60, -1, -1, 124, 125, -1, -1, 36, 37, -1, 93, -1, 41, 42, 43, 44, 45, -1, 47, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 58, 59, 91, 61, 62, 63, -1, -1, -1, -1, -1, -1, 124, 125, 94, 36, 37, -1, -1, -1, 41, 42, 43, 44, 45, -1, 47, -1, -1, -1, -1, -1, -1, 91, -1, 93, 94, 58, 59, -1, 61, 62, 63, -1, -1, -1, -1, -1, -1, -1, -1, -1, 36, 37, -1, -1, -1, 41, 42, 43, 44, 45, -1, 47, -1, -1, 124, 125, -1, -1, -1, -1, 93, 94, 58, 59, -1, 61, 62, 63, -1, -1, -1, -1, 163, -1, 165, -1, -1, -1, 37, -1, -1, -1, 36, 42, 43, -1, 45, 41, 47, -1, 44, 124, 125, -1, -1, -1, -1, 93, 94, -1, -1, -1, -1, -1, 58, 59, -1, 61, 62, 63, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 212, 259, 260, -1, -1, -1, -1, 124, 125, 267, 268, -1, -1, -1, 94, -1, 2, -1, 93, 277, 278, 279, 280, 281, 282, -1, 238, -1, -1, -1, 288, -1, 290, 291, 292, 293, 294, 259, 260, -1, -1, -1, -1, -1, -1, 267, 268, -1, -1, 124, 125, 264, 265, 266, -1, 277, 278, 279, 280, 281, 282, -1, 48, -1, -1, -1, 288, 258, 290, 291, 292, 293, 294, 264, 265, 266, 289, 37, -1, -1, 66, 294, 42, 43, -1, 45, -1, 47, -1, 75, -1, -1, 283, 284, 285, 286, 287, -1, 289, -1, -1, -1, -1, 294, 295, -1, -1, -1, -1, -1, 264, 265, 266, -1, 37, -1, 102, -1, -1, 42, 43, -1, 45, -1, 47, -1, -1, -1, -1, 283, 284, 285, 286, 287, 94, 289, -1, -1, -1, -1, 294, 295, -1, -1, -1, -1, -1, 264, 265, 266, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 283, 284, 285, 286, 287, 94, 289, -1, 36, 37, -1, 294, 295, 41, 42, 43, 44, 45, 264, 47, 266, 173, -1, -1, -1, -1, -1, 179, -1, -1, 58, 59, -1, 61, 62, 63, 36, 37, -1, -1, -1, 41, 42, 43, 44, 45, 287, 47, 294, -1, -1, -1, -1, -1, 295, 207, -1, -1, 58, 59, -1, 61, 62, 63, -1, 93, 94, -1, 220, -1, -1, -1, -1, -1, -1, -1, 36, 37, -1, -1, -1, 41, 42, 43, 44, 45, -1, 47, -1, -1, -1, -1, -1, 93, 94, -1, 124, 125, 58, 59, -1, 61, 62, 63, 36, 37, -1, -1, -1, 41, 42, 43, 44, 45, -1, 47, -1, -1, -1, -1, -1, -1, -1, -1, 124, 125, 58, 59, -1, 61, 62, 63, -1, 93, -1, -1, -1, -1, 264, 265, 266, -1, -1, -1, 36, 37, -1, -1, -1, 41, 42, 43, 44, 45, -1, 47, -1, 283, 284, 285, 286, 93, -1, 289, 124, 125, 58, 59, 294, 61, 62, 63, -1, -1, -1, 264, 265, 266, 37, -1, -1, -1, -1, 42, 43, -1, 45, -1, 47, 36, 37, -1, 124, 125, 41, 42, 43, 44, 45, -1, 47, 93, -1, -1, -1, 294, -1, -1, -1, -1, -1, 58, 59, -1, 61, 62, 63, -1, -1, -1, -1, -1, 36, -1, -1, -1, -1, 41, -1, 43, 44, 45, 124, 125, -1, 94, 264, 265, 266, -1, -1, -1, -1, -1, 58, 59, 93, 61, 62, 63, -1, -1, -1, -1, -1, 283, 284, 285, 286, 287, -1, 289, -1, -1, 264, 265, 266, 295, -1, -1, -1, -1, -1, -1, -1, -1, -1, 124, 125, 93, -1, -1, -1, 283, 284, 285, 286, 287, -1, 289, 36, 37, -1, -1, -1, 295, 42, 43, -1, 45, -1, 47, -1, -1, 264, 265, 266, -1, -1, -1, 124, 125, -1, 59, -1, 61, -1, 63, -1, -1, -1, -1, -1, 283, 284, 285, 286, 287, -1, 289, -1, -1, 264, 265, 266, 295, -1, -1, -1, 36, -1, -1, -1, -1, 41, 91, -1, 44, 94, -1, -1, 283, 284, 285, 286, 287, -1, 289, -1, -1, -1, 58, 59, 295, -1, 62, -1, -1, -1, -1, -1, -1, 264, 265, 266, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 283, 284, 285, 286, 287, 93, 289, -1, 36, -1, -1, -1, 295, 41, 264, 43, 44, 45, -1, -1, -1, -1, -1, -1, -1, -1, 264, 265, 266, -1, 58, 59, -1, 61, 62, 63, 124, 125, -1, -1, -1, -1, -1, -1, 294, 283, 284, 285, 286, 287, -1, 289, -1, -1, -1, -1, -1, 295, -1, 264, 265, 266, -1, -1, -1, 93, 36, -1, -1, -1, -1, 41, -1, 43, 44, 45, -1, -1, 283, 284, 285, 286, 287, -1, 289, -1, -1, -1, 58, 59, 295, 61, 62, 63, -1, -1, 124, 125, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 36, -1, -1, -1, -1, 41, -1, 43, 44, 45, -1, -1, -1, 258, -1, 93, -1, -1, -1, 264, 265, 266, 58, 59, -1, 61, 62, 63, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 283, 284, 285, 286, 287, -1, 289, -1, 124, 125, -1, 294, 295, -1, 36, 37, -1, -1, -1, 93, 42, 43, -1, 45, -1, 47, -1, -1, -1, 36, 37, -1, -1, -1, -1, 42, 43, 59, 45, 61, 47, 63, -1, -1, -1, -1, -1, -1, -1, -1, 124, 125, 59, -1, 61, -1, 63, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 91, -1, 36, 94, -1, -1, -1, 41, 36, -1, 44, -1, -1, 41, -1, -1, 44, -1, 94, -1, -1, 264, 265, 266, 58, 59, -1, 61, 62, 63, 58, 59, -1, 61, 62, 63, -1, -1, -1, -1, 283, 284, 285, 286, 287, -1, 289, -1, 36, -1, -1, -1, 295, 41, -1, -1, 44, -1, -1, 93, -1, 36, -1, -1, -1, 93, 41, -1, -1, 44, 58, 59, -1, 61, 62, 63, -1, -1, -1, 264, 265, 266, -1, 58, 59, -1, 61, 62, 63, -1, 124, 125, -1, -1, -1, -1, 124, 125, 283, 284, 285, 286, 287, -1, 289, 93, -1, 37, -1, -1, 295, 41, 42, 43, -1, 45, -1, 47, 93, -1, -1, 264, 265, 266, -1, -1, -1, -1, -1, -1, -1, 61, -1, 63, -1, -1, 124, 125, -1, -1, 283, 284, 285, 286, 287, -1, 289, -1, -1, 124, 125, -1, 295, -1, -1, 36, -1, -1, -1, -1, 41, -1, -1, 44, 94, -1, -1, 258, -1, -1, -1, -1, -1, 264, 265, 266, -1, 58, 59, -1, 61, 62, 63, -1, -1, -1, -1, -1, 264, 265, 266, -1, 283, 284, 285, 286, 287, -1, 289, -1, -1, -1, -1, 294, 295, -1, -1, 283, 284, 285, 286, 287, 93, 289, -1, 36, -1, -1, 294, 295, 41, -1, -1, 44, -1, -1, -1, -1, -1, -1, 264, 265, 266, -1, -1, -1, -1, 58, 59, -1, 61, 62, 63, 124, 125, -1, -1, -1, -1, 283, 284, 285, 286, 287, -1, 289, 284, 285, 286, 287, 37, 295, -1, -1, 41, 42, 43, 295, 45, -1, 47, -1, 93, -1, -1, -1, -1, 265, 266, -1, -1, -1, -1, -1, 61, -1, 63, -1, -1, -1, 265, -1, -1, -1, -1, 283, 284, 285, 286, 287, -1, 289, -1, 124, 125, -1, -1, 295, 283, 284, 285, 286, 287, -1, 289, -1, -1, 94, 37, -1, 295, -1, 41, 42, 43, -1, 45, -1, 47, -1, -1, -1, -1, -1, 264, 265, 266, -1, -1, -1, -1, -1, 61, -1, 63, -1, -1, -1, -1, -1, -1, -1, -1, 283, 284, 285, 286, 287, -1, 289, -1, 37, -1, -1, 294, 295, 42, 43, 44, 45, -1, 47, -1, -1, 37, 94, -1, -1, 41, 42, 43, -1, 45, -1, 47, 61, -1, 63, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 61, -1, 63, -1, 283, 284, 285, 286, 287, -1, 289, -1, -1, 37, -1, -1, 295, -1, 42, 43, 94, 45, -1, 47, -1, -1, -1, -1, -1, -1, -1, -1, -1, 94, 58, -1, -1, 61, -1, 63, 37, -1, -1, -1, -1, 42, 43, 37, 45, -1, 47, -1, 42, 43, -1, 45, -1, 47, -1, -1, -1, -1, -1, -1, 61, -1, 63, 286, 287, -1, 94, -1, -1, -1, 37, -1, 295, -1, -1, 42, 43, 44, 45, -1, 47, -1, -1, -1, -1, 264, 265, 266, -1, -1, -1, -1, 93, 94, 61, -1, 63, -1, -1, -1, 94, -1, -1, -1, 283, 284, 285, 286, 287, -1, 289, -1, -1, 37, -1, 294, 295, 41, 42, 43, -1, 45, -1, 47, -1, -1, 37, 94, -1, -1, -1, 42, 43, -1, 45, -1, 47, 61, -1, 63, -1, -1, -1, 264, 265, 266, -1, -1, -1, -1, 61, -1, 63, -1, -1, -1, -1, -1, -1, -1, -1, -1, 283, 284, 285, 286, 287, -1, 289, -1, 94, 37, -1, 294, 295, -1, 42, 43, -1, 45, -1, 47, -1, 94, 37, -1, 264, 265, 266, 42, 43, -1, 45, -1, 47, -1, -1, 63, -1, 264, 265, 266, -1, -1, -1, 283, 284, 285, 286, 287, -1, 289, -1, -1, -1, -1, 294, 295, 283, 284, 285, 286, 287, 40, 289, -1, -1, -1, 94, 294, 295, -1, -1, -1, -1, -1, 264, 265, 266, 37, -1, 94, -1, -1, 42, 43, -1, 45, -1, 47, -1, -1, -1, -1, -1, 283, 284, 285, 286, 287, -1, 289, -1, 264, 265, 266, 294, 295, -1, -1, 264, 265, 266, -1, -1, -1, -1, -1, -1, -1, -1, -1, 283, 284, 285, 286, 287, -1, 289, 283, 284, 285, -1, 294, 295, 289, 94, 264, 265, 266, 294, 37, -1, -1, -1, -1, 42, 43, -1, 45, -1, 47, -1, -1, -1, -1, 283, 284, 285, 286, 287, -1, 289, -1, -1, -1, -1, 294, 295, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 264, 265, 266, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 264, 265, 266, -1, -1, 94, 283, 284, 285, 286, 287, -1, 289, -1, -1, -1, -1, 294, 295, 283, 284, 285, 286, 287, -1, 289, -1, -1, -1, -1, 294, 295, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 264, 265, 266, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 264, 265, 266, -1, -1, -1, 283, 284, 285, 286, 287, -1, 289, -1, -1, -1, -1, 294, -1, 283, 284, 285, 286, 287, -1, 289, -1, -1, -1, -1, 294, -1, 260, -1, -1, -1, -1, -1, -1, 267, 268, -1, -1, -1, -1, 1, -1, -1, -1, 277, 278, 279, 280, 281, 282, 264, 265, 266, 14, 15, 16, -1, 290, 291, 292, 293, -1, -1, -1, 0, -1, -1, -1, -1, 283, 284, -1, -1, -1, 10, 289, -1, -1, 39, 15, 294, -1, -1, -1, -1, -1, -1, 23, -1, -1, -1, -1, 28, 29, 30, 31, -1, 33, -1, 60, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 264, 265, 266, -1, 52, 53, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 65, -1, 283, -1, -1, -1, -1, -1, 289, 74, -1, 76, -1, 294, -1, -1, 106, 82, 83, 84, 85, 86, 87, 88, 89, 90, -1, 92, 93, 94, 95, 96, 97, 98, 99, 100, 37, -1, 103, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 55, 56, 57, -1, -1, -1, -1, -1, -1, -1, -1, -1, 131, 68, 69, 159, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 180, -1, 182, -1, -1, -1, -1, -1, 163, -1, 165, -1, -1, -1, 169, -1, -1, -1, 109, -1, -1, -1, 177, -1, -1, 205, 117, -1, -1, -1, 210, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 222, -1, -1, 200, -1, -1, -1, -1, -1, -1, 232, -1, -1, -1, -1, 212, -1, -1, 215, -1, 217, 218, -1, -1, 157, -1, -1, -1, -1, 162, -1, 164, -1, -1, 167, 168, -1, -1, -1, -1, -1, 238, -1, -1, 241, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 195, -1, -1, -1, -1, -1, -1, 202, -1, -1, -1, -1, -1, -1, -1, -1, 211, }; #define YYFINAL 38 #ifndef YYDEBUG #define YYDEBUG 0 #elif YYDEBUG #include #endif #define YYMAXTOKEN 297 #if YYDEBUG const char * const yyname[] = { "end-of-file",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,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,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,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,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,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,"STRUCT","POINT", "NEWSTRUCT","ANS","FDEF","PFDEF","GLOBAL","CMP","OR","AND","CAR","CDR","DO", "WHILE","FOR","IF","ELSE","BREAK","RETURN","CONTINUE","PARIF","MAP","TIMER", "GF2NGEN","GFPNGEN","GETOPT","FOP_AND","FOP_OR","FOP_IMPL","FOP_REPL", "FOP_EQUIV","FOP_NOT","LOP","FORMULA","UCASE","LCASE","STR","SELF","BOPASS", "PLUS","MINUS", }; const char * const yyrule[] = { "$accept : start", "start : stat", "stat : tail", "$$1 :", "$$2 :", "stat : GLOBAL $$1 pvars $$2 tail", "stat : STRUCT rawstr '{' fields '}' tail", "stat : STRUCT rawstr '{' fields '}' pvars tail", "stat : STRUCT rawstr pvars tail", "stat : expr tail", "stat : complex", "stat : BREAK tail", "stat : CONTINUE tail", "stat : RETURN tail", "stat : RETURN expr tail", "stat : IF '(' node ')' stat", "stat : IF '(' node ')' stat ELSE stat", "stat : FOR '(' node ';' node ';' node ')' stat", "stat : WHILE '(' node ')' stat", "stat : DO stat WHILE '(' node ')' tail", "stat : LCASE '(' node ')' ':' '=' expr tail", "stat : PFDEF LCASE '(' node ')'", "$$3 :", "stat : FDEF LCASE $$3 '(' node ')' desc '{' stats '}'", "stat : error tail", "tail : ';'", "tail : '$'", "desc :", "desc : STR", "complex : '{' stats '}'", "fields :", "fields : fields members tail", "fields : fields STRUCT rawstr members tail", "members : rawstr", "members : members ',' rawstr", "pvars : UCASE", "pvars : pvars ',' UCASE", "stats :", "stats : stats stat", "node :", "node : _node", "_node : expr", "_node : _node ',' expr", "optlist : opt", "optlist : optlist ',' opt", "rawstr : UCASE", "rawstr : LCASE", "opt : rawstr '=' expr", "pexpr : STR", "pexpr : FORMULA", "pexpr : ANS", "pexpr : GF2NGEN", "pexpr : GFPNGEN", "pexpr : LCASE", "pexpr : LCASE '(' node ')'", "pexpr : LCASE '(' node '|' optlist ')'", "pexpr : LCASE '{' node '}' '(' node ')'", "pexpr : GETOPT '(' rawstr ')'", "pexpr : MAP '(' LCASE ',' node ')'", "pexpr : TIMER '(' expr ',' expr ',' expr ')'", "pexpr : PARIF '(' LCASE ',' node ')'", "pexpr : '(' '*' expr ')' '(' node ')'", "pexpr : CAR '(' expr ')'", "pexpr : CDR '(' expr ')'", "pexpr : '(' expr ')'", "pexpr : UCASE", "pexpr : pexpr '[' expr ']'", "pexpr : pexpr POINT rawstr", "expr : pexpr", "expr : '(' STRUCT rawstr ')' pexpr", "expr : expr '=' expr", "expr : expr BOPASS expr", "expr : expr SELF", "expr : SELF expr", "expr : '[' node ']'", "expr : '+' expr", "expr : '-' expr", "expr : expr '+' expr", "expr : expr '-' expr", "expr : expr '*' expr", "expr : expr '/' expr", "expr : expr '%' expr", "expr : expr '^' expr", "expr : expr CMP expr", "expr : '!' expr", "expr : expr OR expr", "expr : expr AND expr", "expr : FOP_NOT expr", "expr : expr FOP_AND expr", "expr : expr FOP_OR expr", "expr : expr FOP_IMPL expr", "expr : expr FOP_REPL expr", "expr : expr FOP_EQUIV expr", "expr : expr LOP expr", "expr : expr '?' expr ':' expr", "expr : '<' node '>'", "expr : NEWSTRUCT '(' rawstr ')'", }; #endif #ifdef YYSTACKSIZE #undef YYMAXDEPTH #define YYMAXDEPTH YYSTACKSIZE #else #ifdef YYMAXDEPTH #define YYSTACKSIZE YYMAXDEPTH #else #define YYSTACKSIZE 10000 #define YYMAXDEPTH 10000 #endif #endif #define YYINITSTACKSIZE 200 int yydebug; int yynerrs; int yyerrflag; int yychar; short *yyssp; YYSTYPE *yyvsp; YYSTYPE yyval; YYSTYPE yylval; short *yyss; short *yysslim; YYSTYPE *yyvs; int yystacksize; /* allocate initial stack or double stack size, up to YYMAXDEPTH */ static int yygrowstack() { int newsize, i; short *newss; YYSTYPE *newvs; if ((newsize = yystacksize) == 0) newsize = YYINITSTACKSIZE; else if (newsize >= YYMAXDEPTH) return -1; else if ((newsize *= 2) > YYMAXDEPTH) newsize = YYMAXDEPTH; i = yyssp - yyss; if ((newss = (short *)realloc(yyss, newsize * sizeof *newss)) == NULL) return -1; yyss = newss; yyssp = newss + i; if ((newvs = (YYSTYPE *)realloc(yyvs, newsize * sizeof *newvs)) == NULL) return -1; yyvs = newvs; yyvsp = newvs + i; yystacksize = newsize; yysslim = yyss + newsize - 1; return 0; } #define YYABORT goto yyabort #define YYREJECT goto yyabort #define YYACCEPT goto yyaccept #define YYERROR goto yyerrlab int yyparse() { register int yym, yyn, yystate; #if YYDEBUG register const char *yys; if ((yys = getenv("YYDEBUG"))) { yyn = *yys; if (yyn >= '0' && yyn <= '9') yydebug = yyn - '0'; } #endif yynerrs = 0; yyerrflag = 0; yychar = (-1); if (yyss == NULL && yygrowstack()) goto yyoverflow; 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("%sdebug: state %d, reading %d (%s)\n", YYPREFIX, yystate, yychar, yys); } #endif } if ((yyn = yysindex[yystate]) && (yyn += yychar) >= 0 && yyn <= YYTABLESIZE && yycheck[yyn] == yychar) { #if YYDEBUG if (yydebug) printf("%sdebug: state %d, shifting to state %d\n", YYPREFIX, yystate, yytable[yyn]); #endif if (yyssp >= yysslim && yygrowstack()) { 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; #if defined(lint) || defined(__GNUC__) goto yynewerror; #endif yynewerror: yyerror("syntax error"); #if defined(lint) || defined(__GNUC__) 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("%sdebug: state %d, error recovery shifting\ to state %d\n", YYPREFIX, *yyssp, yytable[yyn]); #endif if (yyssp >= yysslim && yygrowstack()) { goto yyoverflow; } *++yyssp = yystate = yytable[yyn]; *++yyvsp = yylval; goto yyloop; } else { #if YYDEBUG if (yydebug) printf("%sdebug: error recovery discarding state %d\n", YYPREFIX, *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("%sdebug: state %d, error recovery discards token %d (%s)\n", YYPREFIX, yystate, yychar, yys); } #endif yychar = (-1); goto yyloop; } yyreduce: #if YYDEBUG if (yydebug) printf("%sdebug: state %d, reducing by rule %d (%s)\n", YYPREFIX, yystate, yyn, yyrule[yyn]); #endif yym = yylen[yyn]; yyval = yyvsp[1-yym]; switch (yyn) { case 1: #line 85 "parse.y" { parse_snode = yyvsp[0].s; YYACCEPT; } break; case 2: #line 88 "parse.y" { yyval.s = 0; } break; case 3: #line 89 "parse.y" { gdef=1; } break; case 4: #line 89 "parse.y" { gdef=0; } break; case 5: #line 90 "parse.y" { yyval.s = 0; } break; case 6: #line 92 "parse.y" { structdef(yyvsp[-4].p,yyvsp[-2].n); yyval.s = 0; } break; case 7: #line 94 "parse.y" { structdef(yyvsp[-5].p,yyvsp[-3].n); setstruct(yyvsp[-5].p,yyvsp[-1].n); yyval.s = 0; } break; case 8: #line 96 "parse.y" { setstruct(yyvsp[-2].p,yyvsp[-1].n); yyval.s = 0; } break; case 9: #line 98 "parse.y" { yyval.s = mksnode(1,S_SINGLE,yyvsp[-1].f); } break; case 10: #line 100 "parse.y" { yyval.s = yyvsp[0].s; } break; case 11: #line 102 "parse.y" { yyval.s = mksnode(0,S_BREAK); } break; case 12: #line 104 "parse.y" { yyval.s = mksnode(0,S_CONTINUE); } break; case 13: #line 106 "parse.y" { yyval.s = mksnode(1,S_RETURN,0); } break; case 14: #line 108 "parse.y" { yyval.s = mksnode(1,S_RETURN,yyvsp[-1].f); } break; case 15: #line 110 "parse.y" { yyval.s = mksnode(4,S_IFELSE,yyvsp[-4].i,yyvsp[-2].n,yyvsp[0].s,0); yyvsp[0].s?yyval.s->ln=yyvsp[0].s->ln:0; NOPR; } break; case 16: #line 112 "parse.y" { yyval.s = mksnode(4,S_IFELSE,yyvsp[-6].i,yyvsp[-4].n,yyvsp[-2].s,yyvsp[0].s); yyvsp[0].s?yyval.s->ln=yyvsp[0].s->ln:0; NOPR; } break; case 17: #line 114 "parse.y" { yyval.s = mksnode(5,S_FOR,yyvsp[-8].i,yyvsp[-6].n,yyvsp[-4].n?yyvsp[-4].n:ONENODE,yyvsp[-2].n,yyvsp[0].s); yyvsp[0].s?yyval.s->ln=yyvsp[0].s->ln:0; NOPR; } break; case 18: #line 116 "parse.y" { yyval.s = mksnode(5,S_FOR,yyvsp[-4].i,0,yyvsp[-2].n,0,yyvsp[0].s); yyvsp[0].s?yyval.s->ln=yyvsp[0].s->ln:0; NOPR; } break; case 19: #line 118 "parse.y" { yyval.s = mksnode(3,S_DO,yyvsp[-6].i,yyvsp[-5].s,yyvsp[-2].n); } break; case 20: #line 120 "parse.y" { yyval.s = mksnode(3,S_PFDEF,yyvsp[-7].p,yyvsp[-5].n,yyvsp[-1].f); NOPR; } break; case 21: #line 122 "parse.y" { yyval.s = mksnode(3,S_PFDEF,yyvsp[-3].p,yyvsp[-1].n,0); NOPR; } break; case 22: #line 123 "parse.y" { mkpvs(); } break; case 23: #line 124 "parse.y" { mkuf(yyvsp[-8].p,asir_infile->name,yyvsp[-5].n, mksnode(1,S_CPLX,yyvsp[-1].n),yyvsp[-9].i,asir_infile->ln,yyvsp[-3].p); yyval.s = 0; NOPR; } break; case 24: #line 130 "parse.y" { yyerrok; yyval.s = 0; } break; case 25: #line 133 "parse.y" { if ( main_parser ) prresult = 1; } break; case 26: #line 135 "parse.y" { if ( main_parser ) prresult = 0; } break; case 27: #line 137 "parse.y" { yyval.p = 0; } break; case 28: #line 139 "parse.y" { yyval.p = yyvsp[0].p; } break; case 29: #line 142 "parse.y" { yyval.s = mksnode(1,S_CPLX,yyvsp[-1].n); } break; case 30: #line 145 "parse.y" { yyval.n = 0; } break; case 31: #line 147 "parse.y" { MKNODE(a,0,yyvsp[-1].n); appendtonode(yyvsp[-2].n,(pointer)a,&yyval.n); } break; case 32: #line 149 "parse.y" { MKNODE(a,yyvsp[-2].p,yyvsp[-1].n); appendtonode(yyvsp[-4].n,(pointer)a,&yyval.n); } break; case 33: #line 152 "parse.y" { MKNODE(yyval.n,yyvsp[0].p,0); } break; case 34: #line 154 "parse.y" { appendtonode(yyvsp[-2].n,yyvsp[0].p,&yyval.n); } break; case 35: #line 157 "parse.y" { val = (pointer)makepvar(yyvsp[0].p); MKNODE(yyval.n,val,0); } break; case 36: #line 159 "parse.y" { appendtonode(yyvsp[-2].n,(pointer)makepvar(yyvsp[0].p),&yyval.n); } break; case 37: #line 162 "parse.y" { yyval.n = 0; } break; case 38: #line 164 "parse.y" { appendtonode(yyvsp[-1].n,(pointer)yyvsp[0].s,&yyval.n); } break; case 39: #line 167 "parse.y" { yyval.n = 0; } break; case 40: #line 169 "parse.y" { yyval.n = yyvsp[0].n; } break; case 41: #line 172 "parse.y" { MKNODE(yyval.n,yyvsp[0].f,0); } break; case 42: #line 174 "parse.y" { appendtonode(yyvsp[-2].n,(pointer)yyvsp[0].f,&yyval.n); } break; case 43: #line 177 "parse.y" { MKNODE(yyval.n,yyvsp[0].f,0); } break; case 44: #line 179 "parse.y" { appendtonode(yyvsp[-2].n,(pointer)yyvsp[0].f,&yyval.n); } break; case 45: #line 182 "parse.y" { yyval.p = yyvsp[0].p; } break; case 46: #line 184 "parse.y" { yyval.p = yyvsp[0].p; } break; case 47: #line 187 "parse.y" { yyval.f = mkfnode(2,I_OPT,yyvsp[-2].p,yyvsp[0].f); } break; case 48: #line 190 "parse.y" { yyval.f = mkfnode(1,I_STR,yyvsp[0].p); } break; case 49: #line 192 "parse.y" { yyval.f = mkfnode(1,I_FORMULA,yyvsp[0].p); } break; case 50: #line 194 "parse.y" { yyval.f = mkfnode(1,I_ANS,yyvsp[0].i); } break; case 51: #line 196 "parse.y" { yyval.f = mkfnode(0,I_GF2NGEN); } break; case 52: #line 198 "parse.y" { yyval.f = mkfnode(0,I_GFPNGEN); } break; case 53: #line 200 "parse.y" { FUNC f; searchf(noargsysf,yyvsp[0].p,&f); if ( f ) yyval.f = mkfnode(2,I_FUNC,f,0); else { searchc(yyvsp[0].p,&f); if ( f ) yyval.f = mkfnode(2,I_FUNC,f,mkfnode(1,I_LIST,0)); else { searchf(sysf,yyvsp[0].p,&f); if ( !f ) searchf(ubinf,yyvsp[0].p,&f); if ( !f ) searchpf(yyvsp[0].p,&f); if ( !f ) searchf(usrf,yyvsp[0].p,&f); if ( f ) makesrvar(f,(P *)&val); else makevar(yyvsp[0].p,(P *)&val); yyval.f = mkfnode(1,I_FORMULA,val); } } } break; case 54: #line 227 "parse.y" { searchf(sysf,yyvsp[-3].p,(FUNC *)&val); if ( !val ) searchf(ubinf,yyvsp[-3].p,(FUNC *)&val); if ( !val ) searchpf(yyvsp[-3].p,(FUNC *)&val); if ( !val ) searchf(usrf,yyvsp[-3].p,(FUNC *)&val); if ( !val ) appenduf(yyvsp[-3].p,(FUNC *)&val); yyval.f = mkfnode(2,I_FUNC,val,mkfnode(1,I_LIST,yyvsp[-1].n)); } break; case 55: #line 241 "parse.y" { searchf(sysf,yyvsp[-5].p,(FUNC *)&val); if ( !val ) searchf(ubinf,yyvsp[-5].p,(FUNC *)&val); if ( !val ) searchpf(yyvsp[-5].p,(FUNC *)&val); if ( !val ) searchf(usrf,yyvsp[-5].p,(FUNC *)&val); if ( !val ) appenduf(yyvsp[-5].p,(FUNC *)&val); yyval.f = mkfnode(3,I_FUNC_OPT,val, mkfnode(1,I_LIST,yyvsp[-3].n),mkfnode(1,I_LIST,yyvsp[-1].n)); } break; case 56: #line 255 "parse.y" { searchpf(yyvsp[-6].p,(FUNC *)&val); yyval.f = mkfnode(2,I_PFDERIV,val,mkfnode(1,I_LIST,yyvsp[-1].n),mkfnode(1,I_LIST,yyvsp[-4].n)); } break; case 57: #line 260 "parse.y" { yyval.f = mkfnode(2,I_GETOPT,yyvsp[-1].p); } break; case 58: #line 264 "parse.y" { searchf(sysf,yyvsp[-3].p,(FUNC *)&val); if ( !val ) searchf(ubinf,yyvsp[-3].p,(FUNC *)&val); if ( !val ) searchpf(yyvsp[-3].p,(FUNC *)&val); if ( !val ) searchf(usrf,yyvsp[-3].p,(FUNC *)&val); if ( !val ) appenduf(yyvsp[-3].p,(FUNC *)&val); yyval.f = mkfnode(2,I_MAP,val,mkfnode(1,I_LIST,yyvsp[-1].n)); } break; case 59: #line 277 "parse.y" { yyval.f = mkfnode(3,I_TIMER,yyvsp[-5].f,yyvsp[-3].f,yyvsp[-1].f); } break; case 60: #line 281 "parse.y" { searchf(parif,yyvsp[-3].p,(FUNC *)&val); if ( !val ) mkparif(yyvsp[-3].p,(FUNC *)&val); yyval.f = mkfnode(2,I_FUNC,val,mkfnode(1,I_LIST,yyvsp[-1].n)); } break; case 61: #line 288 "parse.y" { yyval.f = mkfnode(2,I_IFUNC,yyvsp[-4].f,mkfnode(1,I_LIST,yyvsp[-1].n)); } break; case 62: #line 292 "parse.y" { yyval.f = mkfnode(1,I_CAR,yyvsp[-1].f); } break; case 63: #line 294 "parse.y" { yyval.f = mkfnode(1,I_CDR,yyvsp[-1].f); } break; case 64: #line 296 "parse.y" { yyval.f = yyvsp[-1].f; } break; case 65: #line 298 "parse.y" { if ( main_parser ) yyval.f = mkfnode(2,I_PVAR,makepvar(yyvsp[0].p),0); else { ind = searchpvar(yyvsp[0].p); if ( ind == -1 ) { fprintf(stderr,"%s : no such variable.\n",yyvsp[0].p); YYABORT; } else yyval.f = mkfnode(2,I_PVAR,ind,0); } } break; case 66: #line 311 "parse.y" { if ( yyvsp[-3].f->id == I_PVAR || yyvsp[-3].f->id == I_INDEX ) { appendtonode((NODE)yyvsp[-3].f->arg[1],(pointer)yyvsp[-1].f,&a); yyvsp[-3].f->arg[1] = (pointer)a; yyval.f = yyvsp[-3].f; } else { MKNODE(a,yyvsp[-1].f,0); yyval.f = mkfnode(2,I_INDEX,(pointer)yyvsp[-3].f,a); } } break; case 67: #line 321 "parse.y" { memberofstruct(yyvsp[-2].f,yyvsp[0].p,&yyval.f); } break; case 68: #line 324 "parse.y" { yyval.f = yyvsp[0].f; } break; case 69: #line 326 "parse.y" { yyval.f = mkfnode(3,I_CAST,structtoindex(yyvsp[-2].p),yyvsp[0].f,0); } break; case 70: #line 328 "parse.y" { yyval.f = mkfnode(2,I_ASSPVAR,yyvsp[-2].f,yyvsp[0].f); } break; case 71: #line 330 "parse.y" { yyval.f = mkfnode(2,I_ASSPVAR,yyvsp[-2].f,mkfnode(3,I_BOP,yyvsp[-1].p,yyvsp[-2].f,yyvsp[0].f)); } break; case 72: #line 332 "parse.y" { yyval.f = mkfnode(2,I_POSTSELF,yyvsp[0].p,yyvsp[-1].f); } break; case 73: #line 334 "parse.y" { yyval.f = mkfnode(2,I_PRESELF,yyvsp[-1].p,yyvsp[0].f); } break; case 74: #line 336 "parse.y" { yyval.f = mkfnode(1,I_LIST,yyvsp[-1].n); } break; case 75: #line 338 "parse.y" { yyval.f = yyvsp[0].f; } break; case 76: #line 340 "parse.y" { yyval.f = mkfnode(3,I_BOP,yyvsp[-1].p,0,yyvsp[0].f); } break; case 77: #line 342 "parse.y" { yyval.f = mkfnode(3,I_BOP,yyvsp[-1].p,yyvsp[-2].f,yyvsp[0].f); } break; case 78: #line 344 "parse.y" { yyval.f = mkfnode(3,I_BOP,yyvsp[-1].p,yyvsp[-2].f,yyvsp[0].f); } break; case 79: #line 346 "parse.y" { yyval.f = mkfnode(3,I_BOP,yyvsp[-1].p,yyvsp[-2].f,yyvsp[0].f); } break; case 80: #line 348 "parse.y" { yyval.f = mkfnode(3,I_BOP,yyvsp[-1].p,yyvsp[-2].f,yyvsp[0].f); } break; case 81: #line 350 "parse.y" { yyval.f = mkfnode(3,I_BOP,yyvsp[-1].p,yyvsp[-2].f,yyvsp[0].f); } break; case 82: #line 352 "parse.y" { yyval.f = mkfnode(3,I_BOP,yyvsp[-1].p,yyvsp[-2].f,yyvsp[0].f); } break; case 83: #line 354 "parse.y" { yyval.f = mkfnode(3,I_COP,yyvsp[-1].i,yyvsp[-2].f,yyvsp[0].f); } break; case 84: #line 356 "parse.y" { yyval.f = mkfnode(1,I_NOT,yyvsp[0].f); } break; case 85: #line 358 "parse.y" { yyval.f = mkfnode(2,I_OR,yyvsp[-2].f,yyvsp[0].f); } break; case 86: #line 360 "parse.y" { yyval.f = mkfnode(2,I_AND,yyvsp[-2].f,yyvsp[0].f); } break; case 87: #line 362 "parse.y" { yyval.f = mkfnode(3,I_LOP,yyvsp[-1].i,yyvsp[0].f,0); } break; case 88: #line 364 "parse.y" { yyval.f = mkfnode(3,I_LOP,yyvsp[-1].i,yyvsp[-2].f,yyvsp[0].f); } break; case 89: #line 366 "parse.y" { yyval.f = mkfnode(3,I_LOP,yyvsp[-1].i,yyvsp[-2].f,yyvsp[0].f); } break; case 90: #line 368 "parse.y" { yyval.f = mkfnode(3,I_LOP,yyvsp[-1].i,yyvsp[-2].f,yyvsp[0].f); } break; case 91: #line 370 "parse.y" { yyval.f = mkfnode(3,I_LOP,yyvsp[-1].i,yyvsp[-2].f,yyvsp[0].f); } break; case 92: #line 372 "parse.y" { yyval.f = mkfnode(3,I_LOP,yyvsp[-1].i,yyvsp[-2].f,yyvsp[0].f); } break; case 93: #line 374 "parse.y" { yyval.f = mkfnode(3,I_LOP,yyvsp[-1].i,yyvsp[-2].f,yyvsp[0].f); } break; case 94: #line 376 "parse.y" { yyval.f = mkfnode(3,I_CE,yyvsp[-4].f,yyvsp[-2].f,yyvsp[0].f); } break; case 95: #line 378 "parse.y" { yyval.f = mkfnode(1,I_EV,yyvsp[-1].n); } break; case 96: #line 380 "parse.y" { yyval.f = mkfnode(1,I_NEWCOMP,(int)structtoindex(yyvsp[-1].p)); } break; #line 1540 "y.tab.c" } yyssp -= yym; yystate = *yyssp; yyvsp -= yym; yym = yylhs[yyn]; if (yystate == 0 && yym == 0) { #if YYDEBUG if (yydebug) printf("%sdebug: after reduction, shifting from state 0 to\ state %d\n", YYPREFIX, 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("%sdebug: state %d, reading %d (%s)\n", YYPREFIX, 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]; #if YYDEBUG if (yydebug) printf("%sdebug: after reduction, shifting from state %d \ to state %d\n", YYPREFIX, *yyssp, yystate); #endif if (yyssp >= yysslim && yygrowstack()) { goto yyoverflow; } *++yyssp = yystate; *++yyvsp = yyval; goto yyloop; yyoverflow: yyerror("yacc stack overflow"); yyabort: return (1); yyaccept: return (0); }