ProfitPress Mega CDROM2 Shareware Freeware (MSDOS)(1992)(Eng)

home *** CD-ROM | disk | FTP | other *** search

/ ProfitPress Mega CDROM2 …eeware (MSDOS)(1992)(Eng) / ProfitPress-MegaCDROM2.B6I / MISC / GNU / PL4019AS.ZIP / PERLY.C < prev next >

Wrap

C/C++ Source or Header | 1992-01-24 | 105.4 KB | 2,685 lines

/* A Bison parser, made from perly.y */ #define WORD 258 #define APPEND 259 #define OPEN 260 #define SSELECT 261 #define LOOPEX 262 #define USING 263 #define FORMAT 264 #define DO 265 #define SHIFT 266 #define PUSH 267 #define POP 268 #define LVALFUN 269 #define WHILE 270 #define UNTIL 271 #define IF 272 #define UNLESS 273 #define ELSE 274 #define ELSIF 275 #define CONTINUE 276 #define SPLIT 277 #define FLIST 278 #define FOR 279 #define FILOP 280 #define FILOP2 281 #define FILOP3 282 #define FILOP4 283 #define FILOP22 284 #define FILOP25 285 #define FUNC0 286 #define FUNC1 287 #define FUNC2 288 #define FUNC2x 289 #define FUNC3 290 #define FUNC4 291 #define FUNC5 292 #define HSHFUN 293 #define HSHFUN3 294 #define FLIST2 295 #define SUB 296 #define FILETEST 297 #define LOCAL 298 #define DELETE 299 #define RELOP 300 #define EQOP 301 #define MULOP 302 #define ADDOP 303 #define PACKAGE 304 #define AMPER 305 #define FORMLIST 306 #define REG 307 #define ARYLEN 308 #define ARY 309 #define HSH 310 #define STAR 311 #define SUBST 312 #define PATTERN 313 #define RSTRING 314 #define TRANS 315 #define LISTOP 316 #define DOTDOT 317 #define OROR 318 #define ANDAND 319 #define UNIOP 320 #define LS 321 #define RS 322 #define MATCH 323 #define NMATCH 324 #define UMINUS 325 #define POW 326 #define INC 327 #define DEC 328 #line 22 "perly.y" #include "INTERN.h" #include "perl.h" /*SUPPRESS 530*/ /*SUPPRESS 593*/ /*SUPPRESS 595*/ STAB *scrstab; ARG *arg4; /* rarely used arguments to make_op() */ ARG *arg5; #line 38 "perly.y" typedef union { int ival; char *cval; ARG *arg; CMD *cmdval; struct compcmd compval; STAB *stabval; FCMD *formval; } YYSTYPE; #ifndef YYLTYPE typedef struct yyltype { int timestamp; int first_line; int first_column; int last_line; int last_column; char *text; } yyltype; #define YYLTYPE yyltype #endif #include <stdio.h> #ifndef __STDC__ #define const #endif #define YYFINAL 414 #define YYFLAG -32768 #define YYNTBASE 92 #define YYTRANSLATE(x) ((unsigned)(x) <= 328 ? yytranslate[x] : 121) static const char yytranslate[] = { 0, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 79, 2, 2, 2, 2, 73, 2, 85, 4, 2, 89, 64, 88, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 67, 87, 2, 65, 2, 66, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 90, 2, 91, 72, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 3, 71, 86, 80, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 1, 2, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 68, 69, 70, 74, 75, 76, 77, 78, 81, 82, 83, 84 }; static const short yyprhs[] = { 0, 0, 1, 4, 8, 11, 12, 15, 21, 26, 27, 28, 31, 33, 36, 38, 41, 45, 47, 49, 53, 57, 61, 65, 71, 77, 81, 85, 92, 99, 104, 109, 117, 124, 135, 138, 139, 141, 142, 144, 145, 148, 150, 152, 154, 159, 163, 167, 171, 174, 178, 180, 183, 187, 192, 197, 202, 207, 212, 217, 222, 227, 231, 235, 239, 243, 247, 251, 255, 259, 263, 267, 271, 275, 279, 285, 289, 293, 295, 298, 301, 304, 307, 310, 313, 316, 319, 322, 325, 327, 332, 336, 339, 342, 345, 347, 349, 354, 356, 358, 363, 370, 376, 381, 386, 392, 394, 396, 398, 400, 402, 408, 414, 419, 424, 427, 433, 439, 444, 449, 452, 454, 457, 459, 462, 465, 467, 470, 475, 483, 486, 491, 497, 502, 505, 508, 512, 514, 520, 527, 534, 542, 552, 559, 562, 567, 570, 575, 577, 579, 586, 592, 597, 603, 608, 611, 613, 615, 619, 623, 628, 634, 640, 647, 654, 662, 671, 676, 679, 686, 688, 690, 692, 695, 698, 702, 706, 710, 712, 714, 716, 718, 720, 722, 725, 727 }; static const short yyrhs[] = { -1, 93, 98, 0, 96, 23, 96, 0, 96, 95, 0, 0, 21, 96, 0, 22, 85, 111, 4, 94, 0, 3, 97, 98, 86, 0, 0, 0, 98, 99, 0, 106, 0, 105, 101, 0, 102, 0, 105, 87, 0, 105, 100, 87, 0, 1, 0, 111, 0, 111, 19, 111, 0, 111, 20, 111, 0, 111, 17, 111, 0, 111, 18, 111, 0, 19, 85, 111, 4, 94, 0, 20, 85, 111, 4, 94, 0, 19, 96, 94, 0, 20, 96, 94, 0, 105, 17, 85, 104, 4, 94, 0, 105, 18, 85, 111, 4, 94, 0, 105, 17, 96, 94, 0, 105, 18, 96, 94, 0, 105, 26, 54, 85, 111, 119, 94, 0, 105, 26, 85, 111, 119, 94, 0, 105, 26, 85, 103, 87, 104, 87, 103, 4, 96, 0, 105, 94, 0, 0, 100, 0, 0, 111, 0, 0, 5, 67, 0, 107, 0, 108, 0, 109, 0, 11, 5, 65, 53, 0, 11, 65, 53, 0, 43, 5, 96, 0, 51, 5, 87, 0, 64, 111, 0, 111, 64, 113, 0, 113, 0, 64, 113, 0, 113, 65, 113, 0, 113, 82, 65, 113, 0, 113, 49, 65, 113, 0, 113, 50, 65, 113, 0, 113, 75, 65, 113, 0, 113, 76, 65, 113, 0, 113, 73, 65, 113, 0, 113, 72, 65, 113, 0, 113, 71, 65, 113, 0, 113, 82, 113, 0, 113, 49, 113, 0, 113, 50, 113, 0, 113, 75, 113, 0, 113, 76, 113, 0, 113, 47, 113, 0, 113, 48, 113, 0, 113, 73, 113, 0, 113, 72, 113, 0, 113, 71, 113, 0, 113, 68, 113, 0, 113, 70, 113, 0, 113, 69, 113, 0, 113, 66, 113, 67, 113, 0, 113, 77, 113, 0, 113, 78, 113, 0, 114, 0, 88, 114, 0, 89, 114, 0, 79, 114, 0, 80, 114, 0, 114, 83, 0, 114, 84, 0, 83, 114, 0, 84, 114, 0, 44, 5, 0, 44, 113, 0, 44, 0, 45, 85, 111, 119, 0, 85, 111, 119, 0, 85, 4, 0, 12, 113, 0, 12, 96, 0, 54, 0, 58, 0, 54, 90, 111, 91, 0, 57, 0, 56, 0, 54, 3, 111, 86, 0, 85, 111, 119, 90, 111, 91, 0, 85, 4, 90, 111, 91, 0, 56, 90, 111, 91, 0, 56, 3, 111, 86, 0, 46, 54, 3, 111, 86, 0, 55, 0, 61, 0, 60, 0, 59, 0, 62, 0, 12, 5, 85, 111, 119, 0, 52, 5, 85, 111, 119, 0, 12, 5, 85, 4, 0, 52, 5, 85, 4, 0, 52, 5, 0, 12, 54, 85, 111, 119, 0, 52, 54, 85, 111, 119, 0, 12, 54, 85, 4, 0, 52, 54, 85, 4, 0, 52, 54, 0, 9, 0, 9, 5, 0, 74, 0, 74, 96, 0, 74, 113, 0, 8, 0, 8, 5, 0, 8, 85, 116, 4, 0, 8, 85, 113, 112, 112, 112, 4, 0, 7, 5, 0, 7, 85, 5, 4, 0, 7, 85, 116, 110, 4, 0, 27, 85, 116, 4, 0, 27, 5, 0, 27, 54, 0, 27, 85, 4, 0, 27, 0, 28, 85, 116, 110, 4, 0, 29, 85, 116, 112, 110, 4, 0, 31, 85, 116, 64, 116, 4, 0, 30, 85, 116, 112, 112, 110, 4, 0, 32, 85, 116, 64, 116, 112, 112, 110, 4, 0, 14, 85, 117, 64, 111, 119, 0, 15, 117, 0, 15, 85, 117, 4, 0, 13, 117, 0, 13, 85, 117, 4, 0, 13, 0, 24, 0, 24, 85, 113, 112, 112, 4, 0, 24, 85, 113, 112, 4, 0, 24, 85, 113, 4, 0, 42, 85, 113, 110, 4, 0, 25, 85, 111, 119, 0, 16, 113, 0, 16, 0, 33, 0, 33, 85, 4, 0, 34, 85, 4, 0, 34, 85, 111, 4, 0, 35, 85, 113, 110, 4, 0, 36, 85, 113, 112, 4, 0, 36, 85, 113, 112, 110, 4, 0, 37, 85, 113, 112, 110, 4, 0, 38, 85, 113, 112, 112, 110, 4, 0, 39, 85, 113, 112, 112, 112, 110, 4, 0, 40, 85, 118, 4, 0, 40, 118, 0, 41, 85, 118, 112, 110, 4, 0, 120, 0, 115, 0, 63, 0, 63, 111, 0, 63, 5, 0, 63, 5, 111, 0, 63, 54, 111, 0, 63, 96, 111, 0, 5, 0, 113, 0, 5, 0, 56, 0, 5, 0, 57, 0, 64, 4, 0, 4, 0, 5, 0 }; #if YYDEBUG != 0 static const short yyrline[] = { 0, 94, 101, 107, 109, 113, 115, 117, 122, 130, 134, 136, 140, 142, 144, 145, 154, 158, 160, 162, 165, 168, 171, 176, 179, 182, 185, 190, 194, 198, 202, 206, 245, 272, 279, 283, 285, 288, 290, 293, 295, 298, 300, 302, 306, 314, 318, 325, 345, 349, 351, 354, 358, 365, 367, 369, 371, 373, 375, 377, 379, 383, 385, 394, 396, 398, 400, 402, 404, 406, 408, 410, 413, 415, 417, 419, 421, 423, 427, 429, 431, 433, 435, 438, 441, 444, 447, 453, 456, 462, 466, 468, 470, 473, 475, 477, 479, 482, 486, 490, 495, 500, 505, 510, 515, 520, 522, 524, 526, 528, 530, 536, 541, 547, 552, 557, 563, 568, 574, 579, 584, 586, 589, 591, 593, 595, 597, 603, 605, 608, 613, 618, 622, 626, 631, 635, 639, 642, 644, 646, 648, 650, 653, 658, 660, 662, 664, 666, 671, 681, 684, 687, 691, 696, 701, 704, 708, 710, 712, 714, 716, 720, 724, 728, 730, 733, 736, 741, 746, 748, 749, 752, 757, 762, 767, 772, 777, 784, 787, 790, 793, 797, 800, 804, 806, 815 }; static const char * const yytname[] = { "$", "error","$illegal.","'{'","')'","WORD","APPEND","OPEN","SSELECT","LOOPEX","USING", "FORMAT","DO","SHIFT","PUSH","POP","LVALFUN","WHILE","UNTIL","IF","UNLESS", "ELSE","ELSIF","CONTINUE","SPLIT","FLIST","FOR","FILOP","FILOP2","FILOP3","FILOP4", "FILOP22","FILOP25","FUNC0","FUNC1","FUNC2","FUNC2x","FUNC3","FUNC4","FUNC5","HSHFUN", "HSHFUN3","FLIST2","SUB","FILETEST","LOCAL","DELETE","RELOP","EQOP","MULOP","ADDOP", "PACKAGE","AMPER","FORMLIST","REG","ARYLEN","ARY","HSH","STAR","SUBST","PATTERN", "RSTRING","TRANS","LISTOP","','","'='","'?'","':'","DOTDOT","OROR","ANDAND", "'|'","'^'","'&'","UNIOP","LS","RS","MATCH","NMATCH","'!'","'~'", "UMINUS","POW","INC","DEC","'('","'}'","';'","'-'","'+'","'['", "']'","prog","@1","compblock","else","block","remember","lineseq","line","sideff", "cond","loop","nexpr","texpr","label","decl","format","subrout","package","cexpr", "expr","csexpr","sexpr","term","listop","handle","aryword","hshword","crp","bareword", "" }; #endif static const short yyr1[] = { 0, 93, 92, 94, 94, 95, 95, 95, 96, 97, 98, 98, 99, 99, 99, 99, 99, 100, 100, 100, 100, 100, 100, 101, 101, 101, 101, 102, 102, 102, 102, 102, 102, 102, 102, 103, 103, 104, 104, 105, 105, 106, 106, 106, 107, 107, 108, 109, 110, 111, 111, 112, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 113, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 114, 115, 115, 115, 115, 115, 115, 116, 116, 117, 117, 118, 118, 119, 119, 120 }; static const short yyr2[] = { 0, 0, 2, 3, 2, 0, 2, 5, 4, 0, 0, 2, 1, 2, 1, 2, 3, 1, 1, 3, 3, 3, 3, 5, 5, 3, 3, 6, 6, 4, 4, 7, 6, 10, 2, 0, 1, 0, 1, 0, 2, 1, 1, 1, 4, 3, 3, 3, 2, 3, 1, 2, 3, 4, 4, 4, 4, 4, 4, 4, 4, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 5, 3, 3, 1, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 1, 4, 3, 2, 2, 2, 1, 1, 4, 1, 1, 4, 6, 5, 4, 4, 5, 1, 1, 1, 1, 1, 5, 5, 4, 4, 2, 5, 5, 4, 4, 2, 1, 2, 1, 2, 2, 1, 2, 4, 7, 2, 4, 5, 4, 2, 2, 3, 1, 5, 6, 6, 7, 9, 6, 2, 4, 2, 4, 1, 1, 6, 5, 4, 5, 4, 2, 1, 1, 3, 3, 4, 5, 5, 6, 6, 7, 8, 4, 2, 6, 1, 1, 1, 2, 2, 3, 3, 3, 1, 1, 1, 1, 1, 1, 2, 1, 1 }; static const short yydefact[] = { 1, 10, 39, 0, 0, 0, 0, 11, 14, 0, 12, 41, 42, 43, 40, 0, 0, 0, 0, 17, 9, 185, 0, 125, 120, 0, 147, 0, 0, 155, 0, 0, 0, 0, 148, 0, 0, 136, 0, 0, 0, 0, 0, 156, 0, 0, 0, 0, 0, 0, 0, 0, 0, 88, 0, 0, 0, 94, 105, 98, 97, 95, 108, 107, 106, 109, 171, 122, 0, 0, 0, 0, 0, 15, 0, 0, 34, 5, 0, 13, 18, 50, 77, 170, 169, 0, 45, 46, 47, 10, 129, 0, 126, 0, 121, 185, 94, 93, 92, 179, 180, 0, 145, 0, 0, 143, 154, 37, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 133, 134, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 181, 182, 0, 167, 0, 0, 86, 87, 0, 0, 114, 119, 0, 0, 0, 0, 173, 94, 0, 172, 123, 124, 80, 81, 84, 85, 91, 0, 78, 79, 0, 0, 0, 4, 16, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 82, 83, 44, 39, 185, 178, 0, 185, 178, 0, 0, 0, 0, 0, 0, 0, 38, 29, 0, 30, 0, 25, 0, 26, 0, 0, 0, 36, 0, 18, 135, 0, 0, 0, 0, 0, 0, 157, 158, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 174, 175, 176, 0, 184, 0, 90, 6, 0, 3, 21, 22, 19, 20, 49, 66, 67, 0, 62, 0, 63, 52, 0, 71, 73, 72, 0, 70, 0, 69, 0, 68, 0, 64, 0, 65, 75, 76, 0, 61, 8, 130, 0, 0, 0, 0, 127, 112, 0, 117, 0, 146, 0, 144, 0, 0, 0, 0, 151, 0, 153, 0, 37, 0, 132, 0, 0, 0, 0, 0, 159, 0, 0, 0, 0, 0, 166, 0, 0, 89, 0, 113, 0, 118, 0, 99, 96, 103, 102, 0, 183, 0, 0, 54, 55, 0, 60, 59, 58, 56, 57, 53, 48, 131, 51, 0, 110, 115, 0, 27, 28, 23, 24, 150, 0, 0, 0, 32, 137, 0, 0, 0, 0, 160, 161, 0, 0, 0, 0, 0, 152, 104, 111, 116, 101, 0, 0, 74, 0, 142, 149, 31, 0, 138, 0, 139, 0, 162, 163, 0, 0, 168, 100, 7, 128, 0, 140, 0, 164, 0, 0, 0, 165, 33, 141, 0, 0, 0 }; static const short yydefgoto[] = { 412, 1, 76, 167, 77, 89, 2, 7, 218, 79, 8, 219, 206, 9, 10, 11, 12, 13, 290, 80, 292, 81, 82, 83, 197, 102, 137, 253, 84 }; static const short yypact[] = {-32768, -32768, 131, -19, 13, 64, 66,-32768,-32768, 434,-32768, -32768,-32768,-32768,-32768, -5, 72, 112, 42,-32768,-32768, -32768, 37, 41, 130, 783, 33, 85, 56, 2410, 8, 9, 20, 26, 96, 104, -29, 36, 108, 133, 137, 139, 140, 152, 157, 160, 161, 162, 164, 168, 38, 172, 174, 2495, 175, 91, 122, 7,-32768, 14,-32768, -32768,-32768,-32768,-32768,-32768, 870, 957, 2410, 2410, 2410, 2410, 1043,-32768, 2410, 2410,-32768, 117, 120,-32768, 166, 2801, -32,-32768,-32768, 149,-32768,-32768,-32768,-32768,-32768, 2580,-32768, 2665,-32768, 176, 6,-32768, 304,-32768,-32768, 61,-32768, 61, 61,-32768,-32768, 2410, 112, 2410, 112, 2410, 112, 2410, 112, 2410, 2410, 180, 519,-32768,-32768, 1129, 2665, 2665, 2665, 2665, 2665, 219, 1215, 2410, 2410, 2410, 2410, 2410,-32768,-32768, 19,-32768, 19, 2410,-32768, 304, 2410, 235, 181, 184, 2410, 2410, 2410, 2410, 2410, 695, 2410, 187,-32768, 304, -32, -32, 0, 0, 182, 15, -32, -32, 112, 185, 112,-32768,-32768, 2410, 2410, 2410, 2410, 2410, 2410, 2410, 1730, 1815, 2410, 2410, 2410, 2410, 2410, 1900, 1985, 2070, 2155, 2240, 2410, 2410, 2325, -32768,-32768,-32768, 34, 16, 2801, 207, 17, 2693, 269, 1301, 1387, 270, 211, 273, 276, 187,-32768, 18,-32768, 22,-32768, 23,-32768, 348, 15, 2410,-32768, 194, 55, -32768, 278, 207, 227, 227, 230, 237,-32768,-32768, 24, 2729, 2693, 2693, 2693, 2693, 295, 227, 2729, 15, 2410, 1473, 1559, 82, -33, 113, -24, 187, 187, 187, 2410, -32768, 1645, 216,-32768, 2410,-32768, 187, 187, 187, 187, 2801, 2813, 2741, 2410, 158, 2410, 123, 2801, 2765, 2852, 2888, 266, 2410, 326, 2410, 326, 2410, 2777, 2410, 138, 2410, 138, 223, 223, 2410, 223,-32768,-32768, 2410, 303, 2410, 227,-32768,-32768, 15,-32768, 15,-32768, 2410,-32768, 112, 112, 112, 112,-32768, 49,-32768, 15, 2410, 112, -32768, 305, 207, 227, 2665, 2665,-32768, 306, 50, 207, 227, 227,-32768, 207, 307,-32768, 153,-32768, 15,-32768, 15,-32768,-32768,-32768,-32768, 115,-32768, 2410, 60, 2801, 2801, 2410, 2801, 2801, 2801, 2801, 2801, 2801, 187,-32768, 2801, 227,-32768,-32768, 15,-32768,-32768,-32768,-32768,-32768, 314, 112, 221,-32768,-32768, 316, 207, 317, 227,-32768, -32768, 318, 320, 207, 227, 322,-32768,-32768,-32768,-32768, -32768, 128, 112, 2837, 323,-32768,-32768,-32768, 608,-32768, 324,-32768, 227,-32768,-32768, 325, 207,-32768,-32768,-32768, -32768, 327,-32768, 207,-32768, 328, 112, 329,-32768,-32768, -32768, 330, 334,-32768 }; static const short yypgoto[] = {-32768, -32768, -107,-32768, -17,-32768, 246,-32768, 331,-32768,-32768, -44, 40,-32768,-32768,-32768,-32768,-32768, -176, 62, 63, -23, 215,-32768, -89, 29, -73, 28,-32768 }; #define YYLAST 2970 static const short yytable[] = { 87, 208, 98, 210, 200, 212, 106, 214, 97, 146, 146, 20, 20, 108, 110, 112, 114, 148, 15, 251, 288, -177, 302, 20, 134, 117, 303, 304, 317, 20, 141, 173, 222, 223, 224, 225, 226, 227, 99, 3, 173, 119, 90, 134, 155, 4, 92, 312, 14, 152, 154, 191, 192, 360, 371, 318, 118, 105, 333, 251, 85, 99, 325, 236, 383, 237, 99, 335, 196, 17, 199, 18, 169, 170, 171, 172, 135, 5, 16, 252, -177, -177, 173,-32768,-32768, 6, 173, 173, 173, 100, 120, 202, 215, 107, 109, 135, 147, 147, 196, 196, 196, 196, 196, 196, 149, 111, 231, 232, 233, 234, 235, 113, 100, 291, 289, 20, 238, 100, 101, 252, 287, 121, 91, 136, 173, 86, 93, 144, 153, 88, 203, -2, 204, 205, 161, 94, 3, 366, 164, 165, 166, 104, 4, 372, 373, 143, 173, 254, 376, 256, 261, 262, 263, 265, 267, 268, 269, 270, 271, 272, 274, 276, 278, 280, 282, 283, 284, 286, 332, 207, 103, 209, 176, 211, 5, 213, 145, 173, 216, 173, 220, 115, 6, 169, 170, 171, 172, 176, 177, 116, 230, 391, 173, 122, 356, 357, 358, 359, 396, 334, 188, 189, 193, 364, 239, 190, 381, 168, 243, 244, 245, 246, 247, 248, 249, 188, 189, 173, 123, 399, 190, 406, 124, 228, 125, 126, 368, 369, 408, 261, 173, 257, 258, 259, 260, 188, 189, 127, 240, 378, 190, 340, 128, 341, 307, 129, 130, 131, 310, 132, 343, 173, 344, 133, 345, 388, 346, 138, 347, 139, 142, 201, 348, 295, 297, 217, 241, 326, 351, 242, 255, 289, 250, 293, 298, 299, 400, 300, 306, 308, 301, 309, 311, 156, 157, 158, 159, 313, 314, 162, 163, 291, 196, 196, 315, 319, 320, 321, 322, 323, 324, 316, 327, 329, 331, 190, 338, 350, 389, 365, 370, 377, 336, 174, 175, 176, 177, 339, 387, 384, 390, 392, 394, 353, 395, 354, 398, 401, 403, 405, 413, 407, 409, 411, 414, 194, 362, 183, 184, 185, 78, 186, 187, 188, 189, 402, 0, 0, 190, 363, 0, 349, 305, 176, 177, 352, 0, 379, 0, 380, 0, 355, 0, 0, 0, 0, 0, 0, 0, 361, 0, 207, 0, 174, 175, 176, 177, 367, 0, 186, 187, 188, 189, 386, 374, 375, 190, 0, 0, 0, 410, 0, 0, 0, 0, 174, 175, 176, 177, 185, 382, 186, 187, 188, 189, 0, 0, 0, 190, 0, 0, 0, 291, 178, 179, 385, 180, 181, 182, 183, 184, 185, 0, 186, 187, 188, 189, 0, 0, 0, 190, 0, 393, 0, 0, 19, 0, 20, 397, 21, 0, 22, 23, 24, 0, 0, 25, 26, 27, 28, 29, 30, 31, 32, 33, 0, 404, 0, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 0, 53, 54, 55, 0, 0, 0, 0, 0, 56, 0, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 67, 0, 0, 0, 0, 68, 69, 0, 0, 70, 71, 72, 19, 73, 74, 75, 21, 0, 22, 23, 24, 0, 0, 25, 26, 27, 28, 29, 0, 0, 0, 0, 0, 0, 0, 34, 35, 0, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 0, 53, 54, 55, 0, 0, 0, 0, 0, 56, 0, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 67, 0, 0, 0, 0, 68, 69, 0, 0, 70, 71, 72, 0, -35, 74, 75, 19, 0, 0, -35, 21, 0, 22, 23, 24, 0, 0, 25, 26, 27, 28, 29, 0, 0, 0, 0, 0, 0, 0, 34, 35, 0, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 0, 53, 54, 55, 0, 0, 0, 0, 0, 56, 0, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 67, 0, 0, 0, 0, 68, 69, 0, 0, 70, 71, 72, 0, 0, 74, 75, 146, 0, 21, 0, 22, 23, 24, 0, 0, 25, 26, 27, 28, 29, 0, 0, 0, 0, 0, 0, 0, 34, 35, 0, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 0, 53, 54, 55, 0, 0, 0, 0, 0, 56, 0, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 67, 0, 0, 0, 0, 68, 69, 0, 0, 0, 0, 72, 0, 0, 74, 75, 147, 20, 0, 95, 0, 22, 23, 24, 0, 0, 25, 26, 27, 28, 29, 0, 0, 0, 0, 0, 0, 0, 34, 35, 0, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 0, 53, 54, 55, 0, 0, 0, 0, 0, 56, 0, 96, 58, 59, 60, 61, 62, 63, 64, 65, 66, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 67, 0, 0, 0, 0, 68, 69, 0, 0, 70, 71, 72, 0, 0, 74, 75, 20, 0, 150, 0, 22, 23, 24, 0, 0, 25, 26, 27, 28, 29, 0, 0, 0, 0, 0, 0, 0, 34, 35, 0, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 0, 53, 54, 55, 0, 0, 0, 0, 0, 56, 0, 151, 58, 59, 60, 61, 62, 63, 64, 65, 66, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 67, 0, 0, 0, 0, 68, 69, 0, 0, 70, 71, 72, 0, 0, 74, 75, 20, 0, 21, 0, 22, 23, 24, 0, 0, 25, 26, 27, 28, 29, 0, 0, 0, 0, 0, 0, 0, 34, 35, 0, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 0, 53, 54, 55, 0, 0, 0, 0, 0, 56, 0, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 67, 0, 0, 0, 0, 68, 69, 0, 0, 70, 71, 72, 0, 0, 74, 75, 160, 21, 0, 22, 23, 24, 0, 0, 25, 26, 27, 28, 29, 0, 0, 0, 0, 0, 0, 0, 34, 35, 0, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 0, 53, 54, 55, 0, 0, 0, 0, 0, 56, 0, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 67, 0, 0, 0, 0, 68, 69, 0, 0, 70, 71, 72, 0, 0, 74, 75, 221, 198, 0, 22, 23, 24, 0, 0, 25, 26, 27, 28, 29, 0, 0, 0, 0, 0, 0, 0, 34, 35, 0, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 0, 53, 54, 55, 0, 0, 0, 0, 0, 56, 0, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 67, 0, 0, 0, 0, 68, 69, 0, 0, 70, 71, 72, 0, 0, 74, 75, 229, 21, 0, 22, 23, 24, 0, 0, 25, 26, 27, 28, 29, 0, 0, 0, 0, 0, 0, 0, 34, 35, 0, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 0, 53, 54, 55, 0, 0, 0, 0, 0, 56, 0, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 67, 0, 0, 0, 0, 68, 69, 0, 0, 70, 71, 72, 0, 0, 74, 75, 294, 21, 0, 22, 23, 24, 0, 0, 25, 26, 27, 28, 29, 0, 0, 0, 0, 0, 0, 0, 34, 35, 0, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 0, 53, 54, 55, 0, 0, 0, 0, 0, 56, 0, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 67, 0, 0, 0, 0, 68, 69, 0, 0, 70, 71, 72, 0, 0, 74, 75, 296, 21, 0, 22, 23, 24, 0, 0, 25, 26, 27, 28, 29, 0, 0, 0, 0, 0, 0, 0, 34, 35, 0, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 0, 53, 54, 55, 0, 0, 0, 0, 0, 56, 0, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 67, 0, 0, 0, 0, 68, 69, 0, 0, 70, 71, 72, 0, 0, 74, 75, 328, 21, 0, 22, 23, 24, 0, 0, 25, 26, 27, 28, 29, 0, 0, 0, 0, 0, 0, 0, 34, 35, 0, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 0, 53, 54, 55, 0, 0, 0, 0, 0, 56, 0, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 67, 0, 0, 0, 0, 68, 69, 0, 0, 70, 71, 72, 0, 0, 74, 75, 330, 21, 0, 22, 23, 24, 0, 0, 25, 26, 27, 28, 29, 0, 0, 0, 0, 0, 0, 0, 34, 35, 0, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 0, 53, 54, 55, 0, 0, 0, 0, 0, 56, 0, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 67, 0, 0, 0, 0, 68, 69, 0, 0, 70, 71, 72, 0, 0, 74, 75, 337, 21, 0, 22, 23, 24, 0, 0, 25, 26, 27, 28, 29, 0, 0, 0, 0, 0, 0, 0, 34, 35, 0, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 0, 53, 54, 55, 0, 0, 0, 0, 0, 56, 0, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 67, 0, 0, 0, 0, 68, 69, 0, 0, 70, 71, 72, 0, 0, 74, 75, 21, 0, 22, 23, 24, 0, 0, 25, 26, 27, 28, 29, 0, 0, 0, 0, 0, 0, 0, 34, 35, 0, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 0, 53, 54, 55, 0, 0, 0, 0, 0, 56, 0, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 0, 264, 0, 0, 0, 0, 0, 0, 0, 0, 67, 0, 0, 0, 0, 68, 69, 0, 0, 70, 71, 72, 0, 0, 74, 75, 21, 0, 22, 23, 24, 0, 0, 25, 26, 27, 28, 29, 0, 0, 0, 0, 0, 0, 0, 34, 35, 0, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 0, 53, 54, 55, 0, 0, 0, 0, 0, 56, 0, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 0, 266, 0, 0, 0, 0, 0, 0, 0, 0, 67, 0, 0, 0, 0, 68, 69, 0, 0, 70, 71, 72, 0, 0, 74, 75, 21, 0, 22, 23, 24, 0, 0, 25, 26, 27, 28, 29, 0, 0, 0, 0, 0, 0, 0, 34, 35, 0, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 0, 53, 54, 55, 0, 0, 0, 0, 0, 56, 0, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 0, 273, 0, 0, 0, 0, 0, 0, 0, 0, 67, 0, 0, 0, 0, 68, 69, 0, 0, 70, 71, 72, 0, 0, 74, 75, 21, 0, 22, 23, 24, 0, 0, 25, 26, 27, 28, 29, 0, 0, 0, 0, 0, 0, 0, 34, 35, 0, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 0, 53, 54, 55, 0, 0, 0, 0, 0, 56, 0, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 0, 275, 0, 0, 0, 0, 0, 0, 0, 0, 67, 0, 0, 0, 0, 68, 69, 0, 0, 70, 71, 72, 0, 0, 74, 75, 21, 0, 22, 23, 24, 0, 0, 25, 26, 27, 28, 29, 0, 0, 0, 0, 0, 0, 0, 34, 35, 0, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 0, 53, 54, 55, 0, 0, 0, 0, 0, 56, 0, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 0, 277, 0, 0, 0, 0, 0, 0, 0, 0, 67, 0, 0, 0, 0, 68, 69, 0, 0, 70, 71, 72, 0, 0, 74, 75, 21, 0, 22, 23, 24, 0, 0, 25, 26, 27, 28, 29, 0, 0, 0, 0, 0, 0, 0, 34, 35, 0, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 0, 53, 54, 55, 0, 0, 0, 0, 0, 56, 0, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 0, 279, 0, 0, 0, 0, 0, 0, 0, 0, 67, 0, 0, 0, 0, 68, 69, 0, 0, 70, 71, 72, 0, 0, 74, 75, 21, 0, 22, 23, 24, 0, 0, 25, 26, 27, 28, 29, 0, 0, 0, 0, 0, 0, 0, 34, 35, 0, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 0, 53, 54, 55, 0, 0, 0, 0, 0, 56, 0, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 0, 281, 0, 0, 0, 0, 0, 0, 0, 0, 67, 0, 0, 0, 0, 68, 69, 0, 0, 70, 71, 72, 0, 0, 74, 75, 21, 0, 22, 23, 24, 0, 0, 25, 26, 27, 28, 29, 0, 0, 0, 0, 0, 0, 0, 34, 35, 0, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 0, 53, 54, 55, 0, 0, 0, 0, 0, 56, 0, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 0, 285, 0, 0, 0, 0, 0, 0, 0, 0, 67, 0, 0, 0, 0, 68, 69, 0, 0, 70, 71, 72, 0, 0, 74, 75, 21, 0, 22, 23, 24, 0, 0, 25, 26, 27, 28, 29, 0, 0, 0, 0, 0, 0, 0, 34, 35, 0, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 0, 53, 54, 55, 0, 0, 0, 0, 0, 56, 0, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 67, 0, 0, 0, 0, 68, 69, 0, 0, 70, 71, 72, 0, 0, 74, 75, 140, 0, 22, 23, 24, 0, 0, 25, 26, 27, 28, 29, 0, 0, 0, 0, 0, 0, 0, 34, 35, 0, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 0, 53, 54, 55, 0, 0, 0, 0, 0, 56, 0, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 67, 0, 0, 0, 0, 68, 69, 0, 0, 70, 71, 72, 0, 0, 74, 75, 195, 0, 22, 23, 24, 0, 0, 25, 26, 27, 28, 29, 0, 0, 0, 0, 0, 0, 0, 34, 35, 0, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 0, 53, 54, 55, 0, 0, 0, 0, 0, 56, 0, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 67, 0, 0, 0, 0, 68, 69, 0, 0, 70, 71, 72, 0, 0, 74, 75, 198, 0, 22, 23, 24, 0, 0, 25, 26, 27, 28, 29, 0, 0, 0, 0, 0, 0, 0, 34, 35, 0, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 0, 53, 54, 55, 0, 0, 0, 0, 0, 56, 0, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 67, 174, 175, 176, 177, 68, 69, 0, 0, 70, 71, 72, 0, 0, 74, 75, 0, 0, 291, 178, 179, 0, 180, 181, 182, 183, 184, 185, 0, 186, 187, 188, 189, 0, 0, 0, 190, 174, 175, 176, 177, 0, 0, 0, 0, 0, 0, 0, 0, 174,-32768, 176, 177, 0, 289, 178, 179, 0, 180, 181, 182, 183, 184, 185, 0, 186, 187, 188, 189, 0, 0, 0, 190, 174, 175, 176, 177, 186, 187, 188, 189, 0, 0, 0, 190, 174, 175, 176, 177, 0, 0, 178, 179, 342, 180, 181, 182, 183, 184, 185, 0, 186, 187, 188, 189, 0, 0, 0, 190, 174, 175, 176, 177, 186, 187, 188, 189, 0, 0, 0, 190,-32768, 0, 176, 177, 0, 0, 178, 179, 0, 180, 181, 182, 183, 184, 185, 0, 186, 187, 188, 189, 0, 0, 0, 190, 174, 175, 176, 177, 186, 187, 188, 189, 0, 0, 0, 190, 0, 0, 0, 174, 175, 176, 177, 179, 0, 180, 181, 182, 183, 184, 185, 0, 186, 187, 188, 189, 0, 0, 0, 190,-32768, 181, 182, 183, 184, 185, 0, 186, 187, 188, 189, 0, 0, 0, 190, 174, 175, 176, 177, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 182, 183, 184, 185, 0, 186, 187, 188, 189, 0, 0, 0, 190 }; static const short yycheck[] = { 17, 108, 25, 110, 93, 112, 29, 114, 25, 3, 3, 3, 3, 30, 31, 32, 33, 3, 5, 4, 4, 4, 4, 3, 5, 54, 4, 4, 4, 3, 53, 64, 121, 122, 123, 124, 125, 126, 5, 5, 64, 5, 5, 5, 67, 11, 5, 223, 67, 66, 67, 83, 84, 4, 4, 231, 85, 28, 91, 4, 65, 5, 238, 136, 4, 138, 5, 91, 91, 5, 93, 5, 17, 18, 19, 20, 57, 43, 65, 64, 64, 64, 64, 83, 84, 51, 64, 64, 64, 56, 54, 85, 115, 85, 85, 57, 90, 90, 121, 122, 123, 124, 125, 126, 90, 85, 129, 130, 131, 132, 133, 85, 56, 64, 64, 3, 139, 56, 85, 64, 86, 85, 85, 85, 64, 53, 85, 5, 66, 87, 101, 0, 103, 104, 72, 5, 5, 313, 21, 22, 23, 85, 11, 319, 320, 54, 64, 164, 324, 166, 173, 174, 175, 176, 177, 178, 179, 180, 181, 182, 183, 184, 185, 186, 187, 188, 189, 190, 86, 107, 85, 109, 49, 111, 43, 113, 54, 64, 116, 64, 118, 85, 51, 17, 18, 19, 20, 49, 50, 85, 128, 367, 64, 85, 301, 302, 303, 304, 374, 86, 77, 78, 53, 310, 142, 82, 91, 87, 146, 147, 148, 149, 150, 151, 152, 77, 78, 64, 85, 91, 82, 397, 85, 4, 85, 85, 315, 316, 404, 252, 64, 169, 170, 171, 172, 77, 78, 85, 3, 86, 82, 264, 85, 266, 216, 85, 85, 85, 220, 85, 273, 64, 275, 85, 277, 362, 279, 85, 281, 85, 85, 85, 285, 201, 202, 85, 85, 239, 291, 85, 85, 64, 90, 4, 4, 64, 383, 4, 215, 217, 4, 87, 4, 68, 69, 70, 71, 224, 225, 74, 75, 64, 315, 316, 64, 232, 233, 234, 235, 4, 237, 64, 240, 241, 242, 82, 90, 4, 87, 4, 4, 4, 250, 47, 48, 49, 50, 255, 4, 342, 4, 4, 4, 295, 4, 297, 4, 4, 4, 4, 0, 4, 4, 4, 0, 89, 308, 71, 72, 73, 9, 75, 76, 77, 78, 389, -1, -1, 82, 309, -1, 289, 4, 49, 50, 292, -1, 329, -1, 331, -1, 299, -1, -1, -1, -1, -1, -1, -1, 306, -1, 309, -1, 47, 48, 49, 50, 314, -1, 75, 76, 77, 78, 355, 321, 322, 82, -1, -1, -1, 407, -1, -1, -1, -1, 47, 48, 49, 50, 73, 338, 75, 76, 77, 78, -1, -1, -1, 82, -1, -1, -1, 64, 65, 66, 352, 68, 69, 70, 71, 72, 73, -1, 75, 76, 77, 78, -1, -1, -1, 82, -1, 369, -1, -1, 1, -1, 3, 375, 5, -1, 7, 8, 9, -1, -1, 12, 13, 14, 15, 16, 17, 18, 19, 20, -1, 393, -1, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, -1, 44, 45, 46, -1, -1, -1, -1, -1, 52, -1, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 74, -1, -1, -1, -1, 79, 80, -1, -1, 83, 84, 85, 1, 87, 88, 89, 5, -1, 7, 8, 9, -1, -1, 12, 13, 14, 15, 16, -1, -1, -1, -1, -1, -1, -1, 24, 25, -1, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, -1, 44, 45, 46, -1, -1, -1, -1, -1, 52, -1, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 74, -1, -1, -1, -1, 79, 80, -1, -1, 83, 84, 85, -1, 87, 88, 89, 1, -1, -1, 4, 5, -1, 7, 8, 9, -1, -1, 12, 13, 14, 15, 16, -1, -1, -1, -1, -1, -1, -1, 24, 25, -1, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, -1, 44, 45, 46, -1, -1, -1, -1, -1, 52, -1, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 74, -1, -1, -1, -1, 79, 80, -1, -1, 83, 84, 85, -1, -1, 88, 89, 3, -1, 5, -1, 7, 8, 9, -1, -1, 12, 13, 14, 15, 16, -1, -1, -1, -1, -1, -1, -1, 24, 25, -1, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, -1, 44, 45, 46, -1, -1, -1, -1, -1, 52, -1, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 74, -1, -1, -1, -1, 79, 80, -1, -1, -1, -1, 85, -1, -1, 88, 89, 90, 3, -1, 5, -1, 7, 8, 9, -1, -1, 12, 13, 14, 15, 16, -1, -1, -1, -1, -1, -1, -1, 24, 25, -1, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, -1, 44, 45, 46, -1, -1, -1, -1, -1, 52, -1, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 74, -1, -1, -1, -1, 79, 80, -1, -1, 83, 84, 85, -1, -1, 88, 89, 3, -1, 5, -1, 7, 8, 9, -1, -1, 12, 13, 14, 15, 16, -1, -1, -1, -1, -1, -1, -1, 24, 25, -1, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, -1, 44, 45, 46, -1, -1, -1, -1, -1, 52, -1, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 74, -1, -1, -1, -1, 79, 80, -1, -1, 83, 84, 85, -1, -1, 88, 89, 3, -1, 5, -1, 7, 8, 9, -1, -1, 12, 13, 14, 15, 16, -1, -1, -1, -1, -1, -1, -1, 24, 25, -1, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, -1, 44, 45, 46, -1, -1, -1, -1, -1, 52, -1, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 74, -1, -1, -1, -1, 79, 80, -1, -1, 83, 84, 85, -1, -1, 88, 89, 4, 5, -1, 7, 8, 9, -1, -1, 12, 13, 14, 15, 16, -1, -1, -1, -1, -1, -1, -1, 24, 25, -1, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, -1, 44, 45, 46, -1, -1, -1, -1, -1, 52, -1, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 74, -1, -1, -1, -1, 79, 80, -1, -1, 83, 84, 85, -1, -1, 88, 89, 4, 5, -1, 7, 8, 9, -1, -1, 12, 13, 14, 15, 16, -1, -1, -1, -1, -1, -1, -1, 24, 25, -1, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, -1, 44, 45, 46, -1, -1, -1, -1, -1, 52, -1, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 74, -1, -1, -1, -1, 79, 80, -1, -1, 83, 84, 85, -1, -1, 88, 89, 4, 5, -1, 7, 8, 9, -1, -1, 12, 13, 14, 15, 16, -1, -1, -1, -1, -1, -1, -1, 24, 25, -1, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, -1, 44, 45, 46, -1, -1, -1, -1, -1, 52, -1, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 74, -1, -1, -1, -1, 79, 80, -1, -1, 83, 84, 85, -1, -1, 88, 89, 4, 5, -1, 7, 8, 9, -1, -1, 12, 13, 14, 15, 16, -1, -1, -1, -1, -1, -1, -1, 24, 25, -1, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, -1, 44, 45, 46, -1, -1, -1, -1, -1, 52, -1, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 74, -1, -1, -1, -1, 79, 80, -1, -1, 83, 84, 85, -1, -1, 88, 89, 4, 5, -1, 7, 8, 9, -1, -1, 12, 13, 14, 15, 16, -1, -1, -1, -1, -1, -1, -1, 24, 25, -1, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, -1, 44, 45, 46, -1, -1, -1, -1, -1, 52, -1, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 74, -1, -1, -1, -1, 79, 80, -1, -1, 83, 84, 85, -1, -1, 88, 89, 4, 5, -1, 7, 8, 9, -1, -1, 12, 13, 14, 15, 16, -1, -1, -1, -1, -1, -1, -1, 24, 25, -1, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, -1, 44, 45, 46, -1, -1, -1, -1, -1, 52, -1, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 74, -1, -1, -1, -1, 79, 80, -1, -1, 83, 84, 85, -1, -1, 88, 89, 4, 5, -1, 7, 8, 9, -1, -1, 12, 13, 14, 15, 16, -1, -1, -1, -1, -1, -1, -1, 24, 25, -1, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, -1, 44, 45, 46, -1, -1, -1, -1, -1, 52, -1, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 74, -1, -1, -1, -1, 79, 80, -1, -1, 83, 84, 85, -1, -1, 88, 89, 4, 5, -1, 7, 8, 9, -1, -1, 12, 13, 14, 15, 16, -1, -1, -1, -1, -1, -1, -1, 24, 25, -1, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, -1, 44, 45, 46, -1, -1, -1, -1, -1, 52, -1, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 74, -1, -1, -1, -1, 79, 80, -1, -1, 83, 84, 85, -1, -1, 88, 89, 5, -1, 7, 8, 9, -1, -1, 12, 13, 14, 15, 16, -1, -1, -1, -1, -1, -1, -1, 24, 25, -1, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, -1, 44, 45, 46, -1, -1, -1, -1, -1, 52, -1, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, -1, 65, -1, -1, -1, -1, -1, -1, -1, -1, 74, -1, -1, -1, -1, 79, 80, -1, -1, 83, 84, 85, -1, -1, 88, 89, 5, -1, 7, 8, 9, -1, -1, 12, 13, 14, 15, 16, -1, -1, -1, -1, -1, -1, -1, 24, 25, -1, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, -1, 44, 45, 46, -1, -1, -1, -1, -1, 52, -1, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, -1, 65, -1, -1, -1, -1, -1, -1, -1, -1, 74, -1, -1, -1, -1, 79, 80, -1, -1, 83, 84, 85, -1, -1, 88, 89, 5, -1, 7, 8, 9, -1, -1, 12, 13, 14, 15, 16, -1, -1, -1, -1, -1, -1, -1, 24, 25, -1, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, -1, 44, 45, 46, -1, -1, -1, -1, -1, 52, -1, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, -1, 65, -1, -1, -1, -1, -1, -1, -1, -1, 74, -1, -1, -1, -1, 79, 80, -1, -1, 83, 84, 85, -1, -1, 88, 89, 5, -1, 7, 8, 9, -1, -1, 12, 13, 14, 15, 16, -1, -1, -1, -1, -1, -1, -1, 24, 25, -1, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, -1, 44, 45, 46, -1, -1, -1, -1, -1, 52, -1, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, -1, 65, -1, -1, -1, -1, -1, -1, -1, -1, 74, -1, -1, -1, -1, 79, 80, -1, -1, 83, 84, 85, -1, -1, 88, 89, 5, -1, 7, 8, 9, -1, -1, 12, 13, 14, 15, 16, -1, -1, -1, -1, -1, -1, -1, 24, 25, -1, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, -1, 44, 45, 46, -1, -1, -1, -1, -1, 52, -1, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, -1, 65, -1, -1, -1, -1, -1, -1, -1, -1, 74, -1, -1, -1, -1, 79, 80, -1, -1, 83, 84, 85, -1, -1, 88, 89, 5, -1, 7, 8, 9, -1, -1, 12, 13, 14, 15, 16, -1, -1, -1, -1, -1, -1, -1, 24, 25, -1, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, -1, 44, 45, 46, -1, -1, -1, -1, -1, 52, -1, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, -1, 65, -1, -1, -1, -1, -1, -1, -1, -1, 74, -1, -1, -1, -1, 79, 80, -1, -1, 83, 84, 85, -1, -1, 88, 89, 5, -1, 7, 8, 9, -1, -1, 12, 13, 14, 15, 16, -1, -1, -1, -1, -1, -1, -1, 24, 25, -1, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, -1, 44, 45, 46, -1, -1, -1, -1, -1, 52, -1, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, -1, 65, -1, -1, -1, -1, -1, -1, -1, -1, 74, -1, -1, -1, -1, 79, 80, -1, -1, 83, 84, 85, -1, -1, 88, 89, 5, -1, 7, 8, 9, -1, -1, 12, 13, 14, 15, 16, -1, -1, -1, -1, -1, -1, -1, 24, 25, -1, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, -1, 44, 45, 46, -1, -1, -1, -1, -1, 52, -1, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, -1, 65, -1, -1, -1, -1, -1, -1, -1, -1, 74, -1, -1, -1, -1, 79, 80, -1, -1, 83, 84, 85, -1, -1, 88, 89, 5, -1, 7, 8, 9, -1, -1, 12, 13, 14, 15, 16, -1, -1, -1, -1, -1, -1, -1, 24, 25, -1, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, -1, 44, 45, 46, -1, -1, -1, -1, -1, 52, -1, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 74, -1, -1, -1, -1, 79, 80, -1, -1, 83, 84, 85, -1, -1, 88, 89, 5, -1, 7, 8, 9, -1, -1, 12, 13, 14, 15, 16, -1, -1, -1, -1, -1, -1, -1, 24, 25, -1, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, -1, 44, 45, 46, -1, -1, -1, -1, -1, 52, -1, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 74, -1, -1, -1, -1, 79, 80, -1, -1, 83, 84, 85, -1, -1, 88, 89, 5, -1, 7, 8, 9, -1, -1, 12, 13, 14, 15, 16, -1, -1, -1, -1, -1, -1, -1, 24, 25, -1, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, -1, 44, 45, 46, -1, -1, -1, -1, -1, 52, -1, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 74, -1, -1, -1, -1, 79, 80, -1, -1, 83, 84, 85, -1, -1, 88, 89, 5, -1, 7, 8, 9, -1, -1, 12, 13, 14, 15, 16, -1, -1, -1, -1, -1, -1, -1, 24, 25, -1, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, -1, 44, 45, 46, -1, -1, -1, -1, -1, 52, -1, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 74, 47, 48, 49, 50, 79, 80, -1, -1, 83, 84, 85, -1, -1, 88, 89, -1, -1, 64, 65, 66, -1, 68, 69, 70, 71, 72, 73, -1, 75, 76, 77, 78, -1, -1, -1, 82, 47, 48, 49, 50, -1, -1, -1, -1, -1, -1, -1, -1, 47, 48, 49, 50, -1, 64, 65, 66, -1, 68, 69, 70, 71, 72, 73, -1, 75, 76, 77, 78, -1, -1, -1, 82, 47, 48, 49, 50, 75, 76, 77, 78, -1, -1, -1, 82, 47, 48, 49, 50, -1, -1, 65, 66, 67, 68, 69, 70, 71, 72, 73, -1, 75, 76, 77, 78, -1, -1, -1, 82, 47, 48, 49, 50, 75, 76, 77, 78, -1, -1, -1, 82, 47, -1, 49, 50, -1, -1, 65, 66, -1, 68, 69, 70, 71, 72, 73, -1, 75, 76, 77, 78, -1, -1, -1, 82, 47, 48, 49, 50, 75, 76, 77, 78, -1, -1, -1, 82, -1, -1, -1, 47, 48, 49, 50, 66, -1, 68, 69, 70, 71, 72, 73, -1, 75, 76, 77, 78, -1, -1, -1, 82, 68, 69, 70, 71, 72, 73, -1, 75, 76, 77, 78, -1, -1, -1, 82, 47, 48, 49, 50, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 70, 71, 72, 73, -1, 75, 76, 77, 78, -1, -1, -1, 82 }; /* -*-C-*- Note some compilers choke on comments on `#line' lines. */ #line 3 "/usr/local/lib/bison.simple" /* Skeleton output parser for bison, Copyright (C) 1984, 1989, 1990 Bob Corbett and Richard Stallman This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 1, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program; if not, write to the Free Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */ #ifndef alloca #ifdef __GNUC__ #define alloca __builtin_alloca #else /* Not GNU C. */ #if (!defined (__STDC__) && defined (sparc)) || defined (__sparc__) #include <alloca.h> #else /* Not sparc */ #ifdef MSDOS #include <malloc.h> #endif /* MSDOS */ #endif /* Not sparc. */ #endif /* Not GNU C. */ #endif /* alloca not defined. */ /* This is the parser code that is written into each bison parser when the %semantic_parser declaration is not specified in the grammar. It was written by Richard Stallman by simplifying the hairy parser used when %semantic_parser is specified. */ /* Note: there must be only one dollar sign in this file. It is replaced by the list of actions, each action as one case of the switch. */ #define yyerrok (yyerrstatus = 0) #define yyclearin (yychar = YYEMPTY) #define YYEMPTY -2 #define YYEOF 0 #define YYACCEPT return(0) #define YYABORT return(1) #define YYERROR goto yyerrlab1 /* Like YYERROR except do call yyerror. This remains here temporarily to ease the transition to the new meaning of YYERROR, for GCC. Once GCC version 2 has supplanted version 1, this can go. */ #define YYFAIL goto yyerrlab #define YYRECOVERING() (!!yyerrstatus) #define YYBACKUP(token, value) \ do \ if (yychar == YYEMPTY && yylen == 1) \ { yychar = (token), yylval = (value); \ yychar1 = YYTRANSLATE (yychar); \ YYPOPSTACK; \ goto yybackup; \ } \ else \ { yyerror ("syntax error: cannot back up"); YYERROR; } \ while (0) #define YYTERROR 1 #define YYERRCODE 256 #ifndef YYPURE #define YYLEX yylex() #endif #ifdef YYPURE #ifdef YYLSP_NEEDED #define YYLEX yylex(&yylval, &yylloc) #else #define YYLEX yylex(&yylval) #endif #endif /* If nonreentrant, generate the variables here */ #ifndef YYPURE int yychar; /* the lookahead symbol */ YYSTYPE yylval; /* the semantic value of the */ /* lookahead symbol */ #ifdef YYLSP_NEEDED YYLTYPE yylloc; /* location data for the lookahead */ /* symbol */ #endif int yynerrs; /* number of parse errors so far */ #endif /* not YYPURE */ #if YYDEBUG != 0 int yydebug; /* nonzero means print parse trace */ /* Since this is uninitialized, it does not stop multiple parsers from coexisting. */ #endif /* YYINITDEPTH indicates the initial size of the parser's stacks */ #ifndef YYINITDEPTH #define YYINITDEPTH 200 #endif /* YYMAXDEPTH is the maximum size the stacks can grow to (effective only if the built-in stack extension method is used). */ #if YYMAXDEPTH == 0 #undef YYMAXDEPTH #endif #ifndef YYMAXDEPTH #define YYMAXDEPTH 10000 #endif #ifndef __cplusplus /* This is the most reliable way to avoid incompatibilities in available built-in functions on various systems. */ static void __yy_bcopy (from, to, count) char *from; char *to; int count; { register char *f = from; register char *t = to; register int i = count; while (i-- > 0) *t++ = *f++; } #else /* __cplusplus */ /* This is the most reliable way to avoid incompatibilities in available built-in functions on various systems. */ static void __yy_bcopy (char *from, char *to, int count) { register char *f = from; register char *t = to; register int i = count; while (i-- > 0) *t++ = *f++; } #endif #line 160 "/usr/local/lib/bison.simple" int yyparse() { register int yystate; register int yyn; register short *yyssp; register YYSTYPE *yyvsp; int yyerrstatus; /* number of tokens to shift before error messages enabled */ int yychar1; /* lookahead token as an internal (translated) token number */ short yyssa[YYINITDEPTH]; /* the state stack */ YYSTYPE yyvsa[YYINITDEPTH]; /* the semantic value stack */ short *yyss = yyssa; /* refer to the stacks thru separate pointers */ YYSTYPE *yyvs = yyvsa; /* to allow yyoverflow to reallocate them elsewhere */ #ifdef YYLSP_NEEDED YYLTYPE *yyls = yylsa; YYLTYPE *yylsp; YYLTYPE yylsa[YYINITDEPTH]; /* the location stack */ #define YYPOPSTACK (yyvsp--, yysp--, yylsp--) #else #define YYPOPSTACK (yyvsp--, yysp--) #endif int yystacksize = YYINITDEPTH; #ifdef YYPURE int yychar; YYSTYPE yylval; int yynerrs; #ifdef YYLSP_NEEDED YYLTYPE yylloc; #endif #endif YYSTYPE yyval; /* the variable used to return */ /* semantic values from the action */ /* routines */ int yylen; #if YYDEBUG != 0 if (yydebug) fprintf(stderr, "Starting parse\n"); #endif yystate = 0; yyerrstatus = 0; yynerrs = 0; yychar = YYEMPTY; /* Cause a token to be read. */ /* Initialize stack pointers. Waste one element of value and location stack so that they stay on the same level as the state stack. */ yyssp = yyss - 1; yyvsp = yyvs; #ifdef YYLSP_NEEDED yylsp = yyls; #endif /* Push a new state, which is found in yystate . */ /* In all cases, when you get here, the value and location stacks have just been pushed. so pushing a state here evens the stacks. */ yynewstate: *++yyssp = yystate; if (yyssp >= yyss + yystacksize - 1) { /* Give user a chance to reallocate the stack */ /* Use copies of these so that the &'s don't force the real ones into memory. */ YYSTYPE *yyvs1 = yyvs; short *yyss1 = yyss; #ifdef YYLSP_NEEDED YYLTYPE *yyls1 = yyls; #endif /* Get the current used size of the three stacks, in elements. */ int size = yyssp - yyss + 1; #ifdef yyoverflow /* Each stack pointer address is followed by the size of the data in use in that stack, in bytes. */ yyoverflow("parser stack overflow", &yyss1, size * sizeof (*yyssp), &yyvs1, size * sizeof (*yyvsp), #ifdef YYLSP_NEEDED &yyls1, size * sizeof (*yylsp), #endif &yystacksize); yyss = yyss1; yyvs = yyvs1; #ifdef YYLSP_NEEDED yyls = yyls1; #endif #else /* no yyoverflow */ /* Extend the stack our own way. */ if (yystacksize >= YYMAXDEPTH) { yyerror("parser stack overflow"); return 2; } yystacksize *= 2; if (yystacksize > YYMAXDEPTH) yystacksize = YYMAXDEPTH; yyss = (short *) alloca (yystacksize * sizeof (*yyssp)); __yy_bcopy ((char *)yyss1, (char *)yyss, size * sizeof (*yyssp)); yyvs = (YYSTYPE *) alloca (yystacksize * sizeof (*yyvsp)); __yy_bcopy ((char *)yyvs1, (char *)yyvs, size * sizeof (*yyvsp)); #ifdef YYLSP_NEEDED yyls = (YYLTYPE *) alloca (yystacksize * sizeof (*yylsp)); __yy_bcopy ((char *)yyls1, (char *)yyls, size * sizeof (*yylsp)); #endif #endif /* no yyoverflow */ yyssp = yyss + size - 1; yyvsp = yyvs + size - 1; #ifdef YYLSP_NEEDED yylsp = yyls + size - 1; #endif #if YYDEBUG != 0 if (yydebug) fprintf(stderr, "Stack size increased to %d\n", yystacksize); #endif if (yyssp >= yyss + yystacksize - 1) YYABORT; } #if YYDEBUG != 0 if (yydebug) fprintf(stderr, "Entering state %d\n", yystate); #endif yybackup: /* Do appropriate processing given the current state. */ /* Read a lookahead token if we need one and don't already have one. */ /* yyresume: */ /* First try to decide what to do without reference to lookahead token. */ yyn = yypact[yystate]; if (yyn == YYFLAG) goto yydefault; /* Not known => get a lookahead token if don't already have one. */ /* yychar is either YYEMPTY or YYEOF or a valid token in external form. */ if (yychar == YYEMPTY) { #if YYDEBUG != 0 if (yydebug) fprintf(stderr, "Reading a token: "); #endif yychar = YYLEX; } /* Convert token to internal form (in yychar1) for indexing tables with */ if (yychar <= 0) /* This means end of input. */ { yychar1 = 0; yychar = YYEOF; /* Don't call YYLEX any more */ #if YYDEBUG != 0 if (yydebug) fprintf(stderr, "Now at end of input.\n"); #endif } else { yychar1 = YYTRANSLATE(yychar); #if YYDEBUG != 0 if (yydebug) fprintf(stderr, "Next token is %d (%s)\n", yychar, yytname[yychar1]); #endif } yyn += yychar1; if (yyn < 0 || yyn > YYLAST || yycheck[yyn] != yychar1) goto yydefault; yyn = yytable[yyn]; /* yyn is what to do for this token type in this state. Negative => reduce, -yyn is rule number. Positive => shift, yyn is new state. New state is final state => don't bother to shift, just return success. 0, or most negative number => error. */ if (yyn < 0) { if (yyn == YYFLAG) goto yyerrlab; yyn = -yyn; goto yyreduce; } else if (yyn == 0) goto yyerrlab; if (yyn == YYFINAL) YYACCEPT; /* Shift the lookahead token. */ #if YYDEBUG != 0 if (yydebug) fprintf(stderr, "Shifting token %d (%s), ", yychar, yytname[yychar1]); #endif /* Discard the token being shifted unless it is eof. */ if (yychar != YYEOF) yychar = YYEMPTY; *++yyvsp = yylval; #ifdef YYLSP_NEEDED *++yylsp = yylloc; #endif /* count tokens shifted since error; after three, turn off error status. */ if (yyerrstatus) yyerrstatus--; yystate = yyn; goto yynewstate; /* Do the default action for the current state. */ yydefault: yyn = yydefact[yystate]; if (yyn == 0) goto yyerrlab; /* Do a reduction. yyn is the number of a rule to reduce with. */ yyreduce: yylen = yyr2[yyn]; yyval = yyvsp[1-yylen]; /* implement default value of the action */ #if YYDEBUG != 0 if (yydebug) { int i; fprintf (stderr, "Reducing via rule %d (line %d), ", yyn, yyrline[yyn]); /* Print the symboles being reduced, and their result. */ for (i = yyprhs[yyn]; yyrhs[i] > 0; i++) fprintf (stderr, "%s ", yytname[yyrhs[i]]); fprintf (stderr, " -> %s\n", yytname[yyr1[yyn]]); } #endif switch (yyn) { case 1: #line 95 "perly.y" { #if defined(YYDEBUG) && defined(DEBUGGING) yydebug = (debug & 1); #endif ; break;} case 2: #line 101 "perly.y" { if (in_eval) eval_root = block_head(yyvsp[0].cmdval); else main_root = block_head(yyvsp[0].cmdval); ; break;} case 3: #line 108 "perly.y" { yyval.compval.comp_true = yyvsp[-2].cmdval; yyval.compval.comp_alt = yyvsp[0].cmdval; ; break;} case 4: #line 110 "perly.y" { yyval.compval.comp_true = yyvsp[-1].cmdval; yyval.compval.comp_alt = yyvsp[0].cmdval; ; break;} case 5: #line 114 "perly.y" { yyval.cmdval = Nullcmd; ; break;} case 6: #line 116 "perly.y" { yyval.cmdval = yyvsp[0].cmdval; ; break;} case 7: #line 118 "perly.y" { cmdline = yyvsp[-4].ival; yyval.cmdval = make_ccmd(C_ELSIF,yyvsp[-2].arg,yyvsp[0].compval); ; break;} case 8: #line 123 "perly.y" { yyval.cmdval = block_head(yyvsp[-1].cmdval); if (cmdline > yyvsp[-3].ival) cmdline = yyvsp[-3].ival; if (savestack->ary_fill > yyvsp[-2].ival) restorelist(yyvsp[-2].ival); ; break;} case 9: #line 131 "perly.y" { yyval.ival = savestack->ary_fill; ; break;} case 10: #line 135 "perly.y" { yyval.cmdval = Nullcmd; ; break;} case 11: #line 137 "perly.y" { yyval.cmdval = append_line(yyvsp[-1].cmdval,yyvsp[0].cmdval); ; break;} case 12: #line 141 "perly.y" { yyval.cmdval = Nullcmd; ; break;} case 13: #line 143 "perly.y" { yyval.cmdval = add_label(yyvsp[-1].cval,yyvsp[0].cmdval); ; break;} case 15: #line 146 "perly.y" { if (yyvsp[-1].cval != Nullch) { yyval.cmdval = add_label(yyvsp[-1].cval, make_acmd(C_EXPR, Nullstab, Nullarg, Nullarg) ); } else { yyval.cmdval = Nullcmd; cmdline = NOLINE; } ; break;} case 16: #line 155 "perly.y" { yyval.cmdval = add_label(yyvsp[-2].cval,yyvsp[-1].cmdval); ; break;} case 17: #line 159 "perly.y" { yyval.cmdval = Nullcmd; ; break;} case 18: #line 161 "perly.y" { yyval.cmdval = make_acmd(C_EXPR, Nullstab, yyvsp[0].arg, Nullarg); ; break;} case 19: #line 163 "perly.y" { yyval.cmdval = addcond( make_acmd(C_EXPR, Nullstab, Nullarg, yyvsp[-2].arg), yyvsp[0].arg); ; break;} case 20: #line 166 "perly.y" { yyval.cmdval = addcond(invert( make_acmd(C_EXPR, Nullstab, Nullarg, yyvsp[-2].arg)), yyvsp[0].arg); ; break;} case 21: #line 169 "perly.y" { yyval.cmdval = addloop( make_acmd(C_EXPR, Nullstab, Nullarg, yyvsp[-2].arg), yyvsp[0].arg); ; break;} case 22: #line 172 "perly.y" { yyval.cmdval = addloop(invert( make_acmd(C_EXPR, Nullstab, Nullarg, yyvsp[-2].arg)), yyvsp[0].arg); ; break;} case 23: #line 177 "perly.y" { cmdline = yyvsp[-4].ival; yyval.cmdval = make_icmd(C_IF,yyvsp[-2].arg,yyvsp[0].compval); ; break;} case 24: #line 180 "perly.y" { cmdline = yyvsp[-4].ival; yyval.cmdval = invert(make_icmd(C_IF,yyvsp[-2].arg,yyvsp[0].compval)); ; break;} case 25: #line 183 "perly.y" { cmdline = yyvsp[-2].ival; yyval.cmdval = make_ccmd(C_IF,cmd_to_arg(yyvsp[-1].cmdval),yyvsp[0].compval); ; break;} case 26: #line 186 "perly.y" { cmdline = yyvsp[-2].ival; yyval.cmdval = invert(make_ccmd(C_IF,cmd_to_arg(yyvsp[-1].cmdval),yyvsp[0].compval)); ; break;} case 27: #line 191 "perly.y" { cmdline = yyvsp[-4].ival; yyval.cmdval = wopt(add_label(yyvsp[-5].cval, make_ccmd(C_WHILE,yyvsp[-2].arg,yyvsp[0].compval) )); ; break;} case 28: #line 195 "perly.y" { cmdline = yyvsp[-4].ival; yyval.cmdval = wopt(add_label(yyvsp[-5].cval, invert(make_ccmd(C_WHILE,yyvsp[-2].arg,yyvsp[0].compval)) )); ; break;} case 29: #line 199 "perly.y" { cmdline = yyvsp[-2].ival; yyval.cmdval = wopt(add_label(yyvsp[-3].cval, make_ccmd(C_WHILE, cmd_to_arg(yyvsp[-1].cmdval),yyvsp[0].compval) )); ; break;} case 30: #line 203 "perly.y" { cmdline = yyvsp[-2].ival; yyval.cmdval = wopt(add_label(yyvsp[-3].cval, invert(make_ccmd(C_WHILE, cmd_to_arg(yyvsp[-1].cmdval),yyvsp[0].compval)) )); ; break;} case 31: #line 207 "perly.y" { cmdline = yyvsp[-5].ival; /* * The following gobbledygook catches EXPRs that * aren't explicit array refs and translates * foreach VAR (EXPR) { * into * @ary = EXPR; * foreach VAR (@ary) { * where @ary is a hidden array made by genstab(). * (Note that @ary may become a local array if * it is determined that it might be called * recursively. See cmd_tosave().) */ if (yyvsp[-2].arg->arg_type != O_ARRAY) { scrstab = aadd(genstab()); yyval.cmdval = append_line( make_acmd(C_EXPR, Nullstab, l(make_op(O_ASSIGN,2, listish(make_op(O_ARRAY, 1, stab2arg(A_STAB,scrstab), Nullarg,Nullarg )), listish(make_list(yyvsp[-2].arg)), Nullarg)), Nullarg), wopt(over(yyvsp[-4].stabval,add_label(yyvsp[-6].cval, make_ccmd(C_WHILE, make_op(O_ARRAY, 1, stab2arg(A_STAB,scrstab), Nullarg,Nullarg ), yyvsp[0].compval))))); yyval.cmdval->c_line = yyvsp[-5].ival; yyval.cmdval->c_head->c_line = yyvsp[-5].ival; } else { yyval.cmdval = wopt(over(yyvsp[-4].stabval,add_label(yyvsp[-6].cval, make_ccmd(C_WHILE,yyvsp[-2].arg,yyvsp[0].compval) ))); } ; break;} case 32: #line 246 "perly.y" { cmdline = yyvsp[-4].ival; if (yyvsp[-2].arg->arg_type != O_ARRAY) { scrstab = aadd(genstab()); yyval.cmdval = append_line( make_acmd(C_EXPR, Nullstab, l(make_op(O_ASSIGN,2, listish(make_op(O_ARRAY, 1, stab2arg(A_STAB,scrstab), Nullarg,Nullarg )), listish(make_list(yyvsp[-2].arg)), Nullarg)), Nullarg), wopt(over(defstab,add_label(yyvsp[-5].cval, make_ccmd(C_WHILE, make_op(O_ARRAY, 1, stab2arg(A_STAB,scrstab), Nullarg,Nullarg ), yyvsp[0].compval))))); yyval.cmdval->c_line = yyvsp[-4].ival; yyval.cmdval->c_head->c_line = yyvsp[-4].ival; } else { /* lisp, anyone? */ yyval.cmdval = wopt(over(defstab,add_label(yyvsp[-5].cval, make_ccmd(C_WHILE,yyvsp[-2].arg,yyvsp[0].compval) ))); } ; break;} case 33: #line 274 "perly.y" { yyval.compval.comp_true = yyvsp[0].cmdval; yyval.compval.comp_alt = yyvsp[-2].cmdval; cmdline = yyvsp[-8].ival; yyval.cmdval = append_line(yyvsp[-6].cmdval,wopt(add_label(yyvsp[-9].cval, make_ccmd(C_WHILE,yyvsp[-4].arg,yyval.compval) ))); ; break;} case 34: #line 280 "perly.y" { yyval.cmdval = add_label(yyvsp[-1].cval,make_ccmd(C_BLOCK,Nullarg,yyvsp[0].compval)); ; break;} case 35: #line 284 "perly.y" { yyval.cmdval = Nullcmd; ; break;} case 37: #line 289 "perly.y" { (void)scanstr("1"); yyval.arg = yylval.arg; ; break;} case 39: #line 294 "perly.y" { yyval.cval = Nullch; ; break;} case 41: #line 299 "perly.y" { yyval.ival = 0; ; break;} case 42: #line 301 "perly.y" { yyval.ival = 0; ; break;} case 43: #line 303 "perly.y" { yyval.ival = 0; ; break;} case 44: #line 307 "perly.y" { if (strEQ(yyvsp[-2].cval,"stdout")) make_form(stabent("STDOUT",TRUE),yyvsp[0].formval); else if (strEQ(yyvsp[-2].cval,"stderr")) make_form(stabent("STDERR",TRUE),yyvsp[0].formval); else make_form(stabent(yyvsp[-2].cval,TRUE),yyvsp[0].formval); Safefree(yyvsp[-2].cval); yyvsp[-2].cval = Nullch; ; break;} case 45: #line 315 "perly.y" { make_form(stabent("STDOUT",TRUE),yyvsp[0].formval); ; break;} case 46: #line 319 "perly.y" { make_sub(yyvsp[-1].cval,yyvsp[0].cmdval); cmdline = NOLINE; if (savestack->ary_fill > yyvsp[-2].ival) restorelist(yyvsp[-2].ival); ; break;} case 47: #line 326 "perly.y" { char tmpbuf[256]; STAB *tmpstab; savehptr(&curstash); saveitem(curstname); str_set(curstname,yyvsp[-1].cval); sprintf(tmpbuf,"'_%s",yyvsp[-1].cval); tmpstab = stabent(tmpbuf,TRUE); if (!stab_xhash(tmpstab)) stab_xhash(tmpstab) = hnew(0); curstash = stab_xhash(tmpstab); if (!curstash->tbl_name) curstash->tbl_name = savestr(yyvsp[-1].cval); curstash->tbl_coeffsize = 0; Safefree(yyvsp[-1].cval); yyvsp[-1].cval = Nullch; cmdline = NOLINE; ; break;} case 48: #line 346 "perly.y" { yyval.arg = yyvsp[0].arg; ; break;} case 49: #line 350 "perly.y" { yyval.arg = make_op(O_COMMA, 2, yyvsp[-2].arg, yyvsp[0].arg, Nullarg); ; break;} case 51: #line 355 "perly.y" { yyval.arg = yyvsp[0].arg; ; break;} case 52: #line 359 "perly.y" { yyvsp[-2].arg = listish(yyvsp[-2].arg); if (yyvsp[-2].arg->arg_type == O_ASSIGN && yyvsp[-2].arg->arg_len == 1) yyvsp[-2].arg->arg_type = O_ITEM; /* a local() */ if (yyvsp[-2].arg->arg_type == O_LIST) yyvsp[0].arg = listish(yyvsp[0].arg); yyval.arg = l(make_op(O_ASSIGN, 2, yyvsp[-2].arg, yyvsp[0].arg, Nullarg)); ; break;} case 53: #line 366 "perly.y" { yyval.arg = l(make_op(O_POW, 2, yyvsp[-3].arg, yyvsp[0].arg, Nullarg)); ; break;} case 54: #line 368 "perly.y" { yyval.arg = l(make_op(yyvsp[-2].ival, 2, yyvsp[-3].arg, yyvsp[0].arg, Nullarg)); ; break;} case 55: #line 370 "perly.y" { yyval.arg = rcatmaybe(l(make_op(yyvsp[-2].ival, 2, yyvsp[-3].arg, yyvsp[0].arg, Nullarg)));; break;} case 56: #line 372 "perly.y" { yyval.arg = l(make_op(O_LEFT_SHIFT, 2, yyvsp[-3].arg, yyvsp[0].arg, Nullarg)); ; break;} case 57: #line 374 "perly.y" { yyval.arg = l(make_op(O_RIGHT_SHIFT, 2, yyvsp[-3].arg, yyvsp[0].arg, Nullarg)); ; break;} case 58: #line 376 "perly.y" { yyval.arg = l(make_op(O_BIT_AND, 2, yyvsp[-3].arg, yyvsp[0].arg, Nullarg)); ; break;} case 59: #line 378 "perly.y" { yyval.arg = l(make_op(O_XOR, 2, yyvsp[-3].arg, yyvsp[0].arg, Nullarg)); ; break;} case 60: #line 380 "perly.y" { yyval.arg = l(make_op(O_BIT_OR, 2, yyvsp[-3].arg, yyvsp[0].arg, Nullarg)); ; break;} case 61: #line 384 "perly.y" { yyval.arg = make_op(O_POW, 2, yyvsp[-2].arg, yyvsp[0].arg, Nullarg); ; break;} case 62: #line 386 "perly.y" { if (yyvsp[-1].ival == O_REPEAT) yyvsp[-2].arg = listish(yyvsp[-2].arg); yyval.arg = make_op(yyvsp[-1].ival, 2, yyvsp[-2].arg, yyvsp[0].arg, Nullarg); if (yyvsp[-1].ival == O_REPEAT) { if (yyval.arg[1].arg_type != A_EXPR || yyval.arg[1].arg_ptr.arg_arg->arg_type != O_LIST) yyval.arg[1].arg_flags &= ~AF_ARYOK; } ; break;} case 63: #line 395 "perly.y" { yyval.arg = make_op(yyvsp[-1].ival, 2, yyvsp[-2].arg, yyvsp[0].arg, Nullarg); ; break;} case 64: #line 397 "perly.y" { yyval.arg = make_op(O_LEFT_SHIFT, 2, yyvsp[-2].arg, yyvsp[0].arg, Nullarg); ; break;} case 65: #line 399 "perly.y" { yyval.arg = make_op(O_RIGHT_SHIFT, 2, yyvsp[-2].arg, yyvsp[0].arg, Nullarg); ; break;} case 66: #line 401 "perly.y" { yyval.arg = make_op(yyvsp[-1].ival, 2, yyvsp[-2].arg, yyvsp[0].arg, Nullarg); ; break;} case 67: #line 403 "perly.y" { yyval.arg = make_op(yyvsp[-1].ival, 2, yyvsp[-2].arg, yyvsp[0].arg, Nullarg); ; break;} case 68: #line 405 "perly.y" { yyval.arg = make_op(O_BIT_AND, 2, yyvsp[-2].arg, yyvsp[0].arg, Nullarg); ; break;} case 69: #line 407 "perly.y" { yyval.arg = make_op(O_XOR, 2, yyvsp[-2].arg, yyvsp[0].arg, Nullarg); ; break;} case 70: #line 409 "perly.y" { yyval.arg = make_op(O_BIT_OR, 2, yyvsp[-2].arg, yyvsp[0].arg, Nullarg); ; break;} case 71: #line 411 "perly.y" { arg4 = Nullarg; yyval.arg = make_op(O_F_OR_R, 4, yyvsp[-2].arg, yyvsp[0].arg, Nullarg); ; break;} case 72: #line 414 "perly.y" { yyval.arg = make_op(O_AND, 2, yyvsp[-2].arg, yyvsp[0].arg, Nullarg); ; break;} case 73: #line 416 "perly.y" { yyval.arg = make_op(O_OR, 2, yyvsp[-2].arg, yyvsp[0].arg, Nullarg); ; break;} case 74: #line 418 "perly.y" { yyval.arg = make_op(O_COND_EXPR, 3, yyvsp[-4].arg, yyvsp[-2].arg, yyvsp[0].arg); ; break;} case 75: #line 420 "perly.y" { yyval.arg = mod_match(O_MATCH, yyvsp[-2].arg, yyvsp[0].arg); ; break;} case 76: #line 422 "perly.y" { yyval.arg = mod_match(O_NMATCH, yyvsp[-2].arg, yyvsp[0].arg); ; break;} case 77: #line 424 "perly.y" { yyval.arg = yyvsp[0].arg; ; break;} case 78: #line 428 "perly.y" { yyval.arg = make_op(O_NEGATE, 1, yyvsp[0].arg, Nullarg, Nullarg); ; break;} case 79: #line 430 "perly.y" { yyval.arg = yyvsp[0].arg; ; break;} case 80: #line 432 "perly.y" { yyval.arg = make_op(O_NOT, 1, yyvsp[0].arg, Nullarg, Nullarg); ; break;} case 81: #line 434 "perly.y" { yyval.arg = make_op(O_COMPLEMENT, 1, yyvsp[0].arg, Nullarg, Nullarg);; break;} case 82: #line 436 "perly.y" { yyval.arg = addflags(1, AF_POST|AF_UP, l(make_op(O_ITEM,1,yyvsp[-1].arg,Nullarg,Nullarg))); ; break;} case 83: #line 439 "perly.y" { yyval.arg = addflags(1, AF_POST, l(make_op(O_ITEM,1,yyvsp[-1].arg,Nullarg,Nullarg))); ; break;} case 84: #line 442 "perly.y" { yyval.arg = addflags(1, AF_PRE|AF_UP, l(make_op(O_ITEM,1,yyvsp[0].arg,Nullarg,Nullarg))); ; break;} case 85: #line 445 "perly.y" { yyval.arg = addflags(1, AF_PRE, l(make_op(O_ITEM,1,yyvsp[0].arg,Nullarg,Nullarg))); ; break;} case 86: #line 448 "perly.y" { opargs[yyvsp[-1].ival] = 0; /* force it special */ yyval.arg = make_op(yyvsp[-1].ival, 1, stab2arg(A_STAB,stabent(yyvsp[0].cval,TRUE)), Nullarg, Nullarg); ; break;} case 87: #line 454 "perly.y" { opargs[yyvsp[-1].ival] = 1; yyval.arg = make_op(yyvsp[-1].ival, 1, yyvsp[0].arg, Nullarg, Nullarg); ; break;} case 88: #line 457 "perly.y" { opargs[yyvsp[0].ival] = (yyvsp[0].ival != O_FTTTY); yyval.arg = make_op(yyvsp[0].ival, 1, stab2arg(A_STAB, yyvsp[0].ival == O_FTTTY?stabent("STDIN",TRUE):defstab), Nullarg, Nullarg); ; break;} case 89: #line 463 "perly.y" { yyval.arg = l(localize(make_op(O_ASSIGN, 1, localize(listish(make_list(yyvsp[-1].arg))), Nullarg,Nullarg))); ; break;} case 90: #line 467 "perly.y" { yyval.arg = make_list(yyvsp[-1].arg); ; break;} case 91: #line 469 "perly.y" { yyval.arg = make_list(Nullarg); ; break;} case 92: #line 471 "perly.y" { yyval.arg = make_op(O_DOFILE,2,yyvsp[0].arg,Nullarg,Nullarg); allstabs = TRUE;; break;} case 93: #line 474 "perly.y" { yyval.arg = cmd_to_arg(yyvsp[0].cmdval); ; break;} case 94: #line 476 "perly.y" { yyval.arg = stab2arg(A_STAB,yyvsp[0].stabval); ; break;} case 95: #line 478 "perly.y" { yyval.arg = stab2arg(A_STAR,yyvsp[0].stabval); ; break;} case 96: #line 480 "perly.y" { yyval.arg = make_op(O_AELEM, 2, stab2arg(A_STAB,aadd(yyvsp[-3].stabval)), yyvsp[-1].arg, Nullarg); ; break;} case 97: #line 483 "perly.y" { yyval.arg = make_op(O_HASH, 1, stab2arg(A_STAB,yyvsp[0].stabval), Nullarg, Nullarg); ; break;} case 98: #line 487 "perly.y" { yyval.arg = make_op(O_ARRAY, 1, stab2arg(A_STAB,yyvsp[0].stabval), Nullarg, Nullarg); ; break;} case 99: #line 491 "perly.y" { yyval.arg = make_op(O_HELEM, 2, stab2arg(A_STAB,hadd(yyvsp[-3].stabval)), jmaybe(yyvsp[-1].arg), Nullarg); ; break;} case 100: #line 496 "perly.y" { yyval.arg = make_op(O_LSLICE, 3, Nullarg, listish(make_list(yyvsp[-1].arg)), listish(make_list(yyvsp[-4].arg))); ; break;} case 101: #line 501 "perly.y" { yyval.arg = make_op(O_LSLICE, 3, Nullarg, listish(make_list(yyvsp[-1].arg)), Nullarg); ; break;} case 102: #line 506 "perly.y" { yyval.arg = make_op(O_ASLICE, 2, stab2arg(A_STAB,aadd(yyvsp[-3].stabval)), listish(make_list(yyvsp[-1].arg)), Nullarg); ; break;} case 103: #line 511 "perly.y" { yyval.arg = make_op(O_HSLICE, 2, stab2arg(A_STAB,hadd(yyvsp[-3].stabval)), listish(make_list(yyvsp[-1].arg)), Nullarg); ; break;} case 104: #line 516 "perly.y" { yyval.arg = make_op(O_DELETE, 2, stab2arg(A_STAB,hadd(yyvsp[-3].stabval)), jmaybe(yyvsp[-1].arg), Nullarg); ; break;} case 105: #line 521 "perly.y" { yyval.arg = stab2arg(A_ARYLEN,yyvsp[0].stabval); ; break;} case 106: #line 523 "perly.y" { yyval.arg = yyvsp[0].arg; ; break;} case 107: #line 525 "perly.y" { yyval.arg = yyvsp[0].arg; ; break;} case 108: #line 527 "perly.y" { yyval.arg = yyvsp[0].arg; ; break;} case 109: #line 529 "perly.y" { yyval.arg = yyvsp[0].arg; ; break;} case 110: #line 531 "perly.y" { yyval.arg = make_op((perldb ? O_DBSUBR : O_SUBR), 2, stab2arg(A_WORD,stabent(yyvsp[-3].cval,MULTI)), make_list(yyvsp[-1].arg), Nullarg); Safefree(yyvsp[-3].cval); yyvsp[-3].cval = Nullch; yyval.arg->arg_flags |= AF_DEPR; ; break;} case 111: #line 537 "perly.y" { yyval.arg = make_op((perldb ? O_DBSUBR : O_SUBR), 2, stab2arg(A_WORD,stabent(yyvsp[-3].cval,MULTI)), make_list(yyvsp[-1].arg), Nullarg); Safefree(yyvsp[-3].cval); yyvsp[-3].cval = Nullch; ; break;} case 112: #line 542 "perly.y" { yyval.arg = make_op((perldb ? O_DBSUBR : O_SUBR), 2, stab2arg(A_WORD,stabent(yyvsp[-2].cval,MULTI)), make_list(Nullarg), Nullarg); yyval.arg->arg_flags |= AF_DEPR; ; break;} case 113: #line 548 "perly.y" { yyval.arg = make_op((perldb ? O_DBSUBR : O_SUBR), 2, stab2arg(A_WORD,stabent(yyvsp[-2].cval,MULTI)), make_list(Nullarg), Nullarg); ; break;} case 114: #line 553 "perly.y" { yyval.arg = make_op((perldb ? O_DBSUBR : O_SUBR), 2, stab2arg(A_WORD,stabent(yyvsp[0].cval,MULTI)), Nullarg, Nullarg); ; break;} case 115: #line 558 "perly.y" { yyval.arg = make_op((perldb ? O_DBSUBR : O_SUBR), 2, stab2arg(A_STAB,yyvsp[-3].stabval), make_list(yyvsp[-1].arg), Nullarg); yyval.arg->arg_flags |= AF_DEPR; ; break;} case 116: #line 564 "perly.y" { yyval.arg = make_op((perldb ? O_DBSUBR : O_SUBR), 2, stab2arg(A_STAB,yyvsp[-3].stabval), make_list(yyvsp[-1].arg), Nullarg); ; break;} case 117: #line 569 "perly.y" { yyval.arg = make_op((perldb ? O_DBSUBR : O_SUBR), 2, stab2arg(A_STAB,yyvsp[-2].stabval), make_list(Nullarg), Nullarg); yyval.arg->arg_flags |= AF_DEPR; ; break;} case 118: #line 575 "perly.y" { yyval.arg = make_op((perldb ? O_DBSUBR : O_SUBR), 2, stab2arg(A_STAB,yyvsp[-2].stabval), make_list(Nullarg), Nullarg); ; break;} case 119: #line 580 "perly.y" { yyval.arg = make_op((perldb ? O_DBSUBR : O_SUBR), 2, stab2arg(A_STAB,yyvsp[0].stabval), Nullarg, Nullarg); ; break;} case 120: #line 585 "perly.y" { yyval.arg = make_op(yyvsp[0].ival,0,Nullarg,Nullarg,Nullarg); ; break;} case 121: #line 587 "perly.y" { yyval.arg = make_op(yyvsp[-1].ival,1,cval_to_arg(yyvsp[0].cval), Nullarg,Nullarg); ; break;} case 122: #line 590 "perly.y" { yyval.arg = make_op(yyvsp[0].ival,0,Nullarg,Nullarg,Nullarg); ; break;} case 123: #line 592 "perly.y" { yyval.arg = make_op(yyvsp[-1].ival,1,cmd_to_arg(yyvsp[0].cmdval),Nullarg,Nullarg); ; break;} case 124: #line 594 "perly.y" { yyval.arg = make_op(yyvsp[-1].ival,1,yyvsp[0].arg,Nullarg,Nullarg); ; break;} case 125: #line 596 "perly.y" { yyval.arg = make_op(O_SELECT, 0, Nullarg, Nullarg, Nullarg);; break;} case 126: #line 598 "perly.y" { yyval.arg = make_op(O_SELECT, 1, stab2arg(A_WORD,stabent(yyvsp[0].cval,TRUE)), Nullarg, Nullarg); Safefree(yyvsp[0].cval); yyvsp[0].cval = Nullch; ; break;} case 127: #line 604 "perly.y" { yyval.arg = make_op(O_SELECT, 1, yyvsp[-1].arg, Nullarg, Nullarg); ; break;} case 128: #line 606 "perly.y" { arg4 = yyvsp[-1].arg; yyval.arg = make_op(O_SSELECT, 4, yyvsp[-4].arg, yyvsp[-3].arg, yyvsp[-2].arg); ; break;} case 129: #line 609 "perly.y" { yyval.arg = make_op(O_OPEN, 2, stab2arg(A_WORD,stabent(yyvsp[0].cval,TRUE)), stab2arg(A_STAB,stabent(yyvsp[0].cval,TRUE)), Nullarg); ; break;} case 130: #line 614 "perly.y" { yyval.arg = make_op(O_OPEN, 2, stab2arg(A_WORD,stabent(yyvsp[-1].cval,TRUE)), stab2arg(A_STAB,stabent(yyvsp[-1].cval,TRUE)), Nullarg); ; break;} case 131: #line 619 "perly.y" { yyval.arg = make_op(O_OPEN, 2, yyvsp[-2].arg, yyvsp[-1].arg, Nullarg); ; break;} case 132: #line 623 "perly.y" { yyval.arg = make_op(yyvsp[-3].ival, 1, yyvsp[-1].arg, Nullarg, Nullarg); ; break;} case 133: #line 627 "perly.y" { yyval.arg = make_op(yyvsp[-1].ival, 1, stab2arg(A_WORD,stabent(yyvsp[0].cval,TRUE)), Nullarg, Nullarg); Safefree(yyvsp[0].cval); yyvsp[0].cval = Nullch; ; break;} case 134: #line 632 "perly.y" { yyval.arg = make_op(yyvsp[-1].ival, 1, stab2arg(A_STAB,yyvsp[0].stabval), Nullarg, Nullarg); ; break;} case 135: #line 636 "perly.y" { yyval.arg = make_op(yyvsp[-2].ival, 1, stab2arg(A_WORD,Nullstab), Nullarg, Nullarg); ; break;} case 136: #line 640 "perly.y" { yyval.arg = make_op(yyvsp[0].ival, 0, Nullarg, Nullarg, Nullarg); ; break;} case 137: #line 643 "perly.y" { yyval.arg = make_op(yyvsp[-4].ival, 2, yyvsp[-2].arg, yyvsp[-1].arg, Nullarg); ; break;} case 138: #line 645 "perly.y" { yyval.arg = make_op(yyvsp[-5].ival, 3, yyvsp[-3].arg, yyvsp[-2].arg, make_list(yyvsp[-1].arg)); ; break;} case 139: #line 647 "perly.y" { yyval.arg = make_op(yyvsp[-5].ival, 2, yyvsp[-3].arg, yyvsp[-1].arg, Nullarg); ; break;} case 140: #line 649 "perly.y" { arg4 = yyvsp[-1].arg; yyval.arg = make_op(yyvsp[-6].ival, 4, yyvsp[-4].arg, yyvsp[-3].arg, yyvsp[-2].arg); ; break;} case 141: #line 651 "perly.y" { arg4 = yyvsp[-2].arg; arg5 = yyvsp[-1].arg; yyval.arg = make_op(yyvsp[-8].ival, 5, yyvsp[-6].arg, yyvsp[-4].arg, yyvsp[-3].arg); ; break;} case 142: #line 654 "perly.y" { yyval.arg = make_op(yyvsp[-5].ival, 2, yyvsp[-3].arg, make_list(yyvsp[-1].arg), Nullarg); ; break;} case 143: #line 659 "perly.y" { yyval.arg = make_op(O_POP, 1, yyvsp[0].arg, Nullarg, Nullarg); ; break;} case 144: #line 661 "perly.y" { yyval.arg = make_op(O_POP, 1, yyvsp[-1].arg, Nullarg, Nullarg); ; break;} case 145: #line 663 "perly.y" { yyval.arg = make_op(O_SHIFT, 1, yyvsp[0].arg, Nullarg, Nullarg); ; break;} case 146: #line 665 "perly.y" { yyval.arg = make_op(O_SHIFT, 1, yyvsp[-1].arg, Nullarg, Nullarg); ; break;} case 147: #line 667 "perly.y" { yyval.arg = make_op(O_SHIFT, 1, stab2arg(A_STAB, aadd(stabent(subline ? "_" : "ARGV", TRUE))), Nullarg, Nullarg); ; break;} case 148: #line 672 "perly.y" { static char p[]="/\\s+/"; char *oldend = bufend; ARG *oldarg = yylval.arg; bufend=p+5; (void)scanpat(p); bufend=oldend; yyval.arg = make_split(defstab,yylval.arg,Nullarg); yylval.arg = oldarg; ; break;} case 149: #line 682 "perly.y" { yyval.arg = mod_match(O_MATCH, yyvsp[-2].arg, make_split(defstab,yyvsp[-3].arg,yyvsp[-1].arg));; break;} case 150: #line 685 "perly.y" { yyval.arg = mod_match(O_MATCH, yyvsp[-1].arg, make_split(defstab,yyvsp[-2].arg,Nullarg) ); ; break;} case 151: #line 688 "perly.y" { yyval.arg = mod_match(O_MATCH, stab2arg(A_STAB,defstab), make_split(defstab,yyvsp[-1].arg,Nullarg) ); ; break;} case 152: #line 692 "perly.y" { yyval.arg = make_op(yyvsp[-4].ival, 2, yyvsp[-2].arg, listish(make_list(yyvsp[-1].arg)), Nullarg); ; break;} case 153: #line 697 "perly.y" { yyval.arg = make_op(yyvsp[-3].ival, 1, make_list(yyvsp[-1].arg), Nullarg, Nullarg); ; break;} case 154: #line 702 "perly.y" { yyval.arg = l(make_op(yyvsp[-1].ival, 1, fixl(yyvsp[-1].ival,yyvsp[0].arg), Nullarg, Nullarg)); ; break;} case 155: #line 705 "perly.y" { yyval.arg = l(make_op(yyvsp[0].ival, 1, stab2arg(A_STAB,defstab), Nullarg, Nullarg)); ; break;} case 156: #line 709 "perly.y" { yyval.arg = make_op(yyvsp[0].ival, 0, Nullarg, Nullarg, Nullarg); ; break;} case 157: #line 711 "perly.y" { yyval.arg = make_op(yyvsp[-2].ival, 0, Nullarg, Nullarg, Nullarg); ; break;} case 158: #line 713 "perly.y" { yyval.arg = make_op(yyvsp[-2].ival, 0, Nullarg, Nullarg, Nullarg); ; break;} case 159: #line 715 "perly.y" { yyval.arg = make_op(yyvsp[-3].ival, 1, yyvsp[-1].arg, Nullarg, Nullarg); ; break;} case 160: #line 717 "perly.y" { yyval.arg = make_op(yyvsp[-4].ival, 2, yyvsp[-2].arg, yyvsp[-1].arg, Nullarg); if (yyvsp[-4].ival == O_INDEX && yyval.arg[2].arg_type == A_SINGLE) fbmcompile(yyval.arg[2].arg_ptr.arg_str,0); ; break;} case 161: #line 721 "perly.y" { yyval.arg = make_op(yyvsp[-4].ival, 2, yyvsp[-2].arg, yyvsp[-1].arg, Nullarg); if (yyvsp[-4].ival == O_INDEX && yyval.arg[2].arg_type == A_SINGLE) fbmcompile(yyval.arg[2].arg_ptr.arg_str,0); ; break;} case 162: #line 725 "perly.y" { yyval.arg = make_op(yyvsp[-5].ival, 3, yyvsp[-3].arg, yyvsp[-2].arg, yyvsp[-1].arg); if (yyvsp[-5].ival == O_INDEX && yyval.arg[2].arg_type == A_SINGLE) fbmcompile(yyval.arg[2].arg_ptr.arg_str,0); ; break;} case 163: #line 729 "perly.y" { yyval.arg = make_op(yyvsp[-5].ival, 3, yyvsp[-3].arg, yyvsp[-2].arg, yyvsp[-1].arg); ; break;} case 164: #line 731 "perly.y" { arg4 = yyvsp[-1].arg; yyval.arg = make_op(yyvsp[-6].ival, 4, yyvsp[-4].arg, yyvsp[-3].arg, yyvsp[-2].arg); ; break;} case 165: #line 734 "perly.y" { arg4 = yyvsp[-2].arg; arg5 = yyvsp[-1].arg; yyval.arg = make_op(yyvsp[-7].ival, 5, yyvsp[-5].arg, yyvsp[-4].arg, yyvsp[-3].arg); ; break;} case 166: #line 737 "perly.y" { yyval.arg = make_op(yyvsp[-3].ival, 1, yyvsp[-1].arg, Nullarg, Nullarg); ; break;} case 167: #line 742 "perly.y" { yyval.arg = make_op(yyvsp[-1].ival, 1, yyvsp[0].arg, Nullarg, Nullarg); ; break;} case 168: #line 747 "perly.y" { yyval.arg = make_op(yyvsp[-5].ival, 3, yyvsp[-3].arg, yyvsp[-2].arg, yyvsp[-1].arg); ; break;} case 171: #line 753 "perly.y" { yyval.arg = make_op(yyvsp[0].ival,2, stab2arg(A_WORD,Nullstab), stab2arg(A_STAB,defstab), Nullarg); ; break;} case 172: #line 758 "perly.y" { yyval.arg = make_op(yyvsp[-1].ival,2, stab2arg(A_WORD,Nullstab), maybelistish(yyvsp[-1].ival,make_list(yyvsp[0].arg)), Nullarg); ; break;} case 173: #line 763 "perly.y" { yyval.arg = make_op(yyvsp[-1].ival,2, stab2arg(A_WORD,stabent(yyvsp[0].cval,TRUE)), stab2arg(A_STAB,defstab), Nullarg); ; break;} case 174: #line 768 "perly.y" { yyval.arg = make_op(yyvsp[-2].ival,2, stab2arg(A_WORD,stabent(yyvsp[-1].cval,TRUE)), maybelistish(yyvsp[-2].ival,make_list(yyvsp[0].arg)), Nullarg); Safefree(yyvsp[-1].cval); yyvsp[-1].cval = Nullch; ; break;} case 175: #line 773 "perly.y" { yyval.arg = make_op(yyvsp[-2].ival,2, stab2arg(A_STAB,yyvsp[-1].stabval), maybelistish(yyvsp[-2].ival,make_list(yyvsp[0].arg)), Nullarg); ; break;} case 176: #line 778 "perly.y" { yyval.arg = make_op(yyvsp[-2].ival,2, cmd_to_arg(yyvsp[-1].cmdval), maybelistish(yyvsp[-2].ival,make_list(yyvsp[0].arg)), Nullarg); ; break;} case 177: #line 785 "perly.y" { yyval.arg = stab2arg(A_WORD,stabent(yyvsp[0].cval,TRUE)); Safefree(yyvsp[0].cval); yyvsp[0].cval = Nullch;; break;} case 179: #line 791 "perly.y" { yyval.arg = stab2arg(A_WORD,aadd(stabent(yyvsp[0].cval,TRUE))); Safefree(yyvsp[0].cval); yyvsp[0].cval = Nullch; ; break;} case 180: #line 794 "perly.y" { yyval.arg = stab2arg(A_STAB,yyvsp[0].stabval); ; break;} case 181: #line 798 "perly.y" { yyval.arg = stab2arg(A_WORD,hadd(stabent(yyvsp[0].cval,TRUE))); Safefree(yyvsp[0].cval); yyvsp[0].cval = Nullch; ; break;} case 182: #line 801 "perly.y" { yyval.arg = stab2arg(A_STAB,yyvsp[0].stabval); ; break;} case 183: #line 805 "perly.y" { yyval.ival = 1; ; break;} case 184: #line 807 "perly.y" { yyval.ival = 0; ; break;} case 185: #line 816 "perly.y" { char *s; yyval.arg = op_new(1); yyval.arg->arg_type = O_ITEM; yyval.arg[1].arg_type = A_SINGLE; yyval.arg[1].arg_ptr.arg_str = str_make(yyvsp[0].cval,0); for (s = yyvsp[0].cval; *s && isLOWER(*s); s++) ; if (dowarn && !*s) warn( "\"%s\" may clash with future reserved word", yyvsp[0].cval ); ; break;} } /* the action file gets copied in in place of this dollarsign */ #line 423 "/usr/local/lib/bison.simple" yyvsp -= yylen; yyssp -= yylen; #ifdef YYLSP_NEEDED yylsp -= yylen; #endif #if YYDEBUG != 0 if (yydebug) { short *ssp1 = yyss - 1; fprintf (stderr, "state stack now"); while (ssp1 != yyssp) fprintf (stderr, " %d", *++ssp1); fprintf (stderr, "\n"); } #endif *++yyvsp = yyval; #ifdef YYLSP_NEEDED yylsp++; if (yylen == 0) { yylsp->first_line = yylloc.first_line; yylsp->first_column = yylloc.first_column; yylsp->last_line = (yylsp-1)->last_line; yylsp->last_column = (yylsp-1)->last_column; yylsp->text = 0; } else { yylsp->last_line = (yylsp+yylen-1)->last_line; yylsp->last_column = (yylsp+yylen-1)->last_column; } #endif /* Now "shift" the result of the reduction. Determine what state that goes to, based on the state we popped back to and the rule number reduced by. */ yyn = yyr1[yyn]; yystate = yypgoto[yyn - YYNTBASE] + *yyssp; if (yystate >= 0 && yystate <= YYLAST && yycheck[yystate] == *yyssp) yystate = yytable[yystate]; else yystate = yydefgoto[yyn - YYNTBASE]; goto yynewstate; yyerrlab: /* here on detecting error */ if (! yyerrstatus) /* If not already recovering from an error, report this error. */ { ++yynerrs; #ifdef YYERROR_VERBOSE yyn = yypact[yystate]; if (yyn > YYFLAG && yyn < YYLAST) { int size = 0; char *msg; int x, count; count = 0; for (x = 0; x < (sizeof(yytname) / sizeof(char *)); x++) if (yycheck[x + yyn] == x) size += strlen(yytname[x]) + 15, count++; msg = (char *) xmalloc(size + 15); strcpy(msg, "parse error"); if (count < 5) { count = 0; for (x = 0; x < (sizeof(yytname) / sizeof(char *)); x++) if (yycheck[x + yyn] == x) { strcat(msg, count == 0 ? ", expecting `" : " or `"); strcat(msg, yytname[x]); strcat(msg, "'"); count++; } } yyerror(msg); free(msg); } else #endif /* YYERROR_VERBOSE */ yyerror("parse error"); } yyerrlab1: /* here on error raised explicitly by an action */ if (yyerrstatus == 3) { /* if just tried and failed to reuse lookahead token after an error, discard it. */ /* return failure if at end of input */ if (yychar == YYEOF) YYABORT; #if YYDEBUG != 0 if (yydebug) fprintf(stderr, "Discarding token %d (%s).\n", yychar, yytname[yychar1]); #endif yychar = YYEMPTY; } /* Else will try to reuse lookahead token after shifting the error token. */ yyerrstatus = 3; /* Each real token shifted decrements this */ goto yyerrhandle; yyerrdefault: /* current state does not do anything special for the error token. */ #if 0 /* This is wrong; only states that explicitly want error tokens should shift them. */ yyn = yydefact[yystate]; /* If its default is to accept any token, ok. Otherwise pop it.*/ if (yyn) goto yydefault; #endif yyerrpop: /* pop the current state because it cannot handle the error token */ if (yyssp == yyss) YYABORT; yyvsp--; yystate = *--yyssp; #ifdef YYLSP_NEEDED yylsp--; #endif #if YYDEBUG != 0 if (yydebug) { short *ssp1 = yyss - 1; fprintf (stderr, "Error: state stack now"); while (ssp1 != yyssp) fprintf (stderr, " %d", *++ssp1); fprintf (stderr, "\n"); } #endif yyerrhandle: yyn = yypact[yystate]; if (yyn == YYFLAG) goto yyerrdefault; yyn += YYTERROR; if (yyn < 0 || yyn > YYLAST || yycheck[yyn] != YYTERROR) goto yyerrdefault; yyn = yytable[yyn]; if (yyn < 0) { if (yyn == YYFLAG) goto yyerrpop; yyn = -yyn; goto yyreduce; } else if (yyn == 0) goto yyerrpop; if (yyn == YYFINAL) YYACCEPT; #if YYDEBUG != 0 if (yydebug) fprintf(stderr, "Shifting error token, "); #endif *++yyvsp = yylval; #ifdef YYLSP_NEEDED *++yylsp = yylloc; #endif yystate = yyn; goto yynewstate; } #line 828 "perly.y" /* PROGRAM */