#ifndef lint static char const yyrcsid[] = "$FreeBSD: src/usr.bin/yacc/skeleton.c,v 1.28 2000/01/17 02:04:06 bde Exp $"; #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) static int yygrowstack(); #define YYPREFIX "yy" #line 51 "parse.y" #define malloc(x) GC_malloc(x) #define realloc(x,y) GC_realloc(x,y) #define free(x) GC_free(x) #if defined(TOWNS) #include #endif #include #include "ca.h" #include #include #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 82 "parse.y" typedef union { FNODE f; SNODE s; NODE n; NODE2 n2; int i; pointer p; } YYSTYPE; #line 54 "y.tab.c" #define YYERRCODE 256 #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 const short yylhs[] = { -1, 0, 6, 15, 16, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 17, 6, 6, 14, 14, 1, 1, 7, 12, 12, 11, 11, 8, 8, 9, 9, 10, 10, 13, 13, 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, 2, 1, 2, 2, 2, 3, 5, 7, 9, 5, 7, 8, 5, 0, 10, 2, 1, 1, 0, 1, 3, 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, 45, 0, 0, 3, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 46, 47, 0, 0, 44, 60, 0, 43, 0, 0, 0, 0, 32, 0, 23, 24, 0, 0, 0, 0, 0, 1, 8, 2, 22, 40, 41, 0, 0, 20, 0, 0, 0, 0, 0, 0, 0, 0, 9, 0, 0, 11, 10, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 67, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7, 0, 0, 0, 0, 0, 0, 30, 0, 0, 0, 0, 0, 0, 0, 0, 12, 0, 0, 0, 0, 0, 0, 27, 33, 0, 0, 59, 69, 0, 90, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 62, 0, 28, 0, 91, 0, 0, 0, 0, 57, 58, 0, 0, 0, 0, 0, 0, 0, 0, 52, 0, 0, 0, 0, 0, 0, 0, 61, 0, 0, 0, 19, 31, 5, 0, 16, 0, 0, 49, 0, 0, 0, 0, 0, 0, 38, 0, 0, 0, 0, 0, 6, 29, 0, 0, 0, 0, 55, 53, 0, 0, 0, 0, 50, 0, 0, 26, 0, 17, 0, 14, 0, 51, 0, 0, 39, 56, 32, 0, 54, 18, 0, 15, 21, }; const short yydgoto[] = { 38, 217, 194, 78, 40, 195, 125, 42, 74, 79, 80, 109, 153, 196, 43, 51, 158, 106, }; const short yysindex[] = { 119, -20, -240, -33, 0, -279, -275, 0, 2, 8, 119, 15, 16, 18, -20, 155, -20, 22, 24, 25, 0, 0, 29, 458, 0, 0, -37, 0, 458, 458, 458, 458, 0, 193, 0, 0, 458, 458, 0, 1376, -89, 0, 0, 0, 0, 0, 0, -104, -240, 0, 32, -217, 458, 458, -195, 458, 458, 458, 0, -25, 1376, 0, 0, -215, -214, 458, -240, 2001, 458, 458, -213, 12, 12, -213, 40, -240, 458, 1522, 1943, -14, 38, 43, 458, 458, 458, 458, 458, 458, 458, 458, 458, 0, 458, 458, 458, 458, 458, 458, 458, 458, 458, 0, -240, 458, -240, 68, 44, 458, 0, 66, 1675, 1733, 72, 73, 56, 76, 458, 0, 77, 83, 1776, 87, 4, -21, 0, 0, 91, 1789, 0, 0, 458, 0, -7, 600, 987, 467, 2118, 2056, 1860, 720, 757, 1943, 12, 12, -90, -90, -90, -90, 1943, 1826, 0, 1853, 0, -34, 0, 458, 94, -155, -20, 0, 0, 458, 119, 458, 119, -17, 458, 458, 458, 0, 97, 86, -240, 2037, 98, 1943, 458, 0, -20, -240, 100, 0, 0, 0, 104, 0, 88, -127, 0, 107, 108, 1887, 458, 89, 90, 0, -32, 422, -89, 458, 1988, 0, 0, -139, -20, 458, 119, 0, 0, 458, 115, 458, 458, 0, -240, 116, 0, 35, 0, 125, 0, 1930, 0, 1376, 1943, 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, 67, 106, 0, 0, 526, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 135, 118, 135, 0, 489, 0, 0, 0, 0, 0, 0, 0, -30, 55, 6, 818, 1032, 1209, 846, 0, 0, 0, 0, 49, 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, 135, 0, 7, 0, 0, 0, 0, 0, 0, 6, 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, 618, 0, 0, 0, 0, 0, 0, 135, 0, 0, 0, 0, 0, 135, 0, 118, 0, 0, 135, 135, 0, 0, 0, 1361, 0, 0, 0, 397, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 135, 0, 0, 0, 0, 0, 563, 135, 9, 0, 0, 58, 0, 135, 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, }; const short yygindex[] = { 0, 0, 95, 2334, 10, -28, 202, 0, -45, 2286, 0, 0, 0, 0, 601, 0, 0, 0, }; #define YYTABLESIZE 2565 const short yytable[] = { 83, 13, 103, 69, 97, 83, 82, 48, 83, 213, 179, 82, 214, 49, 82, 116, 35, 50, 42, 104, 171, 42, 83, 83, 188, 83, 83, 83, 82, 82, 98, 82, 82, 82, 13, 95, 93, 13, 94, 34, 96, 13, 52, 4, 13, 89, 13, 34, 53, 98, 89, 45, 46, 89, 95, 55, 56, 83, 57, 96, 13, 13, 63, 82, 64, 65, 4, 89, 89, 66, 89, 89, 107, 31, 108, 112, 35, 118, 119, 129, 33, 91, 130, 29, 155, 30, 68, 97, 83, 83, 36, 178, 13, 36, 82, 82, 66, 47, 68, 34, 37, 66, 89, 172, 66, 131, 97, 172, 36, 154, 157, 36, 161, 31, 162, 163, 35, 164, 66, 66, 33, 166, 66, 29, 13, 30, 13, 167, 169, 170, 34, 36, 173, 89, 89, 181, 182, 192, 199, 34, 37, 203, 36, 105, 193, 204, 206, 205, 207, 208, 211, 212, 31, 66, 216, 35, 222, 226, 227, 33, 34, 121, 29, 32, 30, 124, 228, 85, 34, 102, 126, 36, 85, 36, 36, 85, 34, 34, 34, 37, 34, 25, 231, 198, 66, 66, 225, 0, 31, 85, 85, 35, 85, 85, 85, 33, 0, 150, 29, 152, 30, 0, 41, 32, 91, 233, 0, 0, 0, 0, 36, 0, 54, 0, 34, 37, 0, 0, 0, 0, 0, 0, 0, 0, 85, 0, 31, 0, 0, 0, 0, 0, 0, 33, 0, 76, 29, 0, 30, 0, 0, 0, 32, 0, 0, 0, 36, 83, 83, 83, 83, 83, 0, 37, 0, 85, 85, 13, 13, 83, 13, 13, 13, 13, 13, 82, 0, 0, 13, 13, 13, 13, 13, 13, 202, 13, 13, 13, 13, 13, 13, 13, 13, 13, 36, 0, 0, 91, 0, 13, 0, 13, 13, 13, 13, 13, 1, 2, 0, 3, 4, 5, 6, 7, 89, 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, 185, 0, 187, 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, 220, 24, 25, 26, 27, 28, 3, 4, 85, 85, 85, 0, 0, 0, 8, 9, 0, 0, 85, 0, 0, 0, 232, 0, 17, 18, 19, 20, 21, 22, 37, 0, 0, 37, 0, 23, 0, 24, 25, 59, 27, 28, 75, 0, 3, 4, 0, 31, 37, 0, 0, 37, 8, 9, 33, 0, 76, 29, 0, 30, 0, 0, 17, 18, 19, 20, 21, 22, 35, 0, 0, 0, 0, 23, 37, 24, 25, 59, 27, 28, 0, 0, 37, 31, 0, 0, 35, 0, 0, 35, 33, 0, 0, 29, 0, 30, 98, 0, 0, 0, 0, 95, 93, 0, 94, 36, 96, 0, 0, 0, 37, 0, 0, 37, 37, 0, 0, 48, 48, 0, 35, 0, 48, 48, 48, 48, 48, 0, 48, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 48, 48, 36, 48, 48, 48, 0, 0, 0, 0, 0, 0, 35, 35, 97, 63, 63, 0, 0, 0, 63, 63, 63, 63, 63, 0, 63, 0, 0, 0, 0, 0, 0, 48, 0, 48, 48, 63, 63, 0, 63, 63, 63, 0, 0, 0, 0, 0, 0, 0, 0, 0, 64, 64, 0, 44, 0, 64, 64, 64, 64, 64, 0, 64, 0, 0, 48, 48, 58, 61, 62, 0, 63, 63, 64, 64, 0, 64, 64, 64, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 98, 0, 0, 101, 87, 95, 93, 0, 94, 87, 96, 0, 87, 63, 63, 0, 0, 65, 0, 64, 64, 0, 65, 0, 117, 65, 87, 87, 0, 87, 87, 87, 0, 0, 0, 0, 0, 0, 0, 65, 65, 0, 0, 65, 3, 4, 0, 0, 0, 0, 64, 64, 8, 9, 0, 0, 0, 97, 0, 0, 0, 87, 17, 18, 19, 20, 21, 22, 0, 0, 0, 0, 0, 23, 65, 24, 25, 59, 27, 28, 3, 4, 0, 0, 0, 0, 0, 0, 8, 9, 0, 0, 87, 87, 82, 83, 84, 0, 17, 18, 19, 20, 21, 22, 0, 65, 65, 0, 0, 23, 48, 24, 25, 59, 27, 28, 48, 48, 48, 90, 98, 0, 183, 0, 91, 95, 93, 0, 94, 0, 96, 0, 0, 0, 0, 48, 48, 48, 48, 48, 0, 48, 201, 0, 0, 0, 48, 48, 0, 0, 0, 0, 0, 63, 63, 63, 0, 98, 0, 0, 0, 0, 95, 93, 0, 94, 0, 96, 218, 0, 0, 0, 63, 63, 63, 63, 63, 97, 63, 0, 0, 0, 0, 63, 63, 0, 0, 230, 0, 0, 64, 64, 64, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 64, 64, 64, 64, 64, 97, 64, 0, 68, 68, 0, 64, 64, 68, 68, 68, 68, 68, 82, 68, 84, 0, 0, 0, 0, 0, 0, 0, 0, 0, 68, 68, 0, 68, 68, 68, 79, 79, 0, 0, 0, 79, 79, 79, 79, 79, 87, 79, 91, 0, 0, 0, 0, 0, 87, 0, 0, 0, 79, 79, 0, 79, 79, 79, 0, 68, 68, 0, 0, 0, 0, 0, 0, 0, 0, 0, 74, 74, 0, 0, 0, 74, 74, 74, 74, 74, 0, 74, 0, 0, 0, 0, 0, 79, 79, 0, 68, 68, 74, 74, 0, 74, 74, 74, 75, 75, 0, 0, 0, 75, 75, 75, 75, 75, 0, 75, 0, 0, 0, 0, 0, 0, 0, 0, 79, 79, 75, 75, 0, 75, 75, 75, 0, 74, 0, 0, 0, 0, 82, 83, 84, 0, 0, 0, 77, 77, 0, 0, 0, 77, 77, 77, 77, 77, 0, 77, 0, 85, 86, 87, 88, 75, 0, 90, 74, 74, 77, 77, 91, 77, 77, 77, 0, 0, 0, 82, 83, 84, 98, 0, 0, 0, 0, 95, 93, 0, 94, 0, 96, 76, 76, 0, 75, 75, 76, 76, 76, 76, 76, 0, 76, 77, 0, 0, 0, 91, 0, 0, 0, 0, 0, 76, 76, 0, 76, 76, 76, 0, 0, 0, 0, 0, 70, 0, 0, 0, 0, 70, 0, 70, 70, 70, 77, 77, 0, 97, 68, 68, 68, 0, 0, 0, 0, 0, 70, 70, 76, 70, 70, 70, 0, 0, 0, 0, 0, 68, 68, 68, 68, 68, 0, 68, 0, 0, 79, 79, 79, 68, 0, 0, 0, 0, 0, 0, 0, 0, 0, 76, 76, 70, 0, 0, 0, 79, 79, 79, 79, 79, 0, 79, 48, 48, 0, 0, 0, 79, 48, 48, 0, 48, 0, 48, 0, 0, 74, 74, 74, 0, 0, 0, 70, 70, 0, 48, 0, 48, 0, 48, 0, 0, 0, 0, 0, 74, 74, 74, 74, 74, 0, 74, 0, 0, 75, 75, 75, 74, 0, 0, 0, 0, 0, 0, 0, 0, 0, 48, 0, 0, 48, 0, 0, 75, 75, 75, 75, 75, 0, 75, 0, 0, 0, 0, 0, 75, 0, 0, 0, 0, 0, 0, 0, 0, 77, 77, 77, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 77, 77, 77, 77, 77, 0, 77, 0, 71, 0, 0, 0, 77, 71, 82, 71, 71, 71, 0, 0, 0, 0, 0, 0, 0, 0, 76, 76, 76, 0, 71, 71, 0, 71, 71, 71, 0, 0, 0, 0, 0, 0, 0, 0, 91, 76, 76, 76, 76, 76, 0, 76, 0, 0, 0, 0, 0, 76, 0, 70, 70, 70, 0, 0, 0, 71, 72, 0, 0, 0, 0, 72, 0, 72, 72, 72, 0, 0, 70, 70, 70, 70, 70, 0, 70, 0, 0, 0, 72, 72, 70, 72, 72, 72, 0, 0, 71, 71, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 73, 0, 0, 0, 0, 73, 0, 73, 73, 73, 0, 0, 0, 48, 0, 72, 0, 0, 0, 48, 48, 48, 73, 73, 0, 73, 73, 73, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 48, 48, 48, 48, 48, 0, 48, 0, 72, 72, 0, 48, 48, 0, 49, 49, 0, 0, 0, 73, 49, 49, 0, 49, 0, 49, 0, 0, 0, 35, 98, 0, 0, 0, 0, 95, 93, 49, 94, 49, 96, 49, 0, 0, 0, 0, 0, 0, 0, 0, 73, 73, 34, 0, 99, 0, 100, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 49, 0, 78, 49, 0, 0, 0, 78, 84, 0, 78, 0, 0, 84, 0, 0, 84, 0, 97, 0, 0, 71, 71, 71, 78, 78, 0, 78, 78, 78, 84, 84, 0, 84, 84, 84, 0, 0, 0, 0, 71, 71, 71, 71, 71, 0, 71, 0, 81, 0, 0, 0, 71, 81, 0, 0, 81, 0, 0, 78, 0, 80, 0, 0, 0, 84, 80, 0, 0, 80, 81, 81, 0, 81, 81, 81, 0, 0, 0, 72, 72, 72, 0, 80, 80, 0, 80, 80, 80, 0, 78, 78, 0, 0, 0, 0, 84, 84, 72, 72, 72, 72, 72, 0, 72, 81, 0, 98, 0, 0, 72, 128, 95, 93, 0, 94, 0, 96, 80, 0, 0, 73, 73, 73, 0, 0, 0, 0, 0, 0, 0, 99, 0, 100, 0, 0, 81, 81, 0, 0, 73, 73, 73, 73, 73, 0, 73, 0, 0, 80, 80, 0, 73, 0, 0, 88, 0, 0, 0, 0, 88, 0, 0, 88, 97, 0, 0, 49, 0, 0, 0, 0, 0, 49, 49, 49, 0, 88, 88, 0, 88, 88, 88, 0, 0, 0, 0, 0, 82, 83, 84, 0, 49, 49, 49, 49, 49, 0, 49, 0, 0, 0, 0, 49, 49, 0, 0, 85, 86, 87, 88, 89, 88, 90, 0, 86, 0, 0, 91, 92, 86, 0, 0, 86, 0, 0, 0, 0, 0, 0, 78, 78, 78, 0, 0, 0, 0, 86, 86, 0, 86, 86, 86, 88, 88, 0, 0, 0, 0, 78, 78, 78, 78, 78, 0, 78, 84, 84, 84, 84, 98, 78, 0, 0, 159, 95, 93, 84, 94, 0, 96, 0, 86, 0, 0, 0, 0, 81, 81, 0, 0, 0, 0, 0, 99, 0, 100, 0, 0, 0, 80, 0, 0, 0, 0, 81, 81, 81, 81, 81, 0, 81, 0, 86, 86, 0, 0, 81, 80, 80, 80, 80, 80, 0, 80, 0, 0, 97, 98, 0, 80, 0, 160, 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, 168, 94, 0, 96, 0, 0, 98, 97, 0, 0, 174, 95, 93, 0, 94, 0, 96, 99, 0, 100, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 99, 0, 100, 0, 88, 88, 88, 88, 88, 0, 88, 0, 0, 98, 0, 0, 88, 0, 95, 93, 97, 94, 0, 96, 0, 0, 0, 0, 0, 0, 0, 0, 0, 97, 176, 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, 86, 86, 0, 97, 0, 0, 0, 98, 0, 86, 0, 0, 95, 93, 209, 94, 0, 96, 0, 0, 0, 0, 82, 83, 84, 0, 0, 0, 0, 177, 97, 99, 0, 100, 0, 0, 0, 97, 0, 0, 0, 85, 86, 87, 88, 89, 0, 90, 0, 0, 98, 0, 91, 92, 229, 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, 197, 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, 0, 0, 0, 0, 17, 18, 19, 20, 21, 22, 82, 83, 84, 81, 0, 0, 0, 24, 25, 59, 27, 0, 0, 0, 39, 0, 0, 0, 0, 85, 86, 113, 114, 115, 39, 90, 0, 0, 0, 60, 91, 0, 0, 0, 122, 123, 0, 67, 0, 0, 0, 0, 70, 71, 72, 73, 0, 77, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 82, 83, 84, 0, 110, 111, 0, 0, 0, 0, 0, 156, 0, 0, 0, 0, 0, 120, 0, 85, 165, 0, 0, 0, 0, 90, 39, 0, 127, 0, 91, 0, 0, 0, 132, 133, 134, 135, 136, 137, 138, 139, 140, 0, 141, 142, 143, 144, 145, 146, 147, 148, 149, 0, 0, 151, 0, 0, 0, 180, 0, 0, 0, 0, 0, 184, 0, 186, 0, 0, 189, 190, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 175, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 210, 0, 0, 0, 0, 0, 0, 215, 0, 0, 0, 0, 0, 219, 0, 0, 0, 0, 39, 0, 39, 0, 0, 0, 191, 0, 0, 0, 0, 0, 0, 0, 200, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 77, 0, 0, 0, 0, 0, 0, 0, 0, 39, 0, 0, 221, 0, 223, 224, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 39, 0, 0, 39, }; const short yycheck[] = { 36, 0, 91, 40, 94, 41, 36, 40, 44, 41, 44, 41, 44, 292, 44, 40, 36, 292, 41, 123, 41, 44, 58, 59, 41, 61, 62, 63, 58, 59, 37, 61, 62, 63, 33, 42, 43, 36, 45, 59, 47, 40, 40, 36, 43, 36, 45, 41, 40, 37, 41, 291, 292, 44, 42, 40, 40, 93, 40, 47, 59, 60, 40, 93, 40, 40, 59, 58, 59, 40, 61, 62, 40, 33, 291, 270, 36, 292, 292, 93, 40, 294, 44, 43, 40, 45, 123, 94, 124, 125, 41, 125, 91, 44, 124, 125, 36, 2, 123, 59, 60, 41, 93, 124, 44, 62, 94, 124, 59, 41, 44, 62, 40, 33, 41, 59, 36, 41, 58, 59, 40, 44, 62, 43, 123, 45, 125, 44, 41, 125, 124, 91, 41, 124, 125, 41, 291, 40, 40, 59, 60, 41, 93, 48, 58, 41, 273, 59, 41, 41, 61, 61, 33, 93, 293, 36, 41, 41, 123, 40, 93, 66, 43, 123, 45, 125, 41, 36, 62, 258, 75, 91, 41, 124, 125, 44, 41, 59, 59, 60, 125, 123, 227, 173, 124, 125, 214, -1, 33, 58, 59, 36, 61, 62, 63, 40, -1, 102, 43, 104, 45, -1, 0, 123, 294, 125, -1, -1, -1, -1, 91, -1, 10, -1, 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, 179, 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, 162, -1, 164, -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, 206, 290, 291, 292, 293, 294, 259, 260, 285, 286, 287, -1, -1, -1, 267, 268, -1, -1, 295, -1, -1, -1, 228, -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, -1, -1, 277, 278, 279, 280, 281, 282, 41, -1, -1, -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, 14, 15, 16, -1, 93, 94, 58, 59, -1, 61, 62, 63, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 37, -1, -1, 39, 36, 42, 43, -1, 45, 41, 47, -1, 44, 124, 125, -1, -1, 36, -1, 93, 94, -1, 41, -1, 60, 44, 58, 59, -1, 61, 62, 63, -1, -1, -1, -1, -1, -1, -1, 58, 59, -1, -1, 62, 259, 260, -1, -1, -1, -1, 124, 125, 267, 268, -1, -1, -1, 94, -1, -1, -1, 93, 277, 278, 279, 280, 281, 282, -1, -1, -1, -1, -1, 288, 93, 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, 124, 125, -1, -1, 288, 258, 290, 291, 292, 293, 294, 264, 265, 266, 289, 37, -1, 158, -1, 294, 42, 43, -1, 45, -1, 47, -1, -1, -1, -1, 283, 284, 285, 286, 287, -1, 289, 178, -1, -1, -1, 294, 295, -1, -1, -1, -1, -1, 264, 265, 266, -1, 37, -1, -1, -1, -1, 42, 43, -1, 45, -1, 47, 204, -1, -1, -1, 283, 284, 285, 286, 287, 94, 289, -1, -1, -1, -1, 294, 295, -1, -1, 223, -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, -1, -1, -1, -1, -1, -1, -1, -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, -1, -1, -1, 58, 59, -1, 61, 62, 63, -1, 93, 94, -1, -1, -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, -1, -1, -1, -1, -1, -1, 91, -1, -1, 94, -1, -1, 283, 284, 285, 286, 287, -1, 289, -1, -1, -1, -1, -1, 295, -1, -1, -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, -1, 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, -1, -1, -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, 37, -1, -1, -1, 290, 291, 292, 293, -1, -1, -1, 0, -1, -1, -1, -1, 283, 284, 55, 56, 57, 10, 289, -1, -1, -1, 15, 294, -1, -1, -1, 68, 69, -1, 23, -1, -1, -1, -1, 28, 29, 30, 31, -1, 33, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 264, 265, 266, -1, 52, 53, -1, -1, -1, -1, -1, 107, -1, -1, -1, -1, -1, 65, -1, 283, 116, -1, -1, -1, -1, 289, 74, -1, 76, -1, 294, -1, -1, -1, 82, 83, 84, 85, 86, 87, 88, 89, 90, -1, 92, 93, 94, 95, 96, 97, 98, 99, 100, -1, -1, 103, -1, -1, -1, 155, -1, -1, -1, -1, -1, 161, -1, 163, -1, -1, 166, 167, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 130, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 192, -1, -1, -1, -1, -1, -1, 199, -1, -1, -1, -1, -1, 205, -1, -1, -1, -1, 162, -1, 164, -1, -1, -1, 168, -1, -1, -1, -1, -1, -1, -1, 176, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 197, -1, -1, -1, -1, -1, -1, -1, -1, 206, -1, -1, 209, -1, 211, 212, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 228, -1, -1, 231, }; #define YYFINAL 38 #ifndef YYDEBUG #define YYDEBUG 0 #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 '{' members '}' 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 '}'", "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 #if YYDEBUG #include #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; newss = yyss ? (short *)realloc(yyss, newsize * sizeof *newss) : (short *)malloc(newsize * sizeof *newss); if (newss == NULL) return -1; yyss = newss; yyssp = newss + i; newvs = yyvs ? (YYSTYPE *)realloc(yyvs, newsize * sizeof *newvs) : (YYSTYPE *)malloc(newsize * sizeof *newvs); if (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 #ifndef YYPARSE_PARAM #if defined(__cplusplus) || __STDC__ #define YYPARSE_PARAM_ARG void #define YYPARSE_PARAM_DECL #else /* ! ANSI-C/C++ */ #define YYPARSE_PARAM_ARG #define YYPARSE_PARAM_DECL #endif /* ANSI-C/C++ */ #else /* YYPARSE_PARAM */ #ifndef YYPARSE_PARAM_TYPE #define YYPARSE_PARAM_TYPE void * #endif #if defined(__cplusplus) || __STDC__ #define YYPARSE_PARAM_ARG YYPARSE_PARAM_TYPE YYPARSE_PARAM #define YYPARSE_PARAM_DECL #else /* ! ANSI-C/C++ */ #define YYPARSE_PARAM_ARG YYPARSE_PARAM #define YYPARSE_PARAM_DECL YYPARSE_PARAM_TYPE YYPARSE_PARAM; #endif /* ANSI-C/C++ */ #endif /* ! YYPARSE_PARAM */ int yyparse (YYPARSE_PARAM_ARG) YYPARSE_PARAM_DECL { 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 128 "parse.y" { parse_snode = yyvsp[0].s; YYACCEPT; } break; case 2: #line 131 "parse.y" { yyval.s = 0; } break; case 3: #line 132 "parse.y" { gdef=1; } break; case 4: #line 132 "parse.y" { gdef=0; } break; case 5: #line 133 "parse.y" { yyval.s = 0; } break; case 6: #line 135 "parse.y" { structdef(yyvsp[-4].p,yyvsp[-2].n); yyval.s = 0; } break; case 7: #line 137 "parse.y" { yyval.s = mksnode(1,S_SINGLE,yyvsp[-1].f); } break; case 8: #line 139 "parse.y" { yyval.s = yyvsp[0].s; } break; case 9: #line 141 "parse.y" { yyval.s = mksnode(0,S_BREAK); } break; case 10: #line 143 "parse.y" { yyval.s = mksnode(0,S_CONTINUE); } break; case 11: #line 145 "parse.y" { yyval.s = mksnode(1,S_RETURN,0); } break; case 12: #line 147 "parse.y" { yyval.s = mksnode(1,S_RETURN,yyvsp[-1].f); } break; case 13: #line 149 "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 14: #line 151 "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 15: #line 153 "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 16: #line 155 "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 17: #line 157 "parse.y" { yyval.s = mksnode(3,S_DO,yyvsp[-6].i,yyvsp[-5].s,yyvsp[-2].n); } break; case 18: #line 159 "parse.y" { yyval.s = mksnode(3,S_PFDEF,yyvsp[-7].p,yyvsp[-5].n,yyvsp[-1].f); NOPR; } break; case 19: #line 161 "parse.y" { yyval.s = mksnode(3,S_PFDEF,yyvsp[-3].p,yyvsp[-1].n,0); NOPR; } break; case 20: #line 162 "parse.y" { mkpvs(); } break; case 21: #line 163 "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 22: #line 169 "parse.y" { yyerrok; yyval.s = 0; } break; case 23: #line 172 "parse.y" { if ( main_parser ) prresult = 1; } break; case 24: #line 174 "parse.y" { if ( main_parser ) prresult = 0; } break; case 25: #line 176 "parse.y" { yyval.p = 0; } break; case 26: #line 178 "parse.y" { yyval.p = yyvsp[0].p; } break; case 27: #line 181 "parse.y" { yyval.s = mksnode(1,S_CPLX,yyvsp[-1].n); } break; case 28: #line 184 "parse.y" { MKNODE(yyval.n,yyvsp[0].p,0); } break; case 29: #line 186 "parse.y" { appendtonode(yyvsp[-2].n,yyvsp[0].p,&yyval.n); } break; case 30: #line 189 "parse.y" { val = (pointer)makepvar(yyvsp[0].p); MKNODE(yyval.n,val,0); } break; case 31: #line 191 "parse.y" { appendtonode(yyvsp[-2].n,(pointer)makepvar(yyvsp[0].p),&yyval.n); } break; case 32: #line 194 "parse.y" { yyval.n = 0; } break; case 33: #line 196 "parse.y" { appendtonode(yyvsp[-1].n,(pointer)yyvsp[0].s,&yyval.n); } break; case 34: #line 199 "parse.y" { yyval.n = 0; } break; case 35: #line 201 "parse.y" { yyval.n = yyvsp[0].n; } break; case 36: #line 204 "parse.y" { MKNODE(yyval.n,yyvsp[0].f,0); } break; case 37: #line 206 "parse.y" { appendtonode(yyvsp[-2].n,(pointer)yyvsp[0].f,&yyval.n); } break; case 38: #line 209 "parse.y" { MKNODE(yyval.n,yyvsp[0].f,0); } break; case 39: #line 211 "parse.y" { appendtonode(yyvsp[-2].n,(pointer)yyvsp[0].f,&yyval.n); } break; case 40: #line 214 "parse.y" { yyval.p = yyvsp[0].p; } break; case 41: #line 216 "parse.y" { yyval.p = yyvsp[0].p; } break; case 42: #line 219 "parse.y" { yyval.f = mkfnode(2,I_OPT,yyvsp[-2].p,yyvsp[0].f); } break; case 43: #line 222 "parse.y" { yyval.f = mkfnode(1,I_STR,yyvsp[0].p); } break; case 44: #line 224 "parse.y" { yyval.f = mkfnode(1,I_FORMULA,yyvsp[0].p); } break; case 45: #line 226 "parse.y" { yyval.f = mkfnode(1,I_ANS,yyvsp[0].i); } break; case 46: #line 228 "parse.y" { yyval.f = mkfnode(0,I_GF2NGEN); } break; case 47: #line 230 "parse.y" { yyval.f = mkfnode(0,I_GFPNGEN); } break; case 48: #line 232 "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 49: #line 259 "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 50: #line 273 "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 51: #line 287 "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 52: #line 292 "parse.y" { yyval.f = mkfnode(2,I_GETOPT,yyvsp[-1].p); } break; case 53: #line 296 "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 54: #line 309 "parse.y" { yyval.f = mkfnode(3,I_TIMER,yyvsp[-5].f,yyvsp[-3].f,yyvsp[-1].f); } break; case 55: #line 313 "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 56: #line 320 "parse.y" { yyval.f = mkfnode(2,I_IFUNC,yyvsp[-4].f,mkfnode(1,I_LIST,yyvsp[-1].n)); } break; case 57: #line 324 "parse.y" { yyval.f = mkfnode(1,I_CAR,yyvsp[-1].f); } break; case 58: #line 326 "parse.y" { yyval.f = mkfnode(1,I_CDR,yyvsp[-1].f); } break; case 59: #line 328 "parse.y" { yyval.f = yyvsp[-1].f; } break; case 60: #line 330 "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 61: #line 343 "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 62: #line 353 "parse.y" { yyval.f = mkfnode(2,I_POINT,yyvsp[-2].f,yyvsp[0].p); } break; case 63: #line 356 "parse.y" { yyval.f = yyvsp[0].f; } break; case 64: #line 358 "parse.y" { yyval.f = mkfnode(3,I_CAST,structtoindex(yyvsp[-2].p),yyvsp[0].f,0); } break; case 65: #line 360 "parse.y" { yyval.f = mkfnode(2,I_ASSPVAR,yyvsp[-2].f,yyvsp[0].f); } break; case 66: #line 362 "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 67: #line 364 "parse.y" { yyval.f = mkfnode(2,I_POSTSELF,yyvsp[0].p,yyvsp[-1].f); } break; case 68: #line 366 "parse.y" { yyval.f = mkfnode(2,I_PRESELF,yyvsp[-1].p,yyvsp[0].f); } break; case 69: #line 368 "parse.y" { yyval.f = mkfnode(1,I_LIST,yyvsp[-1].n); } break; case 70: #line 370 "parse.y" { yyval.f = yyvsp[0].f; } break; case 71: #line 372 "parse.y" { yyval.f = mkfnode(3,I_BOP,yyvsp[-1].p,0,yyvsp[0].f); } break; case 72: #line 374 "parse.y" { yyval.f = mkfnode(3,I_BOP,yyvsp[-1].p,yyvsp[-2].f,yyvsp[0].f); } break; case 73: #line 376 "parse.y" { yyval.f = mkfnode(3,I_BOP,yyvsp[-1].p,yyvsp[-2].f,yyvsp[0].f); } break; case 74: #line 378 "parse.y" { yyval.f = mkfnode(3,I_BOP,yyvsp[-1].p,yyvsp[-2].f,yyvsp[0].f); } break; case 75: #line 380 "parse.y" { yyval.f = mkfnode(3,I_BOP,yyvsp[-1].p,yyvsp[-2].f,yyvsp[0].f); } break; case 76: #line 382 "parse.y" { yyval.f = mkfnode(3,I_BOP,yyvsp[-1].p,yyvsp[-2].f,yyvsp[0].f); } break; case 77: #line 384 "parse.y" { yyval.f = mkfnode(3,I_BOP,yyvsp[-1].p,yyvsp[-2].f,yyvsp[0].f); } break; case 78: #line 386 "parse.y" { yyval.f = mkfnode(3,I_COP,yyvsp[-1].i,yyvsp[-2].f,yyvsp[0].f); } break; case 79: #line 388 "parse.y" { yyval.f = mkfnode(1,I_NOT,yyvsp[0].f); } break; case 80: #line 390 "parse.y" { yyval.f = mkfnode(2,I_OR,yyvsp[-2].f,yyvsp[0].f); } break; case 81: #line 392 "parse.y" { yyval.f = mkfnode(2,I_AND,yyvsp[-2].f,yyvsp[0].f); } break; case 82: #line 394 "parse.y" { yyval.f = mkfnode(3,I_LOP,yyvsp[-1].i,yyvsp[0].f,0); } break; case 83: #line 396 "parse.y" { yyval.f = mkfnode(3,I_LOP,yyvsp[-1].i,yyvsp[-2].f,yyvsp[0].f); } break; case 84: #line 398 "parse.y" { yyval.f = mkfnode(3,I_LOP,yyvsp[-1].i,yyvsp[-2].f,yyvsp[0].f); } break; case 85: #line 400 "parse.y" { yyval.f = mkfnode(3,I_LOP,yyvsp[-1].i,yyvsp[-2].f,yyvsp[0].f); } break; case 86: #line 402 "parse.y" { yyval.f = mkfnode(3,I_LOP,yyvsp[-1].i,yyvsp[-2].f,yyvsp[0].f); } break; case 87: #line 404 "parse.y" { yyval.f = mkfnode(3,I_LOP,yyvsp[-1].i,yyvsp[-2].f,yyvsp[0].f); } break; case 88: #line 406 "parse.y" { yyval.f = mkfnode(3,I_LOP,yyvsp[-1].i,yyvsp[-2].f,yyvsp[0].f); } break; case 89: #line 408 "parse.y" { yyval.f = mkfnode(3,I_CE,yyvsp[-4].f,yyvsp[-2].f,yyvsp[0].f); } break; case 90: #line 410 "parse.y" { yyval.f = mkfnode(1,I_EV,yyvsp[-1].n); } break; case 91: #line 412 "parse.y" { yyval.f = mkfnode(1,I_NEWCOMP,(int)structtoindex(yyvsp[-1].p)); } break; #line 1523 "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); }