#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; static QUOTE quote; extern jmp_buf env; #line 83 "parse.y" typedef union { FNODE f; SNODE s; NODE n; NODE2 n2; int i; pointer p; } YYSTYPE; #line 55 "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 QUOTED 269 #define DO 270 #define WHILE 271 #define FOR 272 #define IF 273 #define ELSE 274 #define BREAK 275 #define RETURN 276 #define CONTINUE 277 #define PARIF 278 #define MAP 279 #define RECMAP 280 #define TIMER 281 #define GF2NGEN 282 #define GFPNGEN 283 #define GFSNGEN 284 #define GETOPT 285 #define FOP_AND 286 #define FOP_OR 287 #define FOP_IMPL 288 #define FOP_REPL 289 #define FOP_EQUIV 290 #define FOP_NOT 291 #define LOP 292 #define FORMULA 293 #define UCASE 294 #define LCASE 295 #define STR 296 #define SELF 297 #define BOPASS 298 #define PLUS 299 #define MINUS 300 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, 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, 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, 1, 4, 6, 6, 6, 7, 4, 3, 8, 4, 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, 4, }; const short yydefred[] = { 0, 0, 0, 0, 45, 0, 0, 3, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 46, 47, 48, 0, 0, 44, 64, 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, 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, 0, 71, 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, 0, 12, 0, 0, 0, 0, 56, 0, 0, 0, 27, 33, 0, 0, 63, 73, 0, 94, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 66, 0, 28, 0, 95, 0, 0, 0, 0, 61, 62, 96, 0, 0, 0, 0, 0, 58, 0, 0, 0, 0, 55, 0, 0, 0, 0, 0, 0, 0, 65, 0, 0, 0, 19, 31, 5, 0, 16, 0, 0, 50, 0, 0, 0, 0, 0, 0, 0, 38, 0, 0, 0, 0, 0, 6, 29, 0, 0, 0, 0, 59, 52, 53, 0, 0, 0, 0, 51, 0, 0, 26, 0, 17, 0, 14, 0, 54, 0, 0, 39, 60, 32, 0, 57, 18, 0, 15, 21, }; const short yydgoto[] = { 41, 230, 206, 83, 43, 207, 133, 45, 79, 84, 85, 114, 161, 208, 46, 54, 166, 111, }; const short yysindex[] = { 127, -33, -263, -31, 0, -281, -275, 0, -13, 3, 9, 127, 10, 13, 14, -33, 176, -33, 16, 17, 18, 23, 0, 0, 0, 24, 480, 0, 0, -28, 0, 480, 480, 480, 480, 0, 386, 0, 0, 480, 480, 0, 1421, -87, 0, 0, 0, 0, 0, 0, -90, -263, 0, 25, -228, 480, 480, 480, -204, 480, 480, 480, 0, -24, 1421, 0, 0, -227, -224, -220, 480, -41, 1494, 480, 480, -219, 80, 80, -219, 43, -263, 480, 1691, 2078, -16, 36, 19, 480, 480, 480, 480, 480, 480, 480, 480, 480, 0, 480, 480, 480, 480, 480, 480, 480, 480, 480, 0, -263, 480, -263, 41, 44, 480, 0, 52, 1704, 1767, 1807, 45, 66, 34, 67, 480, 0, -20, 65, 69, 1848, 0, 78, -15, -23, 0, 0, 82, 1865, 0, 0, 480, 0, -7, 151, 95, 395, 2177, 810, 2140, 1997, -32, 2078, 80, 80, -92, -92, -92, -92, 2078, 1903, 0, 1967, 0, -27, 0, 480, 90, -161, -33, 0, 0, 0, 480, 127, 480, 127, -19, 0, 480, 480, 480, 480, 0, 99, 83, -263, 2028, 103, 2078, 480, 0, -33, -263, 106, 0, 0, 0, 107, 0, 91, -125, 0, 110, 111, 112, 1980, 480, 93, 94, 0, -2, 441, -87, 480, 2133, 0, 0, -139, -33, 480, 127, 0, 0, 0, 480, 118, 480, 480, 0, -263, 120, 0, 39, 0, 123, 0, 2039, 0, 1421, 2078, 0, 0, 0, 127, 0, 0, 85, 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, 0, 0, 0, 1146, 0, 0, 0, 0, 0, 0, 0, 0, 0, 72, 113, 0, 0, 772, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 128, 114, 128, 0, 514, 0, 0, 0, 0, 0, 0, 0, 0, 53, 55, -18, 840, 1222, 1258, 869, 0, 0, 0, 0, 163, 0, -34, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 128, 0, -30, 0, 0, 0, 0, 0, 0, 0, -18, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1437, 1553, 1513, 456, 538, 551, 879, 11, 1591, 2257, 1294, 1336, 908, 955, 984, 1078, 2351, 0, 0, 0, 0, 0, 0, 128, 0, 0, 0, 0, 0, 0, 128, 0, 114, 0, 0, 0, 128, 128, 128, 0, 0, 0, 1378, 0, 0, 0, 406, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 128, 0, 0, 0, 0, 0, 801, 128, 1638, 0, 0, 59, 0, 128, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, }; const short yygindex[] = { 0, 0, 49, 2424, -1, -43, 8, 0, -55, 2169, 0, 0, 0, 0, 552, 0, 0, 0, }; #define YYTABLESIZE 2668 const short yytable[] = { 128, 13, 102, 38, 108, 103, 4, 35, 44, 51, 100, 98, 74, 99, 52, 101, 122, 190, 182, 58, 53, 175, 199, 34, 176, 35, 37, 55, 35, 4, 103, 48, 49, 109, 13, 100, 98, 13, 99, 226, 101, 13, 227, 56, 13, 42, 13, 91, 42, 57, 59, 50, 91, 60, 61, 91, 67, 68, 69, 35, 13, 13, 102, 70, 71, 112, 113, 118, 124, 91, 91, 125, 91, 91, 91, 126, 34, 137, 96, 38, 138, 139, 162, 36, 163, 170, 32, 102, 33, 86, 35, 35, 13, 172, 86, 73, 165, 86, 189, 73, 110, 183, 37, 40, 91, 183, 34, 171, 173, 177, 181, 86, 86, 178, 86, 86, 86, 103, 34, 180, 129, 38, 100, 184, 13, 36, 13, 101, 32, 134, 33, 192, 103, 193, 39, 91, 91, 100, 98, 204, 99, 205, 101, 211, 37, 40, 86, 215, 216, 218, 217, 219, 220, 221, 224, 225, 158, 229, 160, 235, 34, 239, 240, 38, 241, 34, 35, 36, 132, 34, 32, 107, 33, 34, 102, 34, 39, 86, 86, 196, 34, 198, 25, 210, 238, 244, 37, 40, 103, 102, 0, 0, 0, 100, 98, 0, 99, 0, 101, 0, 0, 0, 0, 0, 36, 96, 0, 36, 35, 34, 246, 0, 38, 0, 0, 0, 36, 0, 39, 32, 0, 33, 36, 0, 0, 36, 233, 0, 0, 0, 0, 0, 87, 88, 89, 37, 40, 0, 0, 214, 0, 0, 0, 0, 0, 102, 0, 0, 0, 245, 35, 0, 0, 48, 49, 0, 36, 13, 13, 0, 13, 13, 13, 13, 13, 96, 0, 39, 13, 13, 13, 13, 13, 13, 13, 0, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 36, 36, 0, 96, 0, 13, 0, 13, 13, 13, 13, 13, 1, 2, 91, 3, 4, 5, 6, 7, 0, 0, 91, 8, 9, 10, 11, 12, 13, 14, 0, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 0, 0, 0, 0, 0, 26, 0, 27, 28, 29, 30, 31, 1, 2, 0, 3, 4, 5, 6, 7, 0, 0, 86, 8, 9, 10, 11, 12, 13, 14, 87, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 0, 0, 0, 0, 0, 26, 96, 27, 28, 29, 30, 31, 1, 2, 0, 3, 4, 5, 6, 7, 0, 96, 0, 8, 9, 10, 11, 12, 13, 14, 0, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 0, 0, 87, 0, 89, 26, 34, 27, 28, 29, 30, 31, 0, 36, 0, 81, 32, 0, 33, 103, 0, 0, 3, 4, 100, 98, 0, 99, 0, 101, 8, 9, 10, 40, 37, 96, 0, 37, 0, 0, 0, 18, 19, 20, 21, 22, 23, 24, 25, 0, 0, 0, 37, 0, 26, 37, 27, 28, 63, 30, 31, 34, 0, 0, 39, 0, 0, 0, 36, 0, 81, 32, 0, 33, 0, 0, 102, 0, 0, 87, 0, 0, 0, 0, 87, 0, 37, 87, 40, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 34, 87, 87, 0, 87, 87, 87, 36, 0, 0, 32, 0, 33, 0, 0, 0, 0, 37, 37, 39, 0, 0, 0, 0, 0, 0, 0, 40, 0, 0, 0, 0, 0, 0, 0, 0, 87, 49, 49, 0, 47, 0, 49, 49, 49, 49, 49, 0, 49, 0, 0, 0, 0, 0, 62, 65, 66, 0, 39, 49, 49, 88, 49, 49, 49, 0, 88, 87, 87, 88, 0, 0, 0, 0, 89, 0, 0, 0, 0, 89, 0, 106, 89, 88, 88, 0, 88, 88, 88, 0, 0, 0, 49, 0, 49, 49, 89, 89, 0, 89, 89, 89, 0, 123, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 88, 0, 0, 0, 0, 0, 0, 49, 49, 0, 0, 0, 80, 89, 3, 4, 0, 0, 0, 0, 0, 0, 8, 9, 10, 0, 0, 0, 87, 88, 89, 88, 88, 18, 19, 20, 21, 22, 23, 24, 25, 0, 0, 0, 89, 89, 26, 0, 27, 28, 63, 30, 31, 0, 0, 0, 95, 0, 0, 0, 0, 96, 0, 0, 0, 0, 0, 0, 0, 3, 4, 0, 0, 0, 0, 0, 0, 8, 9, 10, 0, 0, 0, 0, 0, 0, 0, 194, 18, 19, 20, 21, 22, 23, 24, 25, 0, 0, 0, 0, 0, 26, 0, 27, 28, 63, 30, 31, 3, 4, 213, 87, 87, 87, 87, 87, 8, 9, 10, 0, 0, 0, 0, 87, 0, 0, 0, 18, 19, 20, 21, 22, 23, 24, 25, 0, 0, 231, 0, 0, 26, 49, 27, 28, 63, 30, 31, 49, 49, 49, 0, 0, 0, 0, 0, 0, 0, 243, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 49, 49, 49, 49, 49, 0, 49, 0, 67, 67, 0, 49, 49, 67, 67, 67, 67, 67, 0, 67, 0, 0, 0, 0, 0, 88, 88, 88, 88, 0, 67, 67, 0, 67, 67, 67, 88, 68, 68, 89, 89, 89, 68, 68, 68, 68, 68, 103, 68, 89, 0, 0, 100, 98, 0, 99, 0, 101, 0, 68, 68, 0, 68, 68, 68, 67, 67, 0, 0, 0, 0, 0, 0, 0, 0, 0, 72, 72, 0, 0, 0, 72, 72, 72, 72, 72, 0, 72, 0, 0, 0, 0, 0, 0, 68, 68, 67, 67, 72, 72, 0, 72, 72, 72, 102, 83, 83, 0, 0, 0, 83, 83, 83, 83, 83, 90, 83, 0, 0, 0, 90, 0, 0, 90, 0, 68, 68, 83, 83, 0, 83, 83, 83, 72, 72, 0, 0, 90, 90, 0, 90, 90, 90, 0, 78, 78, 0, 0, 0, 78, 78, 78, 78, 78, 0, 78, 0, 0, 0, 0, 0, 0, 83, 83, 72, 72, 78, 78, 0, 78, 78, 78, 90, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 79, 79, 83, 83, 0, 79, 79, 79, 79, 79, 78, 79, 90, 90, 0, 0, 0, 0, 0, 0, 0, 0, 79, 79, 0, 79, 79, 79, 0, 81, 81, 0, 0, 0, 81, 81, 81, 81, 81, 0, 81, 78, 78, 0, 0, 67, 67, 67, 0, 0, 0, 81, 81, 0, 81, 81, 81, 79, 0, 0, 0, 0, 0, 0, 0, 0, 0, 67, 67, 67, 67, 67, 0, 67, 68, 68, 68, 0, 67, 67, 0, 0, 0, 87, 88, 89, 81, 0, 79, 79, 0, 0, 0, 0, 0, 0, 68, 68, 68, 68, 68, 0, 68, 0, 0, 90, 91, 68, 68, 0, 0, 95, 0, 72, 72, 72, 96, 81, 81, 0, 0, 0, 0, 80, 80, 0, 0, 0, 80, 80, 80, 80, 80, 0, 80, 72, 72, 72, 72, 72, 0, 72, 83, 83, 83, 80, 80, 72, 80, 80, 80, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 83, 83, 83, 83, 83, 0, 83, 0, 0, 0, 0, 0, 83, 90, 90, 0, 80, 78, 78, 78, 0, 0, 90, 0, 0, 0, 0, 49, 49, 0, 0, 0, 0, 49, 49, 0, 49, 0, 49, 78, 78, 78, 78, 78, 0, 78, 0, 80, 80, 0, 49, 78, 49, 0, 49, 0, 0, 0, 0, 0, 0, 0, 0, 0, 79, 79, 79, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 49, 0, 0, 49, 79, 79, 79, 79, 79, 0, 79, 81, 81, 81, 0, 0, 79, 0, 0, 0, 0, 74, 0, 0, 0, 0, 74, 0, 74, 74, 74, 0, 0, 81, 81, 81, 81, 81, 0, 81, 0, 0, 0, 74, 74, 81, 74, 74, 74, 0, 0, 0, 0, 0, 0, 0, 0, 75, 0, 0, 0, 0, 75, 0, 75, 75, 75, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 74, 75, 75, 0, 75, 75, 75, 0, 0, 0, 0, 0, 0, 0, 0, 76, 0, 0, 0, 0, 76, 0, 76, 76, 76, 0, 0, 80, 80, 80, 0, 74, 74, 0, 0, 0, 75, 76, 76, 0, 76, 76, 76, 0, 0, 0, 0, 0, 0, 80, 80, 80, 80, 80, 0, 80, 0, 77, 0, 0, 0, 80, 77, 0, 77, 77, 77, 75, 75, 0, 0, 0, 76, 0, 0, 0, 0, 0, 0, 77, 77, 0, 77, 77, 77, 0, 0, 0, 0, 49, 0, 0, 0, 0, 0, 49, 49, 49, 0, 50, 50, 0, 0, 76, 76, 50, 50, 0, 50, 0, 50, 0, 0, 0, 77, 0, 0, 49, 49, 49, 49, 49, 50, 49, 50, 0, 50, 0, 49, 49, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 38, 103, 0, 77, 77, 0, 100, 98, 0, 99, 0, 101, 50, 0, 0, 50, 82, 0, 0, 0, 0, 82, 0, 37, 82, 104, 0, 105, 0, 74, 74, 74, 0, 0, 0, 0, 0, 0, 82, 82, 0, 82, 82, 82, 0, 0, 0, 0, 0, 0, 0, 74, 74, 74, 74, 74, 0, 74, 102, 0, 0, 0, 0, 74, 0, 75, 75, 75, 0, 0, 0, 0, 0, 82, 103, 0, 0, 0, 0, 100, 98, 0, 99, 0, 101, 0, 0, 75, 75, 75, 75, 75, 85, 75, 0, 0, 0, 85, 0, 75, 85, 76, 76, 76, 82, 82, 0, 0, 0, 0, 0, 0, 0, 0, 85, 85, 0, 85, 85, 85, 0, 0, 0, 76, 76, 76, 76, 76, 0, 76, 0, 102, 84, 0, 0, 76, 0, 84, 0, 0, 84, 0, 0, 77, 77, 77, 0, 0, 0, 85, 0, 0, 0, 0, 84, 84, 0, 84, 84, 84, 0, 0, 0, 0, 0, 77, 77, 77, 77, 77, 92, 77, 0, 0, 0, 92, 0, 77, 92, 50, 85, 85, 0, 0, 0, 50, 50, 50, 0, 84, 0, 0, 92, 92, 0, 92, 92, 92, 0, 0, 0, 0, 0, 0, 0, 0, 0, 50, 50, 50, 50, 50, 0, 50, 0, 0, 0, 93, 50, 50, 84, 84, 93, 0, 0, 93, 0, 92, 87, 88, 89, 0, 0, 0, 0, 0, 0, 0, 0, 93, 93, 0, 93, 93, 82, 82, 82, 0, 0, 0, 90, 91, 92, 93, 94, 0, 95, 0, 92, 92, 0, 96, 97, 0, 0, 0, 82, 82, 82, 82, 82, 103, 82, 0, 93, 136, 100, 98, 82, 99, 0, 101, 0, 0, 103, 0, 0, 0, 167, 100, 98, 0, 99, 0, 101, 104, 0, 105, 0, 0, 0, 87, 88, 89, 0, 93, 93, 0, 104, 0, 105, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 85, 85, 90, 91, 92, 93, 94, 102, 95, 0, 0, 0, 0, 96, 0, 0, 0, 0, 0, 0, 102, 85, 85, 85, 85, 85, 103, 85, 0, 0, 168, 100, 98, 85, 99, 0, 101, 0, 0, 0, 84, 0, 0, 0, 0, 0, 0, 0, 0, 0, 104, 0, 105, 0, 0, 0, 0, 0, 0, 0, 0, 84, 84, 84, 84, 84, 103, 84, 0, 0, 169, 100, 98, 84, 99, 0, 101, 0, 0, 0, 0, 0, 0, 102, 0, 0, 0, 0, 0, 0, 104, 0, 105, 0, 0, 0, 0, 0, 0, 92, 92, 92, 92, 92, 0, 92, 0, 103, 0, 0, 0, 92, 100, 98, 179, 99, 0, 101, 0, 0, 0, 0, 0, 102, 103, 0, 0, 0, 185, 100, 98, 104, 99, 105, 101, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 104, 0, 105, 0, 0, 0, 0, 0, 0, 0, 93, 0, 0, 0, 103, 0, 102, 0, 0, 100, 98, 0, 99, 0, 101, 0, 0, 0, 0, 87, 88, 89, 0, 102, 0, 187, 0, 0, 104, 0, 105, 0, 87, 88, 89, 0, 0, 0, 0, 0, 0, 90, 91, 92, 93, 94, 0, 95, 0, 0, 0, 0, 96, 97, 90, 91, 92, 93, 94, 0, 95, 102, 0, 0, 0, 96, 97, 0, 103, 0, 0, 0, 0, 100, 98, 0, 99, 0, 101, 0, 0, 103, 0, 0, 0, 0, 100, 98, 222, 99, 0, 101, 104, 0, 105, 87, 88, 89, 103, 0, 0, 0, 0, 100, 98, 104, 99, 105, 101, 0, 0, 0, 0, 0, 0, 0, 0, 90, 91, 92, 93, 94, 0, 95, 188, 102, 0, 0, 96, 97, 0, 0, 209, 0, 0, 87, 88, 89, 102, 0, 103, 0, 0, 0, 242, 100, 98, 0, 99, 0, 101, 0, 0, 0, 0, 102, 0, 90, 91, 92, 93, 94, 0, 95, 104, 0, 105, 0, 96, 97, 0, 0, 0, 0, 0, 0, 87, 88, 89, 103, 0, 0, 0, 0, 100, 98, 0, 99, 0, 101, 0, 0, 0, 87, 88, 89, 0, 102, 90, 91, 92, 93, 94, 104, 95, 105, 0, 0, 0, 96, 97, 0, 0, 0, 0, 90, 91, 92, 93, 94, 0, 95, 0, 0, 0, 0, 96, 97, 0, 0, 0, 87, 88, 89, 103, 0, 102, 0, 0, 100, 98, 103, 99, 0, 101, 0, 100, 98, 0, 99, 0, 101, 0, 90, 91, 92, 93, 94, 0, 95, 105, 0, 0, 0, 96, 97, 0, 0, 0, 0, 0, 0, 0, 86, 0, 0, 0, 0, 103, 0, 0, 0, 0, 100, 98, 0, 99, 0, 101, 0, 0, 102, 119, 120, 121, 87, 88, 89, 102, 0, 0, 0, 0, 0, 0, 0, 130, 131, 87, 88, 89, 0, 0, 0, 0, 0, 0, 90, 91, 92, 93, 94, 0, 95, 0, 87, 88, 89, 96, 97, 90, 91, 92, 93, 94, 102, 95, 0, 0, 0, 0, 96, 97, 0, 0, 164, 0, 90, 91, 92, 93, 0, 4, 95, 0, 174, 0, 70, 96, 8, 9, 0, 70, 0, 0, 70, 0, 87, 88, 89, 18, 19, 20, 21, 22, 23, 24, 25, 0, 70, 70, 0, 0, 70, 0, 27, 28, 63, 30, 90, 91, 92, 93, 94, 0, 95, 191, 0, 0, 0, 96, 97, 0, 195, 0, 197, 87, 88, 89, 200, 201, 202, 0, 0, 70, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 90, 91, 92, 93, 94, 0, 95, 0, 0, 223, 0, 96, 97, 0, 0, 0, 228, 70, 70, 0, 0, 0, 232, 69, 0, 0, 0, 0, 69, 0, 0, 69, 0, 87, 88, 89, 0, 0, 0, 0, 87, 88, 89, 0, 0, 69, 69, 0, 0, 69, 0, 0, 0, 0, 0, 90, 91, 92, 93, 94, 42, 95, 90, 91, 92, 0, 96, 0, 95, 0, 0, 42, 0, 96, 0, 0, 64, 87, 88, 89, 69, 0, 0, 0, 0, 0, 72, 0, 0, 0, 0, 75, 76, 77, 78, 0, 82, 0, 0, 90, 0, 0, 0, 0, 0, 95, 0, 0, 0, 0, 96, 69, 69, 0, 0, 115, 116, 117, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 127, 0, 0, 0, 0, 0, 0, 0, 0, 42, 0, 135, 0, 0, 0, 0, 0, 140, 141, 142, 143, 144, 145, 146, 147, 148, 0, 149, 150, 151, 152, 153, 154, 155, 156, 157, 0, 0, 159, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 186, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 42, 0, 42, 0, 0, 0, 0, 0, 203, 0, 0, 0, 0, 0, 0, 0, 212, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 82, 0, 0, 0, 0, 0, 0, 0, 0, 42, 0, 0, 0, 234, 0, 236, 237, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 42, 0, 0, 42, }; const short yycheck[] = { 41, 0, 94, 36, 91, 37, 36, 41, 0, 40, 42, 43, 40, 45, 295, 47, 40, 44, 41, 11, 295, 41, 41, 41, 44, 59, 59, 40, 62, 59, 37, 294, 295, 123, 33, 42, 43, 36, 45, 41, 47, 40, 44, 40, 43, 41, 45, 36, 44, 40, 40, 2, 41, 40, 40, 44, 40, 40, 40, 93, 59, 60, 94, 40, 40, 40, 294, 271, 295, 58, 59, 295, 61, 62, 63, 295, 33, 93, 297, 36, 44, 62, 41, 40, 40, 40, 43, 94, 45, 36, 124, 125, 91, 59, 41, 123, 44, 44, 125, 123, 51, 124, 59, 60, 93, 124, 124, 41, 41, 44, 125, 58, 59, 44, 61, 62, 63, 37, 33, 41, 71, 36, 42, 41, 123, 40, 125, 47, 43, 80, 45, 41, 37, 294, 91, 124, 125, 42, 43, 40, 45, 58, 47, 40, 59, 60, 93, 41, 41, 274, 59, 41, 41, 41, 61, 61, 107, 296, 109, 41, 33, 41, 123, 36, 41, 93, 123, 40, 125, 41, 43, 258, 45, 59, 94, 62, 91, 124, 125, 171, 125, 173, 123, 184, 227, 240, 59, 60, 37, 94, -1, -1, -1, 42, 43, -1, 45, -1, 47, -1, -1, -1, -1, -1, 41, 297, -1, 44, 123, 33, 125, -1, 36, -1, -1, -1, 40, -1, 91, 43, -1, 45, 59, -1, -1, 62, 218, -1, -1, -1, -1, -1, 264, 265, 266, 59, 60, -1, -1, 190, -1, -1, -1, -1, -1, 94, -1, -1, -1, 241, 123, -1, -1, 294, 295, -1, 93, 256, 257, -1, 259, 260, 261, 262, 263, 297, -1, 91, 267, 268, 269, 270, 271, 272, 273, -1, 275, 276, 277, 278, 279, 280, 281, 282, 283, 284, 285, 124, 125, -1, 297, -1, 291, -1, 293, 294, 295, 296, 297, 256, 257, 290, 259, 260, 261, 262, 263, -1, -1, 298, 267, 268, 269, 270, 271, 272, 273, -1, 275, 276, 277, 278, 279, 280, 281, 282, 283, 284, 285, -1, -1, -1, -1, -1, 291, -1, 293, 294, 295, 296, 297, 256, 257, -1, 259, 260, 261, 262, 263, -1, -1, 298, 267, 268, 269, 270, 271, 272, 273, 264, 275, 276, 277, 278, 279, 280, 281, 282, 283, 284, 285, -1, -1, -1, -1, -1, 291, 297, 293, 294, 295, 296, 297, 256, 257, -1, 259, 260, 261, 262, 263, -1, 297, -1, 267, 268, 269, 270, 271, 272, 273, -1, 275, 276, 277, 278, 279, 280, 281, 282, 283, 284, 285, -1, -1, 264, -1, 266, 291, 33, 293, 294, 295, 296, 297, -1, 40, -1, 42, 43, -1, 45, 37, -1, -1, 259, 260, 42, 43, -1, 45, -1, 47, 267, 268, 269, 60, 41, 297, -1, 44, -1, -1, -1, 278, 279, 280, 281, 282, 283, 284, 285, -1, -1, -1, 59, -1, 291, 62, 293, 294, 295, 296, 297, 33, -1, -1, 91, -1, -1, -1, 40, -1, 42, 43, -1, 45, -1, -1, 94, -1, -1, 36, -1, -1, -1, -1, 41, -1, 93, 44, 60, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 33, 58, 59, -1, 61, 62, 63, 40, -1, -1, 43, -1, 45, -1, -1, -1, -1, 124, 125, 91, -1, -1, -1, -1, -1, -1, -1, 60, -1, -1, -1, -1, -1, -1, -1, -1, 93, 36, 37, -1, 1, -1, 41, 42, 43, 44, 45, -1, 47, -1, -1, -1, -1, -1, 15, 16, 17, -1, 91, 58, 59, 36, 61, 62, 63, -1, 41, 124, 125, 44, -1, -1, -1, -1, 36, -1, -1, -1, -1, 41, -1, 42, 44, 58, 59, -1, 61, 62, 63, -1, -1, -1, 91, -1, 93, 94, 58, 59, -1, 61, 62, 63, -1, 64, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 93, -1, -1, -1, -1, -1, -1, 124, 125, -1, -1, -1, 257, 93, 259, 260, -1, -1, -1, -1, -1, -1, 267, 268, 269, -1, -1, -1, 264, 265, 266, 124, 125, 278, 279, 280, 281, 282, 283, 284, 285, -1, -1, -1, 124, 125, 291, -1, 293, 294, 295, 296, 297, -1, -1, -1, 292, -1, -1, -1, -1, 297, -1, -1, -1, -1, -1, -1, -1, 259, 260, -1, -1, -1, -1, -1, -1, 267, 268, 269, -1, -1, -1, -1, -1, -1, -1, 166, 278, 279, 280, 281, 282, 283, 284, 285, -1, -1, -1, -1, -1, 291, -1, 293, 294, 295, 296, 297, 259, 260, 189, 286, 287, 288, 289, 290, 267, 268, 269, -1, -1, -1, -1, 298, -1, -1, -1, 278, 279, 280, 281, 282, 283, 284, 285, -1, -1, 216, -1, -1, 291, 258, 293, 294, 295, 296, 297, 264, 265, 266, -1, -1, -1, -1, -1, -1, -1, 236, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 286, 287, 288, 289, 290, -1, 292, -1, 36, 37, -1, 297, 298, 41, 42, 43, 44, 45, -1, 47, -1, -1, -1, -1, -1, 287, 288, 289, 290, -1, 58, 59, -1, 61, 62, 63, 298, 36, 37, 288, 289, 290, 41, 42, 43, 44, 45, 37, 47, 298, -1, -1, 42, 43, -1, 45, -1, 47, -1, 58, 59, -1, 61, 62, 63, 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, -1, 93, 94, 124, 125, 58, 59, -1, 61, 62, 63, 94, 36, 37, -1, -1, -1, 41, 42, 43, 44, 45, 36, 47, -1, -1, -1, 41, -1, -1, 44, -1, 124, 125, 58, 59, -1, 61, 62, 63, 93, 94, -1, -1, 58, 59, -1, 61, 62, 63, -1, 36, 37, -1, -1, -1, 41, 42, 43, 44, 45, -1, 47, -1, -1, -1, -1, -1, -1, 93, 94, 124, 125, 58, 59, -1, 61, 62, 63, 93, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 36, 37, 124, 125, -1, 41, 42, 43, 44, 45, 93, 47, 124, 125, -1, -1, -1, -1, -1, -1, -1, -1, 58, 59, -1, 61, 62, 63, -1, 36, 37, -1, -1, -1, 41, 42, 43, 44, 45, -1, 47, 124, 125, -1, -1, 264, 265, 266, -1, -1, -1, 58, 59, -1, 61, 62, 63, 93, -1, -1, -1, -1, -1, -1, -1, -1, -1, 286, 287, 288, 289, 290, -1, 292, 264, 265, 266, -1, 297, 298, -1, -1, -1, 264, 265, 266, 93, -1, 124, 125, -1, -1, -1, -1, -1, -1, 286, 287, 288, 289, 290, -1, 292, -1, -1, 286, 287, 297, 298, -1, -1, 292, -1, 264, 265, 266, 297, 124, 125, -1, -1, -1, -1, 36, 37, -1, -1, -1, 41, 42, 43, 44, 45, -1, 47, 286, 287, 288, 289, 290, -1, 292, 264, 265, 266, 58, 59, 298, 61, 62, 63, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 286, 287, 288, 289, 290, -1, 292, -1, -1, -1, -1, -1, 298, 289, 290, -1, 93, 264, 265, 266, -1, -1, 298, -1, -1, -1, -1, 36, 37, -1, -1, -1, -1, 42, 43, -1, 45, -1, 47, 286, 287, 288, 289, 290, -1, 292, -1, 124, 125, -1, 59, 298, 61, -1, 63, -1, -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, 91, -1, -1, 94, 286, 287, 288, 289, 290, -1, 292, 264, 265, 266, -1, -1, 298, -1, -1, -1, -1, 36, -1, -1, -1, -1, 41, -1, 43, 44, 45, -1, -1, 286, 287, 288, 289, 290, -1, 292, -1, -1, -1, 58, 59, 298, 61, 62, 63, -1, -1, -1, -1, -1, -1, -1, -1, 36, -1, -1, -1, -1, 41, -1, 43, 44, 45, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 93, 58, 59, -1, 61, 62, 63, -1, -1, -1, -1, -1, -1, -1, -1, 36, -1, -1, -1, -1, 41, -1, 43, 44, 45, -1, -1, 264, 265, 266, -1, 124, 125, -1, -1, -1, 93, 58, 59, -1, 61, 62, 63, -1, -1, -1, -1, -1, -1, 286, 287, 288, 289, 290, -1, 292, -1, 36, -1, -1, -1, 298, 41, -1, 43, 44, 45, 124, 125, -1, -1, -1, 93, -1, -1, -1, -1, -1, -1, 58, 59, -1, 61, 62, 63, -1, -1, -1, -1, 258, -1, -1, -1, -1, -1, 264, 265, 266, -1, 36, 37, -1, -1, 124, 125, 42, 43, -1, 45, -1, 47, -1, -1, -1, 93, -1, -1, 286, 287, 288, 289, 290, 59, 292, 61, -1, 63, -1, 297, 298, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 36, 37, -1, 124, 125, -1, 42, 43, -1, 45, -1, 47, 91, -1, -1, 94, 36, -1, -1, -1, -1, 41, -1, 59, 44, 61, -1, 63, -1, 264, 265, 266, -1, -1, -1, -1, -1, -1, 58, 59, -1, 61, 62, 63, -1, -1, -1, -1, -1, -1, -1, 286, 287, 288, 289, 290, -1, 292, 94, -1, -1, -1, -1, 298, -1, 264, 265, 266, -1, -1, -1, -1, -1, 93, 37, -1, -1, -1, -1, 42, 43, -1, 45, -1, 47, -1, -1, 286, 287, 288, 289, 290, 36, 292, -1, -1, -1, 41, -1, 298, 44, 264, 265, 266, 124, 125, -1, -1, -1, -1, -1, -1, -1, -1, 58, 59, -1, 61, 62, 63, -1, -1, -1, 286, 287, 288, 289, 290, -1, 292, -1, 94, 36, -1, -1, 298, -1, 41, -1, -1, 44, -1, -1, 264, 265, 266, -1, -1, -1, 93, -1, -1, -1, -1, 58, 59, -1, 61, 62, 63, -1, -1, -1, -1, -1, 286, 287, 288, 289, 290, 36, 292, -1, -1, -1, 41, -1, 298, 44, 258, 124, 125, -1, -1, -1, 264, 265, 266, -1, 93, -1, -1, 58, 59, -1, 61, 62, 63, -1, -1, -1, -1, -1, -1, -1, -1, -1, 286, 287, 288, 289, 290, -1, 292, -1, -1, -1, 36, 297, 298, 124, 125, 41, -1, -1, 44, -1, 93, 264, 265, 266, -1, -1, -1, -1, -1, -1, -1, -1, 58, 59, -1, 61, 62, 264, 265, 266, -1, -1, -1, 286, 287, 288, 289, 290, -1, 292, -1, 124, 125, -1, 297, 298, -1, -1, -1, 286, 287, 288, 289, 290, 37, 292, -1, 93, 41, 42, 43, 298, 45, -1, 47, -1, -1, 37, -1, -1, -1, 41, 42, 43, -1, 45, -1, 47, 61, -1, 63, -1, -1, -1, 264, 265, 266, -1, 124, 125, -1, 61, -1, 63, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 265, 266, 286, 287, 288, 289, 290, 94, 292, -1, -1, -1, -1, 297, -1, -1, -1, -1, -1, -1, 94, 286, 287, 288, 289, 290, 37, 292, -1, -1, 41, 42, 43, 298, 45, -1, 47, -1, -1, -1, 265, -1, -1, -1, -1, -1, -1, -1, -1, -1, 61, -1, 63, -1, -1, -1, -1, -1, -1, -1, -1, 286, 287, 288, 289, 290, 37, 292, -1, -1, 41, 42, 43, 298, 45, -1, 47, -1, -1, -1, -1, -1, -1, 94, -1, -1, -1, -1, -1, -1, 61, -1, 63, -1, -1, -1, -1, -1, -1, 286, 287, 288, 289, 290, -1, 292, -1, 37, -1, -1, -1, 298, 42, 43, 44, 45, -1, 47, -1, -1, -1, -1, -1, 94, 37, -1, -1, -1, 41, 42, 43, 61, 45, 63, 47, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 61, -1, 63, -1, -1, -1, -1, -1, -1, -1, 298, -1, -1, -1, 37, -1, 94, -1, -1, 42, 43, -1, 45, -1, 47, -1, -1, -1, -1, 264, 265, 266, -1, 94, -1, 58, -1, -1, 61, -1, 63, -1, 264, 265, 266, -1, -1, -1, -1, -1, -1, 286, 287, 288, 289, 290, -1, 292, -1, -1, -1, -1, 297, 298, 286, 287, 288, 289, 290, -1, 292, 94, -1, -1, -1, 297, 298, -1, 37, -1, -1, -1, -1, 42, 43, -1, 45, -1, 47, -1, -1, 37, -1, -1, -1, -1, 42, 43, 44, 45, -1, 47, 61, -1, 63, 264, 265, 266, 37, -1, -1, -1, -1, 42, 43, 61, 45, 63, 47, -1, -1, -1, -1, -1, -1, -1, -1, 286, 287, 288, 289, 290, -1, 292, 93, 94, -1, -1, 297, 298, -1, -1, 40, -1, -1, 264, 265, 266, 94, -1, 37, -1, -1, -1, 41, 42, 43, -1, 45, -1, 47, -1, -1, -1, -1, 94, -1, 286, 287, 288, 289, 290, -1, 292, 61, -1, 63, -1, 297, 298, -1, -1, -1, -1, -1, -1, 264, 265, 266, 37, -1, -1, -1, -1, 42, 43, -1, 45, -1, 47, -1, -1, -1, 264, 265, 266, -1, 94, 286, 287, 288, 289, 290, 61, 292, 63, -1, -1, -1, 297, 298, -1, -1, -1, -1, 286, 287, 288, 289, 290, -1, 292, -1, -1, -1, -1, 297, 298, -1, -1, -1, 264, 265, 266, 37, -1, 94, -1, -1, 42, 43, 37, 45, -1, 47, -1, 42, 43, -1, 45, -1, 47, -1, 286, 287, 288, 289, 290, -1, 292, 63, -1, -1, -1, 297, 298, -1, -1, -1, -1, -1, -1, -1, 40, -1, -1, -1, -1, 37, -1, -1, -1, -1, 42, 43, -1, 45, -1, 47, -1, -1, 94, 59, 60, 61, 264, 265, 266, 94, -1, -1, -1, -1, -1, -1, -1, 73, 74, 264, 265, 266, -1, -1, -1, -1, -1, -1, 286, 287, 288, 289, 290, -1, 292, -1, 264, 265, 266, 297, 298, 286, 287, 288, 289, 290, 94, 292, -1, -1, -1, -1, 297, 298, -1, -1, 112, -1, 286, 287, 288, 289, -1, 260, 292, -1, 122, -1, 36, 297, 267, 268, -1, 41, -1, -1, 44, -1, 264, 265, 266, 278, 279, 280, 281, 282, 283, 284, 285, -1, 58, 59, -1, -1, 62, -1, 293, 294, 295, 296, 286, 287, 288, 289, 290, -1, 292, 163, -1, -1, -1, 297, 298, -1, 170, -1, 172, 264, 265, 266, 176, 177, 178, -1, -1, 93, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 286, 287, 288, 289, 290, -1, 292, -1, -1, 204, -1, 297, 298, -1, -1, -1, 211, 124, 125, -1, -1, -1, 217, 36, -1, -1, -1, -1, 41, -1, -1, 44, -1, 264, 265, 266, -1, -1, -1, -1, 264, 265, 266, -1, -1, 58, 59, -1, -1, 62, -1, -1, -1, -1, -1, 286, 287, 288, 289, 290, 0, 292, 286, 287, 288, -1, 297, -1, 292, -1, -1, 11, -1, 297, -1, -1, 16, 264, 265, 266, 93, -1, -1, -1, -1, -1, 26, -1, -1, -1, -1, 31, 32, 33, 34, -1, 36, -1, -1, 286, -1, -1, -1, -1, -1, 292, -1, -1, -1, -1, 297, 124, 125, -1, -1, 55, 56, 57, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 70, -1, -1, -1, -1, -1, -1, -1, -1, 79, -1, 81, -1, -1, -1, -1, -1, 87, 88, 89, 90, 91, 92, 93, 94, 95, -1, 97, 98, 99, 100, 101, 102, 103, 104, 105, -1, -1, 108, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 138, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 171, -1, 173, -1, -1, -1, -1, -1, 179, -1, -1, -1, -1, -1, -1, -1, 187, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 209, -1, -1, -1, -1, -1, -1, -1, -1, 218, -1, -1, -1, 222, -1, 224, 225, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 241, -1, -1, 244, }; #define YYFINAL 41 #ifndef YYDEBUG #define YYDEBUG 0 #endif #define YYMAXTOKEN 300 #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","QUOTED", "DO","WHILE","FOR","IF","ELSE","BREAK","RETURN","CONTINUE","PARIF","MAP", "RECMAP","TIMER","GF2NGEN","GFPNGEN","GFSNGEN","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 : GFSNGEN", "pexpr : LCASE", "pexpr : LCASE '(' node ')'", "pexpr : LCASE '(' node '|' optlist ')'", "pexpr : MAP '(' LCASE ',' node ')'", "pexpr : RECMAP '(' LCASE ',' node ')'", "pexpr : LCASE '{' node '}' '(' node ')'", "pexpr : GETOPT '(' rawstr ')'", "pexpr : GETOPT '(' ')'", "pexpr : TIMER '(' expr ',' expr ',' expr ')'", "pexpr : PARIF '(' LCASE ')'", "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 ')'", "expr : QUOTED '(' expr ')'", }; #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 129 "parse.y" { parse_snode = yyvsp[0].s; YYACCEPT; } break; case 2: #line 132 "parse.y" { yyval.s = 0; } break; case 3: #line 133 "parse.y" { gdef=1; } break; case 4: #line 133 "parse.y" { gdef=0; } break; case 5: #line 134 "parse.y" { yyval.s = 0; } break; case 6: #line 136 "parse.y" { structdef(yyvsp[-4].p,yyvsp[-2].n); yyval.s = 0; } break; case 7: #line 138 "parse.y" { yyval.s = mksnode(1,S_SINGLE,yyvsp[-1].f); } break; case 8: #line 140 "parse.y" { yyval.s = yyvsp[0].s; } break; case 9: #line 142 "parse.y" { yyval.s = mksnode(0,S_BREAK); } break; case 10: #line 144 "parse.y" { yyval.s = mksnode(0,S_CONTINUE); } break; case 11: #line 146 "parse.y" { yyval.s = mksnode(1,S_RETURN,0); } break; case 12: #line 148 "parse.y" { yyval.s = mksnode(1,S_RETURN,yyvsp[-1].f); } break; case 13: #line 150 "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 152 "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 154 "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 156 "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 158 "parse.y" { yyval.s = mksnode(3,S_DO,yyvsp[-6].i,yyvsp[-5].s,yyvsp[-2].n); } break; case 18: #line 160 "parse.y" { yyval.s = mksnode(3,S_PFDEF,yyvsp[-7].p,yyvsp[-5].n,yyvsp[-1].f); NOPR; } break; case 19: #line 162 "parse.y" { yyval.s = mksnode(3,S_PFDEF,yyvsp[-3].p,yyvsp[-1].n,0); NOPR; } break; case 20: #line 163 "parse.y" { mkpvs(); } break; case 21: #line 164 "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 170 "parse.y" { yyerrok; yyval.s = 0; } break; case 23: #line 173 "parse.y" { if ( main_parser ) prresult = 1; } break; case 24: #line 175 "parse.y" { if ( main_parser ) prresult = 0; } break; case 25: #line 177 "parse.y" { yyval.p = 0; } break; case 26: #line 179 "parse.y" { yyval.p = yyvsp[0].p; } break; case 27: #line 182 "parse.y" { yyval.s = mksnode(1,S_CPLX,yyvsp[-1].n); } break; case 28: #line 185 "parse.y" { MKNODE(yyval.n,yyvsp[0].p,0); } break; case 29: #line 187 "parse.y" { appendtonode(yyvsp[-2].n,yyvsp[0].p,&yyval.n); } break; case 30: #line 190 "parse.y" { val = (pointer)makepvar(yyvsp[0].p); MKNODE(yyval.n,val,0); } break; case 31: #line 192 "parse.y" { appendtonode(yyvsp[-2].n,(pointer)makepvar(yyvsp[0].p),&yyval.n); } break; case 32: #line 195 "parse.y" { yyval.n = 0; } break; case 33: #line 197 "parse.y" { appendtonode(yyvsp[-1].n,(pointer)yyvsp[0].s,&yyval.n); } break; case 34: #line 200 "parse.y" { yyval.n = 0; } break; case 35: #line 202 "parse.y" { yyval.n = yyvsp[0].n; } break; case 36: #line 205 "parse.y" { MKNODE(yyval.n,yyvsp[0].f,0); } break; case 37: #line 207 "parse.y" { appendtonode(yyvsp[-2].n,(pointer)yyvsp[0].f,&yyval.n); } break; case 38: #line 210 "parse.y" { MKNODE(yyval.n,yyvsp[0].f,0); } break; case 39: #line 212 "parse.y" { appendtonode(yyvsp[-2].n,(pointer)yyvsp[0].f,&yyval.n); } break; case 40: #line 215 "parse.y" { yyval.p = yyvsp[0].p; } break; case 41: #line 217 "parse.y" { yyval.p = yyvsp[0].p; } break; case 42: #line 220 "parse.y" { yyval.f = mkfnode(2,I_OPT,yyvsp[-2].p,yyvsp[0].f); } break; case 43: #line 223 "parse.y" { yyval.f = mkfnode(1,I_STR,yyvsp[0].p); } break; case 44: #line 225 "parse.y" { yyval.f = mkfnode(1,I_FORMULA,yyvsp[0].p); } break; case 45: #line 227 "parse.y" { yyval.f = mkfnode(1,I_ANS,yyvsp[0].i); } break; case 46: #line 229 "parse.y" { yyval.f = mkfnode(0,I_GF2NGEN); } break; case 47: #line 231 "parse.y" { yyval.f = mkfnode(0,I_GFPNGEN); } break; case 48: #line 233 "parse.y" { yyval.f = mkfnode(0,I_GFSNGEN); } break; case 49: #line 235 "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 50: #line 262 "parse.y" { gen_searchf(yyvsp[-3].p,(FUNC *)&val); yyval.f = mkfnode(2,I_FUNC,val,mkfnode(1,I_LIST,yyvsp[-1].n)); } break; case 51: #line 268 "parse.y" { gen_searchf(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 52: #line 274 "parse.y" { gen_searchf(yyvsp[-3].p,(FUNC *)&val); yyval.f = mkfnode(2,I_MAP,val,mkfnode(1,I_LIST,yyvsp[-1].n)); } break; case 53: #line 279 "parse.y" { gen_searchf(yyvsp[-3].p,(FUNC *)&val); yyval.f = mkfnode(2,I_RECMAP,val,mkfnode(1,I_LIST,yyvsp[-1].n)); } break; case 54: #line 284 "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 55: #line 289 "parse.y" { yyval.f = mkfnode(2,I_GETOPT,yyvsp[-1].p); } break; case 56: #line 293 "parse.y" { yyval.f = mkfnode(2,I_GETOPT,0); } break; case 57: #line 297 "parse.y" { yyval.f = mkfnode(3,I_TIMER,yyvsp[-5].f,yyvsp[-3].f,yyvsp[-1].f); } break; case 58: #line 301 "parse.y" { searchf(parif,yyvsp[-1].p,(FUNC *)&val); if ( !val ) mkparif(yyvsp[-1].p,(FUNC *)&val); yyval.f = mkfnode(2,I_FUNC,val,0); } break; case 59: #line 308 "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 60: #line 315 "parse.y" { yyval.f = mkfnode(2,I_IFUNC,yyvsp[-4].f,mkfnode(1,I_LIST,yyvsp[-1].n)); } break; case 61: #line 319 "parse.y" { yyval.f = mkfnode(1,I_CAR,yyvsp[-1].f); } break; case 62: #line 321 "parse.y" { yyval.f = mkfnode(1,I_CDR,yyvsp[-1].f); } break; case 63: #line 323 "parse.y" { yyval.f = mkfnode(1,I_PAREN,yyvsp[-1].f); } break; case 64: #line 325 "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 65: #line 338 "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 66: #line 348 "parse.y" { yyval.f = mkfnode(2,I_POINT,yyvsp[-2].f,yyvsp[0].p); } break; case 67: #line 351 "parse.y" { yyval.f = yyvsp[0].f; } break; case 68: #line 353 "parse.y" { yyval.f = mkfnode(3,I_CAST,structtoindex(yyvsp[-2].p),yyvsp[0].f,0); } break; case 69: #line 355 "parse.y" { yyval.f = mkfnode(2,I_ASSPVAR,yyvsp[-2].f,yyvsp[0].f); } break; case 70: #line 357 "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 71: #line 359 "parse.y" { yyval.f = mkfnode(2,I_POSTSELF,yyvsp[0].p,yyvsp[-1].f); } break; case 72: #line 361 "parse.y" { yyval.f = mkfnode(2,I_PRESELF,yyvsp[-1].p,yyvsp[0].f); } break; case 73: #line 363 "parse.y" { yyval.f = mkfnode(1,I_LIST,yyvsp[-1].n); } break; case 74: #line 365 "parse.y" { yyval.f = yyvsp[0].f; } break; case 75: #line 367 "parse.y" { yyval.f = mkfnode(1,I_MINUS,yyvsp[0].f); } break; case 76: #line 369 "parse.y" { yyval.f = mkfnode(3,I_BOP,yyvsp[-1].p,yyvsp[-2].f,yyvsp[0].f); } break; case 77: #line 371 "parse.y" { yyval.f = mkfnode(3,I_BOP,yyvsp[-1].p,yyvsp[-2].f,yyvsp[0].f); } break; case 78: #line 373 "parse.y" { yyval.f = mkfnode(3,I_BOP,yyvsp[-1].p,yyvsp[-2].f,yyvsp[0].f); } break; case 79: #line 375 "parse.y" { yyval.f = mkfnode(3,I_BOP,yyvsp[-1].p,yyvsp[-2].f,yyvsp[0].f); } break; case 80: #line 377 "parse.y" { yyval.f = mkfnode(3,I_BOP,yyvsp[-1].p,yyvsp[-2].f,yyvsp[0].f); } break; case 81: #line 379 "parse.y" { yyval.f = mkfnode(3,I_BOP,yyvsp[-1].p,yyvsp[-2].f,yyvsp[0].f); } break; case 82: #line 381 "parse.y" { yyval.f = mkfnode(3,I_COP,yyvsp[-1].i,yyvsp[-2].f,yyvsp[0].f); } break; case 83: #line 383 "parse.y" { yyval.f = mkfnode(1,I_NOT,yyvsp[0].f); } break; case 84: #line 385 "parse.y" { yyval.f = mkfnode(2,I_OR,yyvsp[-2].f,yyvsp[0].f); } break; case 85: #line 387 "parse.y" { yyval.f = mkfnode(2,I_AND,yyvsp[-2].f,yyvsp[0].f); } break; case 86: #line 389 "parse.y" { yyval.f = mkfnode(3,I_LOP,yyvsp[-1].i,yyvsp[0].f,0); } break; case 87: #line 391 "parse.y" { yyval.f = mkfnode(3,I_LOP,yyvsp[-1].i,yyvsp[-2].f,yyvsp[0].f); } break; case 88: #line 393 "parse.y" { yyval.f = mkfnode(3,I_LOP,yyvsp[-1].i,yyvsp[-2].f,yyvsp[0].f); } break; case 89: #line 395 "parse.y" { yyval.f = mkfnode(3,I_LOP,yyvsp[-1].i,yyvsp[-2].f,yyvsp[0].f); } break; case 90: #line 397 "parse.y" { yyval.f = mkfnode(3,I_LOP,yyvsp[-1].i,yyvsp[-2].f,yyvsp[0].f); } break; case 91: #line 399 "parse.y" { yyval.f = mkfnode(3,I_LOP,yyvsp[-1].i,yyvsp[-2].f,yyvsp[0].f); } break; case 92: #line 401 "parse.y" { yyval.f = mkfnode(3,I_LOP,yyvsp[-1].i,yyvsp[-2].f,yyvsp[0].f); } break; case 93: #line 403 "parse.y" { yyval.f = mkfnode(3,I_CE,yyvsp[-4].f,yyvsp[-2].f,yyvsp[0].f); } break; case 94: #line 405 "parse.y" { yyval.f = mkfnode(1,I_EV,yyvsp[-1].n); } break; case 95: #line 407 "parse.y" { yyval.f = mkfnode(1,I_NEWCOMP,(int)structtoindex(yyvsp[-1].p)); } break; case 96: #line 409 "parse.y" { MKQUOTE(quote,yyvsp[-1].f); yyval.f = mkfnode(1,I_FORMULA,(pointer)quote); } break; #line 1561 "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); }