X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=perly.c;h=10de7ce2d5d1218f7d2c6426b61245a08efa1e9c;hb=718842b0e14b2d067314bf35e22eac61894424e9;hp=abbd0a9ed6fe5d97d42b1aa496b923c09b38d254;hpb=79072805bf63abe5b5978b5928ab00d360ea3e7f;p=p5sagit%2Fp5-mst-13.2.git diff --git a/perly.c b/perly.c index abbd0a9..10de7ce 100644 --- a/perly.c +++ b/perly.c @@ -1,1748 +1,2652 @@ -extern char *malloc(), *realloc(); - -# line 39 "perly.y" +#ifndef lint +/* static char yysccsid[] = "@(#)yaccpar 1.8 (Berkeley) 01/20/91"; */ +#endif +#define YYBYACC 1 +#line 16 "perly.y" #include "EXTERN.h" +#define PERL_IN_PERLY_C #include "perl.h" +#ifdef EBCDIC +#undef YYDEBUG +#endif +#define dep() deprecate_old("\"do\" to call subroutines") + +/* stuff included here to make perly_c.diff apply better */ -/*SUPPRESS 530*/ -/*SUPPRESS 593*/ -/*SUPPRESS 595*/ +#define yydebug PL_yydebug +#define yynerrs PL_yynerrs +#define yyerrflag PL_yyerrflag +#define yychar PL_yychar +#define yyval PL_yyval +#define yylval PL_yylval +struct ysv { + short* yyss; + YYSTYPE* yyvs; + int oldyydebug; + int oldyynerrs; + int oldyyerrflag; + int oldyychar; + YYSTYPE oldyyval; + YYSTYPE oldyylval; +}; + +static void yydestruct(pTHX_ void *ptr); -# line 50 "perly.y" -typedef union { +#line 51 "perly.y" +#if 0 /* get this from perly.h instead */ +#line 54 "perly.y" +typedef union { I32 ival; char *pval; OP *opval; GV *gvval; } YYSTYPE; -# define WORD 257 -# define METHOD 258 -# define THING 259 -# define PMFUNC 260 -# define LABEL 261 -# define FORMAT 262 -# define SUB 263 -# define PACKAGE 264 -# define WHILE 265 -# define UNTIL 266 -# define IF 267 -# define UNLESS 268 -# define ELSE 269 -# define ELSIF 270 -# define CONTINUE 271 -# define FOR 272 -# define LOOPEX 273 -# define DOTDOT 274 -# define FUNC0 275 -# define FUNC1 276 -# define FUNC 277 -# define RELOP 278 -# define EQOP 279 -# define MULOP 280 -# define ADDOP 281 -# define DOLSHARP 282 -# define DO 283 -# define LOCAL 284 -# define DELETE 285 -# define HASHBRACK 286 -# define LSTOP 287 -# define OROR 288 -# define ANDAND 289 -# define BITOROP 290 -# define BITANDOP 291 -# define UNIOP 292 -# define SHIFTOP 293 -# define MATCHOP 294 -# define ARROW 295 -# define UMINUS 296 -# define REFGEN 297 -# define POWOP 298 -# define PREINC 299 -# define PREDEC 300 -# define POSTINC 301 -# define POSTDEC 302 -#define yyclearin yychar = -1 -#define yyerrok yyerrflag = 0 -extern int yychar; -extern int yyerrflag; -#ifndef YYMAXDEPTH -#define YYMAXDEPTH 150 -#endif -YYSTYPE yylval, yyval; -# define YYERRCODE 256 +#line 62 "perly.y" +#endif /* 0 */ -# line 569 "perly.y" - /* PROGRAM */ -int yyexca[] ={ --1, 1, - 0, -1, - -2, 0, --1, 3, - 0, 2, - -2, 39, --1, 21, - 295, 145, - -2, 25, --1, 40, - 41, 97, - 265, 97, - 266, 97, - 267, 97, - 268, 97, - 274, 97, - 278, 97, - 279, 97, - 280, 97, - 281, 97, - 44, 97, - 61, 97, - 63, 97, - 58, 97, - 288, 97, - 289, 97, - 290, 97, - 291, 97, - 293, 97, - 294, 97, - 295, 97, - 298, 97, - 301, 97, - 302, 97, - 59, 97, - 93, 97, - -2, 144, --1, 54, - 41, 133, - 265, 133, - 266, 133, - 267, 133, - 268, 133, - 274, 133, - 278, 133, - 279, 133, - 280, 133, - 281, 133, - 44, 133, - 61, 133, - 63, 133, - 58, 133, - 288, 133, - 289, 133, - 290, 133, - 291, 133, - 293, 133, - 294, 133, - 295, 133, - 298, 133, - 301, 133, - 302, 133, - 59, 133, - 93, 133, - -2, 143, --1, 76, - 59, 35, - -2, 0, --1, 112, - 301, 0, - 302, 0, - -2, 88, --1, 113, - 301, 0, - 302, 0, - -2, 89, --1, 192, - 278, 0, - -2, 71, --1, 193, - 279, 0, - -2, 72, --1, 194, - 274, 0, - -2, 75, --1, 310, - 41, 35, - -2, 0, - }; -# define YYNPROD 152 -# define YYLAST 2258 -int yyact[]={ - - 107, 162, 104, 105, 90, 102, 229, 103, 148, 90, - 21, 239, 67, 104, 105, 150, 228, 91, 25, 72, - 74, 240, 241, 80, 82, 78, 91, 92, 56, 31, - 26, 102, 56, 58, 61, 90, 37, 132, 57, 30, - 102, 29, 69, 68, 90, 244, 115, 117, 119, 129, - 98, 133, 91, 92, 324, 16, 155, 77, 91, 92, - 59, 14, 11, 12, 13, 93, 102, 152, 87, 153, - 90, 93, 102, 157, 317, 159, 90, 315, 198, 164, - 156, 166, 158, 168, 298, 161, 297, 38, 165, 296, - 167, 262, 169, 170, 171, 172, 202, 210, 26, 200, - 268, 215, 123, 220, 31, 81, 87, 56, 58, 61, - 199, 37, 121, 57, 30, 26, 29, 87, 258, 26, - 79, 203, 32, 73, 3, 310, 98, 99, 91, 92, - 211, 212, 213, 214, 124, 59, 218, 98, 99, 91, - 92, 93, 102, 71, 122, 223, 90, 97, 96, 95, - 94, 237, 93, 102, 121, 316, 154, 90, 87, 70, - 87, 87, 38, 87, 66, 87, 295, 31, 87, 235, - 56, 58, 61, 318, 37, 299, 57, 30, 293, 29, - 243, 14, 11, 12, 13, 327, 122, 325, 26, 98, - 99, 91, 92, 87, 26, 204, 87, 32, 59, 320, - 96, 95, 94, 26, 93, 102, 26, 255, 256, 90, - 292, 266, 259, 174, 265, 232, 87, 234, 314, 304, - 98, 99, 91, 92, 267, 38, 26, 323, 271, 273, - 87, 264, 281, 94, 282, 93, 102, 284, 278, 286, - 90, 287, 263, 289, 206, 197, 156, 56, 202, 139, - 207, 200, 24, 54, 65, 46, 53, 26, 231, 221, - 32, 18, 19, 22, 23, 209, 56, 294, 20, 49, - 126, 51, 52, 63, 288, 280, 254, 300, 60, 48, - 36, 45, 39, 62, 308, 101, 219, 160, 50, 85, - 86, 83, 84, 33, 285, 34, 35, 312, 311, 274, - 242, 313, 87, 87, 238, 233, 31, 87, 87, 56, - 58, 61, 322, 37, 272, 57, 30, 149, 29, 25, - 85, 86, 83, 84, 326, 201, 328, 24, 54, 65, - 46, 53, 56, 137, 136, 135, 76, 59, 329, 306, - 307, 127, 309, 8, 49, 7, 51, 52, 63, 163, - 2, 9, 55, 60, 48, 36, 45, 39, 62, 17, - 47, 41, 44, 50, 38, 42, 321, 43, 33, 31, - 34, 35, 56, 58, 61, 15, 37, 270, 57, 30, - 10, 29, 5, 208, 205, 88, 6, 4, 147, 1, - 0, 54, 65, 46, 53, 0, 26, 0, 0, 32, - 59, 0, 0, 0, 0, 0, 0, 49, 0, 51, - 52, 63, 0, 0, 0, 28, 60, 48, 36, 45, - 39, 62, 0, 0, 0, 0, 50, 38, 0, 150, - 0, 33, 31, 34, 35, 56, 58, 61, 0, 37, - 0, 57, 30, 0, 29, 106, 108, 109, 110, 111, - 112, 113, 98, 99, 91, 92, 0, 0, 261, 26, - 0, 0, 32, 59, 95, 94, 0, 93, 102, 0, - 0, 0, 90, 0, 0, 0, 31, 0, 0, 56, - 58, 61, 0, 37, 0, 57, 30, 236, 29, 0, - 38, 0, 0, 0, 0, 0, 100, 0, 0, 0, - 98, 99, 91, 92, 0, 0, 0, 59, 0, 0, - 97, 96, 95, 94, 0, 93, 102, 0, 0, 0, - 90, 275, 26, 0, 276, 32, 0, 0, 0, 0, - 54, 65, 46, 53, 38, 225, 260, 0, 227, 0, - 230, 89, 0, 101, 269, 0, 49, 0, 51, 52, - 63, 0, 0, 0, 0, 60, 48, 36, 45, 39, - 62, 283, 0, 0, 0, 50, 26, 0, 0, 32, - 33, 31, 34, 35, 56, 58, 61, 0, 37, 257, - 57, 30, 0, 29, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 54, 65, 46, 53, 301, 0, 302, - 0, 0, 59, 0, 0, 0, 0, 0, 0, 49, - 0, 51, 52, 63, 0, 277, 0, 279, 60, 48, - 36, 45, 39, 62, 319, 0, 0, 0, 50, 38, - 0, 0, 0, 33, 0, 34, 35, 0, 0, 0, - 0, 0, 0, 291, 89, 0, 101, 0, 0, 0, - 0, 64, 0, 0, 0, 0, 54, 65, 46, 53, - 0, 26, 0, 0, 32, 0, 0, 0, 0, 305, - 0, 0, 49, 0, 51, 52, 63, 0, 0, 0, - 0, 60, 48, 36, 45, 39, 62, 89, 0, 101, - 0, 50, 0, 0, 0, 0, 33, 0, 34, 35, - 54, 65, 46, 53, 0, 0, 0, 0, 138, 141, - 142, 143, 144, 145, 146, 0, 49, 151, 51, 52, - 63, 0, 0, 0, 0, 60, 48, 36, 45, 39, - 62, 0, 0, 0, 0, 50, 0, 0, 0, 0, - 33, 31, 34, 35, 56, 58, 61, 0, 37, 222, - 57, 30, 0, 29, 100, 0, 0, 0, 98, 99, - 91, 92, 0, 0, 0, 0, 0, 0, 97, 96, - 95, 94, 59, 93, 102, 0, 0, 0, 90, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 54, 65, 46, 53, 38, - 0, 226, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 49, 0, 51, 52, 63, 0, 0, 0, 0, - 60, 48, 36, 45, 39, 62, 0, 0, 0, 0, - 50, 26, 0, 0, 32, 33, 31, 34, 35, 56, - 58, 61, 0, 37, 217, 57, 30, 0, 29, 0, - 0, 0, 0, 0, 0, 0, 0, 100, 0, 0, - 0, 98, 99, 91, 92, 0, 0, 59, 0, 0, - 0, 97, 96, 95, 94, 0, 93, 102, 0, 0, - 31, 90, 0, 56, 58, 61, 0, 37, 0, 57, - 30, 0, 29, 0, 38, 0, 0, 0, 0, 0, - 100, 0, 0, 0, 98, 99, 91, 92, 190, 0, - 0, 59, 0, 0, 97, 96, 95, 94, 0, 93, - 102, 0, 0, 0, 90, 0, 26, 0, 0, 32, - 31, 0, 0, 56, 58, 61, 0, 37, 38, 57, - 30, 0, 29, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 188, 0, - 0, 59, 0, 0, 0, 54, 65, 46, 53, 0, - 26, 0, 0, 32, 0, 0, 0, 0, 0, 0, - 0, 49, 0, 51, 52, 63, 0, 0, 38, 0, - 60, 48, 36, 45, 39, 62, 0, 0, 0, 0, - 50, 0, 0, 0, 0, 33, 31, 34, 35, 56, - 58, 61, 0, 37, 0, 57, 30, 0, 29, 0, - 26, 0, 0, 32, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 186, 0, 0, 59, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 54, 65, 46, 53, 38, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 49, 0, 51, 52, - 63, 0, 0, 0, 0, 60, 48, 36, 45, 39, - 62, 0, 0, 0, 0, 50, 26, 0, 0, 32, - 33, 0, 34, 35, 54, 65, 46, 53, 0, 31, - 0, 0, 56, 58, 61, 0, 37, 0, 57, 30, - 49, 29, 51, 52, 63, 0, 0, 0, 0, 60, - 48, 36, 45, 39, 62, 0, 0, 184, 0, 50, - 59, 0, 0, 0, 33, 0, 34, 35, 0, 0, - 0, 0, 0, 0, 54, 65, 46, 53, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 38, 0, 0, - 49, 0, 51, 52, 63, 0, 0, 0, 0, 60, - 48, 36, 45, 39, 62, 0, 0, 0, 0, 50, - 0, 0, 0, 0, 33, 0, 34, 35, 0, 26, - 0, 0, 32, 0, 0, 0, 31, 0, 0, 56, - 58, 61, 0, 37, 0, 57, 30, 0, 29, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 54, 65, 46, 53, 182, 0, 0, 59, 0, 0, - 0, 0, 0, 0, 0, 0, 49, 0, 51, 52, - 63, 0, 0, 0, 40, 60, 48, 36, 45, 39, - 62, 0, 0, 0, 38, 50, 0, 0, 0, 0, - 33, 0, 34, 35, 31, 75, 0, 56, 58, 61, - 0, 37, 0, 57, 30, 0, 29, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 26, 0, 0, 32, - 125, 0, 180, 131, 0, 59, 0, 0, 0, 0, - 0, 140, 140, 140, 140, 140, 140, 0, 0, 31, - 140, 0, 56, 58, 61, 0, 37, 0, 57, 30, - 0, 29, 38, 54, 65, 46, 53, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 178, 0, 49, - 59, 51, 52, 63, 0, 0, 0, 0, 60, 48, - 36, 45, 39, 62, 26, 0, 0, 32, 50, 0, - 0, 0, 0, 33, 0, 34, 35, 38, 0, 0, - 0, 216, 0, 0, 0, 31, 0, 0, 56, 58, - 61, 0, 37, 0, 57, 30, 0, 29, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 26, - 0, 0, 32, 176, 0, 0, 59, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 54, 65, 46, 53, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 38, 0, 0, 49, 0, 51, 52, - 63, 0, 0, 0, 0, 60, 48, 36, 45, 39, - 62, 0, 0, 0, 0, 50, 253, 0, 0, 89, - 33, 101, 34, 35, 0, 26, 0, 0, 32, 0, - 0, 0, 0, 0, 31, 0, 0, 56, 58, 61, - 0, 37, 0, 57, 30, 0, 29, 0, 54, 65, - 46, 53, 0, 0, 0, 0, 0, 0, 0, 0, - 120, 0, 0, 0, 49, 59, 51, 52, 63, 0, - 0, 0, 0, 60, 48, 36, 45, 39, 62, 0, - 0, 0, 0, 50, 0, 0, 0, 0, 33, 0, - 34, 35, 38, 54, 65, 46, 53, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 49, - 0, 51, 52, 63, 0, 0, 0, 0, 60, 48, - 36, 45, 39, 62, 26, 0, 0, 32, 50, 0, - 0, 0, 0, 33, 0, 34, 35, 31, 0, 0, - 56, 58, 61, 0, 37, 0, 57, 30, 0, 29, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 54, - 65, 46, 53, 0, 0, 0, 0, 0, 59, 0, - 0, 0, 0, 0, 0, 49, 0, 51, 52, 63, - 0, 0, 0, 0, 60, 48, 36, 45, 39, 62, - 0, 0, 0, 0, 50, 38, 0, 118, 0, 33, - 0, 34, 35, 0, 31, 0, 0, 56, 58, 61, - 0, 37, 116, 57, 30, 0, 29, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 26, 0, 0, - 32, 0, 100, 0, 0, 59, 98, 99, 91, 92, - 0, 0, 0, 0, 0, 0, 97, 96, 95, 94, - 0, 93, 102, 0, 0, 0, 90, 0, 54, 65, - 46, 53, 38, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 49, 0, 51, 52, 63, 0, - 0, 0, 0, 60, 48, 36, 45, 39, 62, 0, - 0, 0, 0, 50, 26, 0, 0, 32, 33, 0, - 34, 35, 31, 0, 0, 56, 58, 61, 0, 37, - 0, 57, 30, 0, 29, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 59, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 31, 0, 0, - 56, 58, 61, 0, 37, 0, 57, 30, 0, 29, - 38, 54, 65, 46, 53, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 49, 59, 51, - 52, 63, 0, 0, 0, 0, 60, 48, 36, 45, - 39, 62, 26, 0, 0, 32, 50, 0, 0, 0, - 0, 33, 0, 34, 35, 38, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 54, 65, - 46, 53, 0, 0, 0, 0, 0, 26, 0, 0, - 32, 0, 0, 0, 49, 0, 51, 52, 63, 0, - 0, 0, 0, 60, 48, 36, 45, 39, 62, 0, - 0, 0, 0, 50, 0, 0, 0, 0, 33, 0, - 34, 35, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 54, 65, 46, 53, - 27, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 49, 0, 51, 52, 63, 0, 0, 0, - 0, 60, 48, 36, 45, 39, 62, 0, 0, 0, - 0, 50, 0, 0, 0, 0, 33, 114, 34, 35, - 0, 130, 65, 46, 53, 0, 0, 0, 0, 128, - 0, 134, 0, 0, 0, 0, 0, 49, 0, 51, - 52, 63, 0, 0, 0, 0, 60, 48, 36, 45, - 39, 62, 0, 0, 0, 0, 50, 0, 0, 0, - 0, 33, 0, 34, 35, 0, 0, 0, 173, 0, - 175, 177, 179, 181, 183, 185, 187, 189, 191, 192, - 193, 194, 195, 196, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 224, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 245, 0, 246, - 0, 247, 0, 248, 0, 249, 0, 250, 0, 251, - 0, 252, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 173, 0, 0, 0, 173, 0, 0, 173, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 290, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 303 }; -int yypact[]={ - - -1000, -1000, -1000, -200, -1000, -1000, -1000, -1000, -1000, -4, - -1000, -93, -214, -215, -1000, -1000, -1000, 100, 103, 83, - 296, -246, 80, 65, -1000, 24, -1000, 626, -288, 1719, - 1719, 1719, 1719, 1719, 1719, 1719, 1719, 1621, 1554, 1451, - 21, -1000, -1000, 11, -1000, 230, -1000, 301, 1764, -220, - 1719, 295, 294, 293, -1000, -1000, -8, -8, -8, -8, - -8, -8, 1719, 277, -280, -8, -25, -1000, -25, 97, - -1000, 1719, -25, 1719, -25, 247, 71, -1000, -25, 1719, - -25, 1719, -25, 1719, 1719, 1719, 1719, 1719, -1000, 1719, - 1352, 1286, 1241, 1173, 1076, 973, 897, 847, 1719, 1719, - 1719, 1719, 1719, -13, -1000, -1000, -299, -1000, -299, -299, - -299, -299, -1000, -1000, -222, 207, 30, 151, -1000, 206, - -28, 1719, 1719, 1719, 1719, -22, 211, 803, -222, -1000, - 246, 63, -1000, -1000, -222, 218, 708, 1719, -1000, -1000, - -1000, -1000, -1000, -1000, -1000, -1000, 134, -1000, 124, 1719, - -271, 1719, -1000, -1000, -1000, 217, 124, -246, 264, -246, - 1719, 55, 92, -1000, -1000, 263, -248, 259, -248, 124, - 124, 124, 124, 626, -80, 626, 1719, -294, 1719, -289, - 1719, -263, 1719, -254, 1719, -152, 1719, -58, 1719, 174, - 1719, -89, -222, -228, -141, 1408, -294, 236, 1719, 1719, - 538, 27, -1000, 1719, 443, -1000, -1000, 399, -1000, -34, - -1000, 149, 172, 121, 152, 1719, -23, -1000, 207, 336, - 273, -1000, -1000, 258, 480, -1000, 134, 197, 1719, 235, - -1000, -25, -1000, -25, -1000, 207, -25, 1719, -25, -1000, - -25, 234, -25, -1000, -1000, 626, 626, 626, 626, 626, - 626, 626, 626, 1719, 1719, 117, 119, -1000, 1719, 73, - -1000, -36, -1000, -1000, -39, -1000, -41, 116, 1719, -1000, - -1000, 207, -1000, 207, -1000, -1000, 1719, 178, -1000, -1000, - 1719, -246, -246, -25, -246, 66, -248, -1000, 1719, -248, - 222, 177, -1000, -48, 62, -1000, -1000, -1000, -1000, -51, - 114, -1000, -1000, 583, -1000, 158, -1000, -1000, -246, -1000, - 71, -1000, 186, -1000, -1000, -1000, -1000, -1000, -71, -1000, - -1000, -1000, 146, -25, 144, -25, -248, -1000, -1000, -1000 }; -int yypgo[]={ - - 0, 389, 387, 386, 385, 325, 384, 383, 0, 124, - 382, 380, 375, 1, 11, 8, 1980, 415, 1254, 367, - 365, 362, 361, 360, 349, 388, 651, 56, 352, 351, - 57, 350, 345, 343 }; -int yyr1[]={ - - 0, 31, 1, 8, 4, 9, 9, 9, 10, 10, - 10, 10, 24, 24, 24, 24, 24, 24, 14, 14, - 14, 12, 12, 12, 12, 30, 30, 11, 11, 11, - 11, 11, 11, 11, 11, 13, 13, 27, 27, 29, - 29, 2, 2, 2, 3, 3, 32, 33, 15, 15, - 28, 28, 28, 28, 28, 28, 28, 28, 16, 16, - 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, - 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, - 16, 17, 17, 17, 17, 17, 17, 17, 17, 17, - 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, - 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, - 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, - 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, - 17, 17, 17, 17, 17, 25, 25, 23, 18, 19, - 20, 21, 22, 26, 26, 26, 5, 5, 6, 6, - 7, 7 }; -int yyr2[]={ - - 0, 1, 5, 9, 1, 1, 5, 5, 5, 2, - 5, 7, 3, 3, 7, 7, 7, 7, 1, 5, - 13, 13, 13, 9, 9, 1, 5, 15, 15, 11, - 11, 17, 15, 21, 7, 1, 2, 1, 2, 1, - 2, 3, 3, 3, 7, 5, 7, 7, 7, 2, - 7, 11, 9, 13, 13, 7, 5, 9, 7, 9, - 9, 9, 9, 9, 9, 9, 9, 7, 7, 7, - 7, 7, 7, 7, 7, 7, 7, 7, 11, 7, - 3, 5, 5, 5, 5, 5, 5, 5, 5, 5, - 5, 7, 5, 7, 5, 7, 7, 3, 3, 9, - 11, 3, 3, 3, 11, 13, 13, 11, 9, 11, - 13, 17, 3, 3, 7, 9, 5, 5, 9, 11, - 9, 11, 3, 5, 3, 5, 5, 3, 7, 7, - 9, 9, 13, 2, 2, 1, 3, 5, 5, 5, - 5, 5, 5, 3, 3, 3, 5, 3, 5, 3, - 7, 5 }; -int yychk[]={ - - -1000, -1, -31, -9, -2, -10, -3, -32, -33, -29, - -11, 262, 263, 264, 261, -12, 59, -24, 265, 266, - 272, -8, 267, 268, 256, -15, 123, -16, -17, 45, - 43, 33, 126, 297, 299, 300, 284, 40, 91, 286, - -18, -22, -20, -19, -21, 285, 259, -23, 283, 273, - 292, 275, 276, 260, 257, -28, 36, 42, 37, 64, - 282, 38, 287, 277, -26, 258, 257, -8, 257, 257, - 59, 40, -8, 40, -8, -18, 40, -30, 271, 40, - -8, 40, -8, 267, 268, 265, 266, 44, -4, 61, - 298, 280, 281, 293, 291, 290, 289, 288, 278, 279, - 274, 63, 294, 295, 301, 302, -17, -8, -17, -17, - -17, -17, -17, -17, -16, -15, 41, -15, 93, -15, - 59, 91, 123, 91, 123, -18, 40, 40, -16, -8, - 257, -18, 257, -8, -16, 40, 40, 40, -26, 257, - -18, -26, -26, -26, -26, -26, -26, -25, -15, 40, - 295, -26, -8, -8, 59, -27, -15, -8, -15, -8, - 40, -15, -13, -24, -8, -15, -8, -15, -8, -15, - -15, -15, -15, -16, -9, -16, 61, -16, 61, -16, - 61, -16, 61, -16, 61, -16, 61, -16, 61, -16, - 61, -16, -16, -16, -16, -16, -16, 258, 91, 123, - 44, -5, 41, 91, 44, -6, 93, 44, -7, 59, - 125, -15, -15, -15, -15, 123, -18, 41, -15, 40, - 40, 41, 41, -15, -16, -25, -26, -25, 287, 277, - -25, 41, -30, 41, -30, -15, -5, 59, 41, -14, - 269, 270, 41, -14, 125, -16, -16, -16, -16, -16, - -16, -16, -16, 58, 40, -15, -15, 41, 91, -15, - 93, 59, 125, 93, 59, 93, 59, -15, 123, -5, - 41, -15, 41, -15, 41, 41, 44, -25, 41, -25, - 40, -8, -8, -5, -8, -27, -8, -8, 40, -8, - -16, -25, 93, 59, -15, 93, 125, 125, 125, 59, - -15, -5, -5, -16, 41, -25, -30, -30, -8, -30, - 59, -14, -15, -14, 41, 125, 93, 125, 59, 41, - 41, -30, -13, 41, 125, 41, -8, 41, -8, -14 }; -int yydef[]={ +#ifdef USE_PURE_BISON +#define YYLEX_PARAM (&yychar) +#define yylex yylex_r +#endif - 1, -2, 5, -2, 6, 7, 41, 42, 43, 0, - 9, 0, 0, 0, 40, 8, 10, 0, 0, 0, - 0, -2, 0, 0, 12, 13, 4, 49, 80, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - -2, 98, 101, 102, 103, 0, 112, 113, 0, 122, - 124, 127, 0, 0, -2, 134, 0, 0, 0, 0, - 0, 0, 135, 0, 0, 0, 0, 45, 0, 0, - 11, 37, 0, 0, 0, 0, -2, 34, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 5, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 86, 87, 81, 145, 82, 83, - 84, 85, -2, -2, 90, 0, 92, 0, 94, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 116, 117, - 133, 97, 123, 125, 126, 0, 0, 0, 138, 143, - 144, 142, 140, 139, 141, 137, 135, 56, 136, 135, - 0, 135, 44, 46, 47, 0, 38, 25, 0, 25, - 0, 13, 0, 36, 26, 0, 18, 0, 18, 14, - 15, 16, 17, 48, 39, 58, 0, 67, 0, 68, - 0, 69, 0, 70, 0, 73, 0, 74, 0, 76, - 0, 77, -2, -2, -2, 0, 79, 0, 0, 0, - 0, 91, 147, 0, 0, 93, 149, 0, 95, 0, - 96, 0, 0, 0, 0, 0, 0, 114, 0, 0, - 0, 128, 129, 0, 0, 50, 135, 0, 135, 0, - 55, 0, 29, 0, 30, 0, 0, 37, 0, 23, - 0, 0, 0, 24, 3, 59, 60, 61, 62, 63, - 64, 65, 66, 0, 135, 0, 0, 146, 0, 0, - 148, 0, 151, 99, 0, 108, 0, 0, 0, 115, - 118, 0, 120, 0, 130, 131, 0, 0, 57, 52, - 135, 25, 25, 0, 25, 0, 18, 19, 0, 18, - 78, 0, 100, 0, 0, 107, 150, 104, 109, 0, - 0, 119, 121, 0, 51, 0, 27, 28, 25, 32, - -2, 21, 0, 22, 54, 105, 106, 110, 0, 132, - 53, 31, 0, 0, 0, 0, 18, 111, 33, 20 }; -typedef struct { char *t_name; int t_val; } yytoktype; +#line 54 "perly.c" +#define YYERRCODE 256 +static short yylhs[] = { -1, + 0, 9, 7, 6, 10, 8, 11, 11, 11, 12, + 12, 12, 12, 25, 25, 25, 25, 25, 25, 25, + 15, 15, 15, 14, 14, 43, 43, 13, 13, 13, + 13, 13, 13, 13, 27, 27, 28, 28, 29, 30, + 31, 32, 33, 54, 54, 1, 1, 1, 1, 1, + 2, 39, 39, 47, 55, 3, 4, 5, 40, 41, + 41, 45, 45, 45, 46, 46, 42, 42, 56, 56, + 58, 57, 16, 16, 16, 16, 26, 26, 26, 37, + 37, 37, 37, 37, 37, 37, 37, 59, 37, 38, + 38, 18, 18, 18, 18, 18, 18, 18, 18, 18, + 18, 18, 50, 50, 50, 50, 50, 50, 50, 50, + 50, 50, 50, 50, 50, 50, 51, 51, 51, 51, + 51, 51, 51, 51, 52, 52, 52, 52, 52, 53, + 53, 53, 53, 53, 53, 17, 17, 17, 17, 17, + 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, + 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, + 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, + 17, 17, 17, 17, 17, 17, 48, 48, 49, 49, + 49, 49, 49, 34, 34, 35, 35, 35, 44, 24, + 19, 20, 21, 22, 23, 36, 36, 36, 36, +}; +static short yylen[] = { 2, + 2, 4, 0, 0, 4, 0, 0, 2, 2, 2, + 1, 2, 3, 1, 1, 3, 3, 3, 3, 3, + 0, 2, 6, 7, 7, 0, 2, 8, 8, 10, + 9, 8, 11, 3, 0, 1, 0, 1, 1, 1, + 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, + 4, 1, 0, 6, 6, 0, 0, 0, 1, 0, + 1, 0, 2, 1, 2, 1, 1, 1, 3, 2, + 0, 7, 3, 3, 3, 1, 2, 3, 1, 3, + 5, 6, 3, 3, 5, 2, 4, 0, 5, 1, + 1, 5, 4, 5, 4, 5, 6, 5, 4, 5, + 4, 3, 3, 3, 3, 3, 3, 3, 3, 3, + 3, 3, 3, 3, 3, 3, 2, 2, 2, 2, + 2, 2, 2, 2, 3, 2, 4, 3, 5, 2, + 2, 4, 5, 4, 5, 1, 1, 1, 1, 5, + 2, 1, 2, 3, 2, 1, 1, 1, 1, 1, + 1, 6, 5, 4, 5, 1, 1, 3, 4, 3, + 1, 2, 2, 1, 2, 2, 2, 1, 3, 1, + 3, 4, 4, 6, 1, 1, 3, 2, 3, 2, + 1, 1, 1, 0, 1, 0, 1, 2, 1, 2, + 2, 2, 2, 2, 2, 1, 1, 1, 1, +}; +static short yydefred[] = { 4, + 0, 7, 0, 45, 58, 56, 0, 56, 56, 8, + 46, 9, 11, 48, 0, 47, 49, 50, 0, 0, + 0, 70, 71, 0, 14, 3, 175, 0, 0, 156, + 0, 170, 0, 57, 57, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 12, 0, 0, 0, 0, 0, 0, 0, 10, + 0, 0, 0, 0, 0, 148, 150, 0, 0, 0, + 0, 176, 142, 136, 137, 138, 139, 52, 0, 59, + 0, 69, 0, 0, 7, 196, 199, 198, 197, 0, + 0, 0, 0, 0, 0, 3, 3, 3, 3, 3, + 3, 0, 0, 0, 0, 0, 165, 0, 0, 0, + 0, 86, 0, 194, 0, 131, 0, 0, 0, 0, + 0, 0, 0, 181, 183, 182, 0, 190, 0, 0, + 0, 0, 0, 0, 0, 0, 126, 0, 0, 0, + 191, 192, 193, 195, 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, 121, + 122, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 13, 0, 51, 61, 0, 0, 0, 0, 84, + 0, 0, 88, 0, 0, 0, 0, 0, 0, 0, + 3, 169, 171, 0, 0, 0, 0, 0, 0, 0, + 128, 0, 160, 180, 0, 0, 177, 0, 0, 125, + 27, 0, 0, 19, 0, 0, 0, 0, 0, 73, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 90, 0, 0, 91, + 0, 0, 102, 0, 0, 0, 0, 0, 0, 0, + 158, 0, 0, 0, 0, 0, 0, 2, 0, 0, + 173, 0, 0, 0, 42, 0, 43, 0, 0, 0, + 0, 189, 0, 0, 36, 41, 0, 0, 0, 172, + 188, 87, 0, 132, 0, 134, 0, 127, 179, 65, + 0, 0, 0, 0, 99, 0, 0, 0, 0, 101, + 95, 0, 93, 0, 154, 0, 159, 63, 68, 67, + 55, 0, 54, 85, 0, 89, 129, 0, 0, 0, + 0, 0, 0, 0, 0, 81, 133, 135, 153, 0, + 0, 0, 100, 94, 0, 98, 96, 155, 92, 72, + 174, 6, 0, 0, 0, 0, 0, 0, 0, 0, + 152, 97, 82, 7, 28, 29, 0, 0, 24, 25, + 0, 32, 0, 0, 0, 22, 0, 0, 0, 31, + 5, 0, 30, 0, 0, 33, 0, 23, +}; +static short yydgoto[] = { 1, + 10, 11, 20, 104, 19, 2, 95, 374, 98, 363, + 3, 12, 13, 70, 379, 289, 72, 73, 74, 75, + 76, 77, 78, 79, 295, 81, 296, 285, 287, 290, + 298, 286, 288, 122, 216, 100, 82, 261, 89, 91, + 196, 331, 156, 293, 275, 227, 14, 83, 137, 84, + 85, 86, 87, 15, 16, 17, 18, 93, 282, +}; +static short yysindex[] = { 0, + 0, 0, -183, 0, 0, 0, -57, 0, 0, 0, + 0, 0, 0, 0, 820, 0, 0, 0, -222, -208, + 7, 0, 0, -208, 0, 0, 0, -31, -31, 0, + 32, 0, 2214, 0, 0, 33, 49, 56, 59, -30, + 2214, 63, 65, 66, 1005, 941, -31, 1150, 1269, -149, + 2214, -7, -31, 2214, 2214, 2214, 2214, 2214, 2214, 1329, + 1414, 0, 2214, 2214, -31, -31, -31, -31, -168, 0, + -121, 704, -16, -63, -59, 0, 0, -8, 80, 64, + 81, 0, 0, 0, 0, 0, 0, 0, -1, 0, + -134, 0, -125, -134, 0, 0, 0, 0, 0, 2214, + 95, 2214, 744, -1, -134, 0, 0, 0, 0, 0, + 0, 117, 704, 97, 1455, 941, 0, 744, 0, -63, + 81, 0, 2214, 0, 123, 0, 744, -14, 36, -52, + 2214, 744, 1563, 0, 0, 0, -132, 0, 81, -111, + -111, -111, -155, -155, 76, -37, 0, -66, -111, -111, + 0, 0, 0, 0, -1, 0, 2214, 2214, 2214, 2214, + 2214, 2214, 2214, 2214, 2214, 2214, 2214, 2214, 2214, 2214, + 2214, 2214, 2214, 2214, 2214, 2214, 2214, 2214, 2214, 0, + 0, -21, 2214, 1724, 2214, 2214, 2214, 2214, 2214, 2214, + 1797, 0, 2214, 0, 0, -120, -74, -120, 343, 0, + 2214, 27, 0, -120, 2214, 2214, 2214, 2214, 153, 1860, + 0, 0, 0, -25, 4, 156, 2214, 81, 1933, 2005, + 0, 73, 0, 0, 18, -51, 0, 2214, 110, 0, + 0, 228, 228, 0, 228, 228, 228, -92, -92, 0, + 1351, 744, 961, 375, 271, 704, 585, 1068, 1068, 646, + 1485, 394, 611, -111, -111, 2214, 0, 2141, 2214, 0, + 172, 101, 0, 21, -62, 133, -43, 137, 128, 140, + 0, 24, 704, -38, -45, 2214, -45, 0, 177, 2214, + 0, 2214, -1, 228, 0, 178, 0, 204, 228, 206, + 211, 0, 175, -121, 0, 0, 220, 169, 2214, 0, + 0, 0, 78, 0, 98, 0, 121, 0, 0, 0, + 186, 2214, 2214, 174, 0, 124, 191, 2214, 142, 0, + 0, 147, 0, 148, 0, 168, 0, 0, 0, 0, + 0, 235, 0, 0, 233, 0, 0, 179, 179, 179, + 179, 2214, 179, 2214, 260, 0, 0, 0, 0, 216, + 1035, 182, 0, 0, 270, 0, 0, 0, 0, 0, + 0, 0, -168, -168, -256, -256, 286, -168, 269, 179, + 0, 0, 0, 0, 0, 0, 179, 290, 0, 0, + 179, 0, 1860, -168, 352, 0, 2214, -168, 298, 0, + 0, 299, 0, 179, 179, 0, -256, 0, +}; +static short yyrindex[] = { 0, + 0, 0, 372, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 219, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + -19, 2283, 0, 0, 2402, 2567, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 91, 0, + -18, 1608, 2621, 2674, 2722, 0, 0, 2770, 2857, 0, + 118, 0, 0, 0, 0, 0, 0, 0, 0, 0, + -56, 0, 0, -56, 0, 0, 0, 0, 0, 2567, + 0, 0, 4275, 0, -114, 0, 0, 0, 0, 0, + 0, 0, 1887, 0, 0, 302, 0, 4340, 468, 533, + 3225, 0, 0, 0, 3006, 0, 4395, 2674, 0, 0, + 2567, 4405, 0, 0, 0, 0, 3056, 0, 3460, 3696, + 3747, 3802, 3583, 3631, 3128, 0, 0, 0, 3867, 3915, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 3176, 0, 0, -42, 0, -42, 881, 0, + 302, 0, 0, 230, 326, 0, 0, 0, 0, 310, + 0, 0, 0, 0, 340, 0, 0, 3511, 0, 0, + 0, 0, 0, 0, 0, 3292, 0, 0, 3347, 0, + 0, 17, 20, 0, 39, 45, 52, 1480, 1643, 0, + 2275, 4446, 4494, 4121, 4169, 2422, 0, 4698, 4746, 4631, + 4592, 4544, 4220, 4001, 4056, 0, 0, 0, 0, 0, + 3412, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 2475, -41, 0, 330, 0, 0, 0, 0, + 0, 2567, 0, 53, 0, 0, 0, 0, 354, 0, + 0, 0, 0, 54, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 302, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 337, 0, 0, 0, 0, 0, 0, + 1202, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 91, 91, 187, 187, 0, 91, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 370, 91, 881, 0, 0, 91, 0, 0, + 0, 0, 0, 0, 0, 0, 187, 0, +}; +static short yygindex[] = { 0, + 0, 0, 29, 378, 0, 0, -55, 0, 676, 567, + -94, 0, 0, 0, -355, -15, 2480, 0, 650, 364, + 380, 0, 0, 0, 412, 755, 0, 0, 291, -202, + 82, 120, 277, -88, -188, 534, 0, 0, 0, 465, + -58, 217, -247, 0, -135, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, +}; +#define YYTABLESIZE 5052 +static short yytable[] = { 71, + 199, 22, 60, 229, 65, 65, 222, 297, 60, 111, + 380, 200, 279, 329, 65, 300, 62, 64, 258, 377, + 378, 161, 15, 184, 161, 220, 230, 187, 65, 67, + 321, 189, 133, 130, 88, 198, 23, 24, 161, 161, + 15, 398, 223, 161, 146, 148, 204, 301, 90, 323, + 205, 206, 207, 208, 209, 210, 66, 18, 309, 186, + 39, 320, 277, 188, 327, 92, 60, 281, 283, 259, + 280, 102, 106, 161, 185, 18, 187, 26, 39, 16, + 62, 64, 4, 5, 6, 17, 7, 8, 107, 171, + 26, 26, 20, 38, 40, 108, 345, 16, 109, 214, + 215, 256, 114, 17, 115, 116, 183, 131, 186, 155, + 20, 38, 15, 9, 190, 375, 376, 225, 346, 191, + 382, 26, 192, 26, 193, 195, 26, 26, 26, 355, + 26, 197, 26, 26, 201, 26, 390, 212, 347, 367, + 393, 232, 233, 235, 236, 237, 238, 239, 240, 26, + 157, 158, 159, 160, 26, 299, 211, 161, 76, 319, + 221, 348, 219, 182, 353, 226, 228, 262, 264, 265, + 266, 267, 268, 269, 270, 272, 76, 274, 162, 163, + 164, 26, 276, 60, 392, 215, 21, 332, 65, 284, + 233, 322, 233, 336, 294, 324, 302, 308, 326, 21, + 312, 303, 179, 305, 307, 180, 181, 182, 310, 164, + 76, 318, 311, 26, 342, 26, 26, 334, 338, 21, + 325, 328, 21, 21, 21, 96, 21, 344, 21, 21, + 97, 21, 352, 162, 163, 164, 257, 162, 163, 164, + 314, 60, 316, 317, 339, 21, 340, 162, 163, 164, + 21, 341, 161, 161, 161, 161, 162, 163, 164, 161, + 343, 161, 162, 163, 164, 110, 356, 161, 161, 161, + 161, 357, 358, 361, 162, 163, 164, 21, 349, 385, + 161, 161, 161, 354, 161, 161, 161, 161, 161, 161, + 161, 161, 359, 360, 161, 171, 350, 161, 161, 161, + 370, 362, 215, 162, 163, 164, 372, 165, 371, 21, + 373, 21, 21, 166, 167, 168, 169, 162, 163, 164, + 162, 163, 164, 162, 163, 164, 381, 383, 284, 387, + 170, 172, 173, 174, 175, 176, 177, 178, 394, 395, + 179, 53, 186, 180, 181, 182, 26, 26, 26, 26, + 26, 26, 62, 26, 26, 26, 26, 26, 26, 26, + 26, 26, 26, 26, 26, 26, 37, 71, 35, 26, + 26, 1, 26, 26, 26, 26, 26, 162, 163, 164, + 187, 26, 26, 26, 26, 26, 26, 26, 184, 76, + 76, 76, 76, 26, 40, 37, 76, 162, 163, 164, + 162, 163, 164, 26, 44, 26, 26, 44, 44, 44, + 35, 44, 105, 44, 44, 135, 44, 76, 76, 76, + 162, 163, 164, 162, 163, 164, 80, 162, 163, 164, + 44, 136, 162, 163, 164, 44, 162, 163, 164, 162, + 163, 164, 21, 21, 21, 21, 21, 21, 234, 21, + 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, + 21, 21, 44, 369, 389, 21, 21, 278, 21, 21, + 21, 21, 21, 162, 163, 164, 391, 21, 21, 21, + 21, 21, 21, 21, 291, 162, 163, 164, 94, 21, + 162, 163, 164, 333, 44, 0, 0, 44, 0, 21, + 196, 21, 21, 196, 196, 196, 0, 196, 175, 196, + 196, 175, 196, 165, 0, 162, 163, 164, 0, 166, + 167, 168, 169, 0, 0, 175, 175, 162, 163, 164, + 175, 196, 0, 0, 0, 0, 170, 172, 173, 174, + 175, 176, 177, 178, 0, 0, 179, 0, 0, 180, + 181, 182, 0, 0, 0, 0, 0, 0, 196, 168, + 175, 0, 101, 0, 0, 197, 0, 0, 197, 197, + 197, 0, 197, 146, 197, 197, 146, 197, 0, 123, + 124, 178, 0, 0, 179, 0, 138, 180, 181, 182, + 146, 146, 0, 196, 0, 146, 197, 0, 151, 152, + 153, 154, 0, 0, 0, 0, 0, 0, 4, 5, + 6, 0, 7, 8, 0, 0, 0, 4, 5, 6, + 0, 7, 8, 0, 0, 146, 0, 44, 44, 44, + 44, 44, 44, 0, 44, 44, 44, 0, 0, 9, + 44, 0, 313, 44, 44, 44, 44, 171, 9, 217, + 44, 44, 0, 44, 44, 44, 44, 44, 197, 0, + 0, 0, 44, 44, 44, 44, 44, 44, 0, 0, + 0, 0, 0, 0, 44, 0, 0, 99, 99, 0, + 166, 167, 168, 169, 44, 178, 44, 44, 179, 112, + 69, 180, 181, 182, 0, 120, 99, 128, 0, 0, + 0, 134, 99, 177, 178, 0, 0, 179, 0, 0, + 180, 181, 182, 0, 99, 99, 99, 99, 0, 0, + 117, 0, 0, 126, 196, 196, 196, 196, 196, 0, + 196, 196, 196, 0, 0, 0, 196, 0, 0, 175, + 175, 175, 175, 0, 0, 0, 175, 196, 175, 196, + 196, 196, 196, 196, 175, 175, 175, 175, 196, 196, + 196, 196, 196, 196, 194, 120, 171, 175, 175, 175, + 196, 175, 175, 175, 175, 175, 175, 175, 175, 203, + 196, 175, 196, 196, 175, 175, 175, 0, 0, 197, + 197, 197, 197, 197, 0, 197, 197, 197, 0, 0, + 121, 197, 0, 0, 146, 146, 146, 146, 139, 0, + 0, 146, 197, 146, 197, 197, 197, 197, 197, 146, + 146, 146, 146, 197, 197, 197, 197, 197, 197, 0, + 231, 260, 146, 146, 146, 197, 146, 146, 146, 146, + 146, 146, 146, 146, 0, 197, 146, 197, 197, 146, + 146, 146, 55, 0, 121, 65, 67, 53, 292, 60, + 0, 68, 64, 0, 63, 165, 0, 0, 0, 0, + 0, 166, 167, 168, 169, 0, 0, 218, 62, 0, + 0, 0, 0, 66, 0, 121, 0, 0, 170, 172, + 173, 174, 175, 176, 177, 178, 0, 0, 179, 168, + 169, 180, 181, 182, 0, 364, 365, 366, 0, 368, + 61, 0, 0, 44, 0, 0, 44, 44, 44, 0, + 44, 178, 44, 44, 179, 44, 0, 180, 181, 182, + 0, 0, 166, 167, 168, 169, 384, 0, 0, 44, + 0, 0, 26, 386, 44, 56, 0, 388, 0, 0, + 330, 0, 330, 175, 176, 177, 178, 0, 337, 179, + 396, 397, 180, 181, 182, 0, 0, 0, 0, 0, + 0, 44, 0, 55, 0, 0, 65, 67, 53, 0, + 60, 0, 68, 64, 165, 63, 0, 0, 0, 0, + 166, 167, 168, 169, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 44, 66, 0, 44, 170, 172, 173, + 174, 175, 176, 177, 178, 0, 0, 179, 0, 0, + 180, 181, 182, 0, 0, 0, 0, 0, 0, 0, + 121, 61, 168, 169, 0, 0, 121, 55, 0, 0, + 65, 67, 53, 0, 60, 0, 68, 64, 0, 63, + 0, 0, 0, 177, 178, 0, 0, 179, 0, 0, + 180, 181, 182, 26, 0, 0, 56, 0, 66, 0, + 0, 0, 0, 0, 0, 25, 27, 28, 29, 30, + 31, 0, 32, 33, 34, 0, 0, 0, 35, 0, + 0, 36, 37, 38, 39, 61, 0, 171, 40, 41, + 0, 42, 43, 44, 45, 46, 0, 0, 0, 0, + 47, 48, 49, 50, 51, 52, 0, 0, 0, 0, + 0, 0, 54, 0, 0, 0, 0, 26, 0, 0, + 56, 0, 57, 0, 58, 59, 44, 44, 44, 44, + 44, 44, 0, 44, 44, 44, 0, 0, 0, 44, + 0, 0, 44, 44, 44, 44, 0, 0, 0, 44, + 44, 0, 44, 44, 44, 44, 44, 0, 0, 0, + 0, 44, 44, 44, 44, 44, 44, 0, 0, 0, + 0, 0, 55, 44, 0, 65, 67, 53, 0, 60, + 0, 68, 64, 44, 63, 44, 44, 119, 28, 29, + 30, 31, 97, 32, 33, 34, 0, 0, 0, 35, + 0, 0, 0, 66, 0, 0, 0, 0, 0, 0, + 41, 0, 42, 43, 44, 45, 46, 0, 0, 0, + 0, 47, 48, 49, 50, 51, 52, 0, 0, 0, + 61, 0, 140, 54, 0, 140, 0, 166, 0, 168, + 169, 0, 0, 57, 0, 58, 59, 0, 0, 140, + 140, 27, 28, 29, 30, 31, 0, 32, 33, 34, + 177, 178, 26, 35, 179, 56, 0, 180, 181, 182, + 0, 0, 0, 0, 41, 0, 42, 43, 44, 45, + 46, 0, 0, 0, 140, 47, 48, 49, 50, 51, + 52, 55, 0, 0, 65, 67, 53, 54, 60, 0, + 68, 64, 0, 63, 0, 165, 0, 57, 0, 58, + 59, 166, 167, 168, 169, 0, 0, 129, 0, 0, + 0, 0, 66, 0, 0, 0, 0, 0, 0, 172, + 173, 174, 175, 176, 177, 178, 0, 0, 179, 0, + 0, 180, 181, 182, 166, 167, 168, 169, 0, 61, + 0, 55, 0, 0, 65, 67, 53, 0, 60, 145, + 68, 64, 0, 63, 174, 175, 176, 177, 178, 0, + 0, 179, 0, 0, 180, 181, 182, 0, 0, 0, + 0, 0, 66, 0, 56, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 125, 28, 29, 30, + 31, 0, 32, 33, 34, 0, 0, 0, 35, 61, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 41, + 0, 42, 43, 44, 45, 46, 0, 0, 0, 0, + 47, 48, 49, 50, 51, 52, 55, 0, 0, 65, + 67, 53, 54, 60, 56, 68, 64, 0, 63, 0, + 0, 0, 57, 0, 58, 59, 0, 0, 0, 0, + 0, 0, 0, 140, 140, 140, 140, 66, 0, 0, + 140, 0, 0, 0, 0, 0, 0, 55, 0, 0, + 65, 67, 53, 0, 60, 213, 68, 64, 0, 63, + 0, 140, 140, 140, 61, 140, 147, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 66, 0, + 74, 0, 0, 74, 0, 27, 28, 29, 30, 31, + 0, 32, 33, 34, 0, 0, 0, 35, 74, 56, + 0, 0, 0, 0, 0, 61, 0, 0, 41, 0, + 42, 43, 44, 45, 46, 0, 0, 0, 0, 47, + 48, 49, 50, 51, 52, 0, 0, 0, 0, 0, + 0, 54, 74, 0, 0, 0, 0, 0, 0, 0, + 56, 57, 0, 58, 59, 27, 28, 29, 30, 31, + 0, 32, 33, 34, 0, 55, 0, 35, 65, 67, + 53, 0, 60, 224, 68, 64, 0, 63, 41, 0, + 42, 43, 44, 45, 46, 0, 0, 0, 0, 47, + 48, 49, 50, 51, 52, 0, 66, 0, 0, 0, + 0, 54, 0, 0, 0, 0, 0, 166, 167, 168, + 169, 57, 0, 58, 59, 0, 0, 0, 79, 0, + 0, 79, 0, 61, 0, 172, 173, 174, 175, 176, + 177, 178, 0, 0, 179, 79, 79, 180, 181, 182, + 27, 28, 29, 30, 31, 0, 32, 33, 34, 0, + 0, 0, 35, 75, 0, 0, 75, 0, 56, 0, + 0, 0, 0, 41, 0, 42, 43, 44, 45, 46, + 79, 75, 0, 0, 47, 48, 49, 50, 51, 52, + 0, 27, 28, 29, 30, 31, 54, 32, 33, 34, + 0, 0, 0, 35, 0, 0, 57, 0, 58, 59, + 0, 0, 0, 0, 41, 75, 42, 43, 44, 45, + 46, 0, 0, 0, 0, 47, 48, 49, 50, 51, + 52, 74, 74, 74, 74, 0, 55, 54, 74, 65, + 67, 53, 0, 60, 263, 68, 64, 57, 63, 58, + 59, 166, 167, 168, 169, 0, 0, 0, 0, 74, + 74, 0, 0, 0, 0, 0, 0, 66, 0, 0, + 0, 0, 0, 176, 177, 178, 0, 0, 179, 0, + 0, 180, 181, 182, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 61, 0, 0, 0, 0, 27, + 28, 29, 30, 31, 0, 32, 33, 34, 0, 55, + 0, 35, 65, 67, 53, 0, 60, 271, 68, 64, + 0, 63, 41, 0, 42, 43, 44, 45, 46, 56, + 0, 0, 0, 47, 48, 49, 50, 51, 52, 0, + 66, 0, 0, 0, 0, 54, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 57, 0, 58, 59, 79, + 79, 79, 79, 0, 0, 0, 79, 61, 0, 0, + 0, 0, 55, 0, 0, 65, 67, 53, 0, 60, + 0, 68, 64, 0, 63, 0, 0, 79, 79, 79, + 0, 0, 0, 0, 75, 75, 75, 75, 0, 0, + 0, 75, 56, 66, 0, 0, 0, 162, 0, 0, + 162, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 75, 75, 162, 162, 0, 0, 0, 0, + 61, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 55, 0, 0, 65, 67, + 53, 0, 60, 304, 68, 64, 0, 63, 0, 162, + 27, 28, 29, 30, 31, 56, 32, 33, 34, 0, + 0, 0, 35, 0, 0, 0, 66, 0, 0, 0, + 0, 0, 0, 41, 0, 42, 43, 44, 45, 46, + 0, 0, 0, 0, 47, 48, 49, 50, 51, 52, + 0, 0, 0, 61, 0, 0, 54, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 57, 55, 58, 59, + 65, 67, 53, 0, 60, 306, 68, 64, 0, 63, + 0, 0, 0, 27, 28, 29, 30, 31, 56, 32, + 33, 34, 0, 0, 0, 35, 0, 0, 66, 0, + 0, 0, 0, 0, 0, 0, 41, 0, 42, 43, + 44, 45, 46, 0, 0, 0, 0, 47, 48, 49, + 50, 51, 52, 0, 0, 61, 0, 0, 0, 54, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 57, + 0, 58, 59, 0, 0, 25, 27, 28, 29, 30, + 31, 0, 32, 33, 34, 0, 0, 0, 35, 0, + 56, 0, 0, 0, 0, 0, 0, 0, 0, 41, + 0, 42, 43, 44, 45, 46, 0, 0, 0, 0, + 47, 48, 49, 50, 51, 52, 0, 0, 162, 162, + 162, 162, 54, 0, 0, 162, 0, 0, 0, 0, + 0, 0, 57, 55, 58, 59, 65, 67, 53, 0, + 60, 315, 68, 64, 0, 63, 162, 162, 162, 27, + 28, 29, 30, 31, 0, 32, 33, 34, 0, 0, + 0, 35, 0, 0, 66, 0, 0, 0, 0, 0, + 0, 0, 41, 0, 42, 43, 44, 45, 46, 0, + 0, 0, 0, 47, 48, 49, 50, 51, 52, 0, + 0, 61, 0, 0, 0, 54, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 57, 55, 58, 59, 65, + 67, 53, 0, 60, 0, 68, 64, 0, 63, 0, + 0, 27, 28, 29, 30, 31, 56, 32, 33, 34, + 0, 0, 0, 35, 0, 0, 0, 66, 0, 0, + 0, 0, 0, 0, 41, 0, 42, 43, 44, 45, + 46, 0, 0, 0, 0, 47, 48, 49, 50, 51, + 52, 0, 0, 0, 61, 0, 0, 54, 0, 0, + 0, 0, 0, 0, 0, 112, 0, 57, 112, 58, + 59, 0, 0, 168, 0, 0, 168, 0, 0, 0, + 0, 0, 112, 112, 0, 0, 0, 112, 0, 56, + 168, 168, 0, 0, 0, 168, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 112, 0, 0, + 0, 0, 0, 0, 0, 168, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 27, 28, 29, + 30, 31, 0, 32, 33, 34, 0, 0, 0, 35, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 41, 0, 42, 43, 44, 45, 46, 0, 0, 0, + 0, 47, 48, 49, 50, 51, 52, 0, 0, 0, + 0, 0, 164, 54, 0, 164, 0, 0, 0, 0, + 0, 0, 0, 57, 0, 58, 59, 0, 0, 164, + 164, 0, 103, 0, 164, 103, 0, 0, 0, 0, + 27, 28, 29, 30, 31, 0, 32, 33, 34, 103, + 103, 0, 35, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 41, 164, 42, 43, 44, 45, 46, + 0, 0, 0, 0, 47, 48, 49, 50, 51, 52, + 0, 0, 103, 0, 103, 78, 54, 0, 78, 0, + 113, 0, 0, 0, 118, 0, 57, 127, 58, 59, + 132, 0, 78, 78, 140, 141, 142, 143, 144, 0, + 0, 0, 149, 150, 0, 0, 112, 112, 112, 112, + 0, 0, 0, 112, 168, 168, 168, 168, 0, 0, + 0, 168, 0, 168, 0, 0, 0, 78, 0, 168, + 168, 168, 168, 0, 112, 112, 112, 0, 112, 0, + 0, 202, 168, 168, 168, 0, 168, 168, 168, 168, + 168, 168, 168, 168, 0, 0, 168, 0, 0, 168, + 168, 168, 0, 0, 0, 0, 0, 184, 0, 0, + 184, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 184, 184, 0, 0, 0, 184, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 241, 242, 243, 244, 245, 246, + 247, 248, 249, 250, 251, 252, 253, 254, 255, 184, + 0, 151, 0, 0, 151, 0, 0, 0, 0, 0, + 0, 0, 273, 164, 164, 164, 164, 0, 151, 151, + 164, 0, 164, 151, 0, 0, 0, 0, 164, 164, + 164, 164, 0, 103, 103, 103, 103, 0, 0, 0, + 103, 164, 164, 164, 0, 164, 164, 164, 164, 164, + 164, 164, 164, 151, 146, 164, 0, 146, 164, 164, + 164, 103, 103, 103, 0, 0, 0, 0, 0, 0, + 0, 146, 146, 0, 0, 0, 146, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 78, 78, 78, 78, + 0, 0, 0, 78, 0, 0, 0, 0, 0, 335, + 0, 0, 149, 0, 0, 149, 146, 0, 0, 0, + 0, 0, 0, 0, 78, 78, 78, 0, 0, 149, + 149, 0, 0, 0, 149, 0, 0, 0, 0, 0, + 0, 0, 351, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 147, 0, 0, 147, 149, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 147, 147, 0, + 0, 0, 147, 0, 0, 0, 0, 0, 184, 184, + 184, 184, 0, 0, 0, 184, 0, 184, 0, 0, + 0, 0, 0, 184, 184, 184, 184, 0, 0, 0, + 0, 0, 147, 0, 0, 0, 184, 184, 184, 0, + 184, 184, 184, 184, 184, 184, 184, 184, 0, 0, + 184, 0, 0, 184, 184, 184, 0, 0, 0, 0, + 0, 0, 151, 151, 151, 151, 0, 157, 0, 151, + 157, 151, 0, 0, 0, 0, 0, 151, 151, 151, + 151, 0, 0, 0, 157, 157, 0, 0, 0, 157, + 151, 151, 151, 0, 151, 151, 151, 151, 151, 151, + 151, 151, 0, 0, 151, 0, 0, 151, 151, 151, + 0, 0, 0, 0, 0, 146, 146, 146, 146, 157, + 0, 0, 146, 0, 146, 0, 0, 0, 0, 0, + 146, 146, 146, 146, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 146, 146, 146, 0, 146, 146, 146, + 146, 146, 146, 146, 146, 0, 0, 146, 0, 0, + 146, 146, 146, 149, 149, 149, 149, 0, 0, 0, + 149, 0, 149, 0, 0, 0, 0, 0, 149, 149, + 149, 149, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 149, 149, 149, 0, 149, 149, 149, 149, 149, + 149, 149, 149, 0, 0, 149, 0, 0, 149, 149, + 149, 147, 147, 147, 147, 0, 175, 0, 147, 175, + 147, 0, 0, 0, 0, 0, 147, 147, 147, 147, + 0, 0, 0, 175, 175, 0, 0, 0, 175, 147, + 147, 147, 0, 147, 147, 147, 147, 147, 147, 147, + 147, 0, 0, 147, 0, 0, 147, 147, 147, 0, + 0, 0, 0, 0, 0, 0, 178, 0, 175, 178, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 178, 178, 0, 0, 0, 178, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 157, 157, + 157, 157, 0, 0, 0, 157, 0, 157, 0, 0, + 0, 0, 0, 157, 157, 157, 157, 0, 178, 0, + 0, 0, 0, 0, 0, 0, 157, 157, 157, 0, + 157, 157, 157, 157, 157, 157, 157, 157, 145, 0, + 157, 145, 0, 157, 157, 157, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 145, 145, 0, 0, 0, + 145, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 77, 0, 0, 77, + 145, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 77, 77, 0, 0, 0, 77, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 185, 0, 0, 77, 0, + 0, 0, 0, 0, 0, 0, 0, 175, 175, 175, + 175, 0, 185, 185, 175, 0, 175, 185, 0, 0, + 0, 0, 175, 175, 175, 175, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 175, 175, 175, 0, 175, + 175, 175, 175, 175, 175, 175, 175, 185, 0, 175, + 0, 0, 175, 175, 175, 0, 0, 178, 178, 178, + 178, 0, 66, 0, 178, 66, 178, 0, 0, 0, + 0, 0, 178, 178, 178, 178, 0, 0, 0, 66, + 66, 0, 0, 0, 66, 178, 178, 178, 0, 178, + 178, 178, 178, 178, 178, 178, 178, 0, 0, 178, + 0, 0, 178, 178, 178, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 66, 0, 0, 144, 0, 0, + 144, 0, 0, 0, 0, 0, 0, 0, 0, 145, + 145, 145, 145, 0, 144, 144, 145, 0, 145, 144, + 0, 0, 0, 0, 145, 145, 145, 145, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 145, 145, 145, + 0, 145, 145, 145, 145, 145, 145, 145, 145, 144, + 0, 145, 0, 0, 145, 145, 145, 77, 77, 77, + 77, 0, 83, 0, 77, 83, 77, 0, 0, 0, + 0, 0, 77, 77, 77, 77, 0, 0, 0, 83, + 83, 0, 0, 0, 83, 77, 77, 77, 0, 77, + 77, 77, 77, 77, 77, 77, 77, 0, 0, 77, + 0, 0, 77, 77, 77, 0, 185, 185, 185, 185, + 163, 0, 0, 185, 83, 185, 0, 0, 0, 0, + 0, 185, 185, 185, 185, 0, 0, 163, 163, 0, + 0, 0, 163, 0, 185, 185, 185, 0, 185, 185, + 185, 185, 185, 185, 185, 185, 0, 0, 185, 0, + 0, 185, 185, 185, 0, 0, 0, 0, 0, 0, + 0, 80, 163, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 66, 66, 66, 66, 0, 80, 80, + 66, 0, 66, 80, 0, 0, 0, 0, 66, 66, + 66, 66, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 66, 66, 66, 0, 66, 66, 66, 66, 66, + 66, 66, 66, 80, 0, 66, 0, 0, 66, 66, + 66, 0, 0, 0, 0, 0, 0, 0, 144, 144, + 144, 144, 0, 123, 0, 144, 123, 144, 0, 0, + 0, 0, 0, 144, 144, 144, 144, 0, 0, 0, + 123, 123, 0, 0, 0, 123, 144, 144, 144, 0, + 144, 144, 144, 144, 144, 144, 144, 144, 0, 0, + 144, 0, 0, 144, 144, 144, 0, 0, 0, 0, + 0, 124, 0, 0, 124, 123, 0, 0, 0, 0, + 0, 0, 0, 83, 83, 83, 83, 0, 124, 124, + 83, 0, 83, 124, 0, 0, 0, 0, 83, 83, + 83, 83, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 83, 83, 83, 0, 83, 83, 83, 83, 83, + 83, 83, 83, 124, 0, 83, 0, 0, 83, 83, + 83, 163, 163, 163, 163, 0, 119, 0, 163, 119, + 163, 0, 0, 0, 0, 0, 163, 163, 163, 163, + 0, 0, 0, 119, 119, 0, 0, 0, 119, 163, + 163, 163, 0, 163, 163, 163, 163, 163, 163, 163, + 163, 0, 0, 163, 0, 0, 163, 163, 163, 0, + 0, 0, 80, 80, 80, 80, 0, 120, 119, 80, + 120, 80, 0, 0, 0, 0, 0, 80, 80, 80, + 80, 0, 0, 0, 120, 120, 0, 0, 0, 120, + 80, 80, 80, 0, 80, 80, 80, 80, 80, 80, + 80, 80, 0, 0, 80, 0, 0, 80, 80, 80, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 120, + 0, 0, 141, 0, 0, 141, 0, 0, 0, 0, + 0, 0, 0, 0, 123, 123, 123, 123, 0, 141, + 141, 123, 0, 123, 141, 0, 0, 0, 0, 123, + 123, 123, 123, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 123, 123, 123, 0, 123, 123, 123, 123, + 123, 123, 123, 123, 141, 0, 123, 0, 0, 0, + 0, 0, 124, 124, 124, 124, 0, 117, 0, 124, + 117, 124, 0, 0, 0, 0, 0, 124, 124, 124, + 124, 0, 0, 0, 117, 117, 0, 0, 0, 117, + 124, 124, 124, 0, 124, 124, 124, 124, 124, 124, + 124, 124, 0, 0, 124, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 118, 0, 0, 118, 117, + 0, 0, 0, 0, 0, 0, 0, 119, 119, 119, + 119, 0, 118, 118, 119, 0, 119, 118, 0, 0, + 0, 0, 119, 119, 119, 119, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 119, 119, 119, 0, 119, + 119, 119, 119, 119, 119, 119, 119, 118, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 120, 120, + 120, 120, 0, 0, 0, 120, 0, 120, 0, 0, + 0, 0, 0, 120, 120, 120, 120, 0, 0, 0, + 0, 116, 0, 0, 116, 0, 120, 120, 120, 0, + 120, 120, 120, 120, 120, 120, 120, 120, 116, 116, + 0, 0, 0, 116, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 141, 141, 141, 141, 0, 0, 0, + 141, 0, 141, 0, 0, 0, 0, 0, 141, 141, + 141, 141, 0, 116, 0, 0, 104, 0, 0, 104, + 0, 141, 141, 141, 0, 141, 141, 141, 141, 141, + 141, 141, 141, 104, 104, 0, 0, 0, 104, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 117, 117, + 117, 117, 0, 0, 0, 117, 0, 117, 104, 0, + 0, 0, 0, 117, 117, 117, 117, 0, 0, 0, + 0, 105, 0, 0, 105, 0, 117, 117, 117, 0, + 117, 117, 117, 117, 117, 117, 117, 117, 105, 105, + 0, 0, 0, 105, 0, 0, 118, 118, 118, 118, + 0, 0, 0, 118, 0, 118, 0, 0, 0, 0, + 0, 118, 118, 118, 118, 0, 0, 0, 0, 106, + 0, 0, 106, 105, 118, 118, 118, 0, 118, 118, + 118, 118, 118, 118, 118, 118, 106, 106, 0, 0, + 0, 106, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 107, 106, 0, 107, 0, 0, 0, 0, 0, 0, + 0, 0, 116, 116, 116, 116, 0, 107, 107, 116, + 0, 116, 107, 0, 0, 0, 0, 116, 116, 116, + 116, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 116, 116, 116, 0, 116, 116, 116, 116, 116, 116, + 116, 116, 107, 0, 0, 167, 0, 0, 167, 0, + 0, 0, 0, 0, 0, 0, 0, 104, 104, 104, + 104, 0, 167, 167, 104, 0, 104, 167, 0, 0, + 0, 0, 104, 104, 104, 104, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 104, 104, 104, 0, 104, + 104, 104, 104, 104, 104, 104, 104, 167, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 166, 0, 0, 166, 0, 0, 0, 0, 0, 0, + 0, 0, 105, 105, 105, 105, 0, 166, 166, 105, + 0, 105, 166, 0, 0, 0, 0, 105, 105, 105, + 105, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 105, 105, 105, 0, 105, 105, 105, 105, 105, 105, + 105, 0, 166, 0, 0, 130, 0, 0, 130, 0, + 106, 106, 106, 106, 0, 143, 0, 106, 143, 106, + 0, 0, 130, 130, 0, 106, 106, 130, 106, 0, + 0, 0, 143, 143, 0, 0, 0, 143, 106, 106, + 106, 0, 106, 106, 106, 106, 106, 106, 106, 0, + 0, 0, 0, 0, 0, 0, 108, 130, 0, 108, + 0, 107, 107, 107, 107, 0, 0, 143, 107, 0, + 107, 0, 0, 108, 108, 0, 107, 107, 108, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 107, + 107, 107, 0, 107, 107, 107, 107, 107, 107, 107, + 0, 0, 0, 0, 109, 0, 0, 109, 108, 0, + 0, 0, 0, 0, 0, 0, 167, 167, 167, 167, + 0, 109, 109, 167, 0, 167, 109, 0, 0, 0, + 0, 167, 167, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 167, 167, 167, 0, 167, 167, + 167, 167, 167, 167, 110, 0, 109, 110, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 110, 110, 0, 0, 0, 110, 0, 0, 0, + 0, 166, 166, 166, 166, 0, 0, 0, 166, 0, + 166, 0, 0, 0, 0, 0, 166, 166, 0, 0, + 0, 0, 111, 0, 0, 111, 110, 0, 0, 166, + 166, 166, 0, 166, 166, 166, 166, 166, 166, 111, + 111, 0, 0, 0, 111, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 130, 130, 130, 130, + 0, 113, 0, 130, 113, 130, 143, 143, 143, 143, + 0, 130, 130, 143, 111, 143, 0, 0, 113, 113, + 0, 143, 143, 113, 130, 130, 130, 0, 130, 130, + 130, 130, 130, 130, 143, 143, 143, 0, 143, 143, + 143, 143, 143, 143, 0, 0, 0, 108, 108, 108, + 108, 0, 0, 113, 108, 0, 108, 0, 0, 0, + 0, 0, 0, 108, 0, 0, 0, 0, 114, 0, + 0, 114, 0, 0, 0, 108, 108, 108, 0, 108, + 108, 108, 108, 108, 108, 114, 114, 0, 0, 0, + 114, 0, 0, 0, 0, 109, 109, 109, 109, 0, + 0, 0, 109, 0, 109, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 115, 0, 0, 115, + 114, 0, 0, 109, 109, 109, 0, 109, 109, 109, + 109, 109, 109, 115, 115, 0, 0, 0, 115, 0, + 0, 0, 0, 0, 0, 110, 110, 110, 110, 0, + 0, 0, 110, 0, 110, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 115, 0, + 0, 0, 0, 110, 110, 110, 0, 110, 110, 110, + 110, 110, 110, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 111, 111, 111, 111, 0, 0, 0, + 111, 0, 111, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 111, 111, 111, 0, 111, 111, 111, 111, 111, + 0, 0, 113, 113, 113, 113, 0, 0, 0, 113, + 0, 113, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 113, 113, 113, 0, 113, 113, 113, 113, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 114, + 114, 114, 114, 0, 0, 0, 114, 0, 114, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 114, 114, 114, + 0, 114, 114, 114, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 115, 115, 115, + 115, 0, 0, 0, 115, 0, 115, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 115, 115, 115, 0, 115, + 115, 115, +}; +static short yycheck[] = { 15, + 95, 59, 59, 41, 36, 36, 59, 210, 123, 40, + 366, 100, 201, 59, 36, 41, 59, 59, 40, 276, + 277, 41, 41, 40, 44, 40, 93, 91, 36, 37, + 93, 91, 40, 49, 257, 94, 8, 9, 58, 59, + 59, 397, 131, 63, 60, 61, 105, 44, 257, 93, + 106, 107, 108, 109, 110, 111, 64, 41, 41, 123, + 41, 41, 198, 123, 41, 59, 123, 41, 204, 91, + 44, 40, 40, 93, 91, 59, 91, 123, 59, 41, + 123, 123, 266, 267, 268, 41, 270, 271, 40, 63, + 0, 123, 41, 41, 41, 40, 299, 59, 40, 115, + 116, 123, 40, 59, 40, 40, 123, 257, 123, 278, + 59, 59, 59, 297, 123, 363, 364, 133, 41, 40, + 368, 123, 59, 33, 44, 260, 36, 37, 38, 318, + 40, 257, 42, 43, 40, 45, 384, 41, 41, 342, + 388, 157, 158, 159, 160, 161, 162, 163, 164, 59, + 272, 273, 274, 275, 64, 211, 40, 279, 41, 59, + 125, 41, 40, 319, 41, 298, 91, 183, 184, 185, + 186, 187, 188, 189, 190, 191, 59, 298, 300, 301, + 302, 91, 257, 298, 387, 201, 0, 276, 36, 205, + 206, 59, 208, 282, 210, 59, 41, 125, 59, 257, + 91, 217, 314, 219, 220, 317, 318, 319, 260, 302, + 93, 40, 228, 123, 40, 125, 126, 41, 41, 33, + 93, 260, 36, 37, 38, 257, 40, 59, 42, 43, + 262, 45, 59, 300, 301, 302, 258, 300, 301, 302, + 256, 298, 258, 259, 41, 59, 41, 300, 301, 302, + 64, 41, 272, 273, 274, 275, 300, 301, 302, 279, + 41, 281, 300, 301, 302, 296, 125, 287, 288, 289, + 290, 125, 125, 41, 300, 301, 302, 91, 93, 374, + 300, 301, 302, 93, 304, 305, 306, 307, 308, 309, + 310, 311, 125, 59, 314, 63, 312, 317, 318, 319, + 41, 123, 318, 300, 301, 302, 125, 281, 93, 123, + 41, 125, 126, 287, 288, 289, 290, 300, 301, 302, + 300, 301, 302, 300, 301, 302, 41, 59, 344, 40, + 304, 305, 306, 307, 308, 309, 310, 311, 41, 41, + 314, 123, 41, 317, 318, 319, 256, 257, 258, 259, + 260, 261, 123, 263, 264, 265, 266, 267, 268, 269, + 270, 271, 272, 273, 274, 275, 41, 383, 59, 279, + 280, 0, 282, 283, 284, 285, 286, 300, 301, 302, + 41, 291, 292, 293, 294, 295, 296, 297, 59, 272, + 273, 274, 275, 303, 41, 59, 279, 300, 301, 302, + 300, 301, 302, 313, 33, 315, 316, 36, 37, 38, + 41, 40, 35, 42, 43, 52, 45, 300, 301, 302, + 300, 301, 302, 300, 301, 302, 15, 300, 301, 302, + 59, 52, 300, 301, 302, 64, 300, 301, 302, 300, + 301, 302, 256, 257, 258, 259, 260, 261, 158, 263, + 264, 265, 266, 267, 268, 269, 270, 271, 272, 273, + 274, 275, 91, 344, 383, 279, 280, 125, 282, 283, + 284, 285, 286, 300, 301, 302, 125, 291, 292, 293, + 294, 295, 296, 297, 208, 300, 301, 302, 24, 303, + 300, 301, 302, 277, 123, -1, -1, 126, -1, 313, + 33, 315, 316, 36, 37, 38, -1, 40, 41, 42, + 43, 44, 45, 281, -1, 300, 301, 302, -1, 287, + 288, 289, 290, -1, -1, 58, 59, 300, 301, 302, + 63, 64, -1, -1, -1, -1, 304, 305, 306, 307, + 308, 309, 310, 311, -1, -1, 314, -1, -1, 317, + 318, 319, -1, -1, -1, -1, -1, -1, 91, 289, + 93, -1, 29, -1, -1, 33, -1, -1, 36, 37, + 38, -1, 40, 41, 42, 43, 44, 45, -1, 46, + 47, 311, -1, -1, 314, -1, 53, 317, 318, 319, + 58, 59, -1, 126, -1, 63, 64, -1, 65, 66, + 67, 68, -1, -1, -1, -1, -1, -1, 266, 267, + 268, -1, 270, 271, -1, -1, -1, 266, 267, 268, + -1, 270, 271, -1, -1, 93, -1, 256, 257, 258, + 259, 260, 261, -1, 263, 264, 265, -1, -1, 297, + 269, -1, 58, 272, 273, 274, 275, 63, 297, 116, + 279, 280, -1, 282, 283, 284, 285, 286, 126, -1, + -1, -1, 291, 292, 293, 294, 295, 296, -1, -1, + -1, -1, -1, -1, 303, -1, -1, 28, 29, -1, + 287, 288, 289, 290, 313, 311, 315, 316, 314, 40, + 15, 317, 318, 319, -1, 46, 47, 48, -1, -1, + -1, 52, 53, 310, 311, -1, -1, 314, -1, -1, + 317, 318, 319, -1, 65, 66, 67, 68, -1, -1, + 45, -1, -1, 48, 257, 258, 259, 260, 261, -1, + 263, 264, 265, -1, -1, -1, 269, -1, -1, 272, + 273, 274, 275, -1, -1, -1, 279, 280, 281, 282, + 283, 284, 285, 286, 287, 288, 289, 290, 291, 292, + 293, 294, 295, 296, 89, 116, 63, 300, 301, 302, + 303, 304, 305, 306, 307, 308, 309, 310, 311, 104, + 313, 314, 315, 316, 317, 318, 319, -1, -1, 257, + 258, 259, 260, 261, -1, 263, 264, 265, -1, -1, + 46, 269, -1, -1, 272, 273, 274, 275, 54, -1, + -1, 279, 280, 281, 282, 283, 284, 285, 286, 287, + 288, 289, 290, 291, 292, 293, 294, 295, 296, -1, + 155, 182, 300, 301, 302, 303, 304, 305, 306, 307, + 308, 309, 310, 311, -1, 313, 314, 315, 316, 317, + 318, 319, 33, -1, 100, 36, 37, 38, 209, 40, + -1, 42, 43, -1, 45, 281, -1, -1, -1, -1, + -1, 287, 288, 289, 290, -1, -1, 123, 59, -1, + -1, -1, -1, 64, -1, 131, -1, -1, 304, 305, + 306, 307, 308, 309, 310, 311, -1, -1, 314, 289, + 290, 317, 318, 319, -1, 339, 340, 341, -1, 343, + 91, -1, -1, 33, -1, -1, 36, 37, 38, -1, + 40, 311, 42, 43, 314, 45, -1, 317, 318, 319, + -1, -1, 287, 288, 289, 290, 370, -1, -1, 59, + -1, -1, 123, 377, 64, 126, -1, 381, -1, -1, + 275, -1, 277, 308, 309, 310, 311, -1, 283, 314, + 394, 395, 317, 318, 319, -1, -1, -1, -1, -1, + -1, 91, -1, 33, -1, -1, 36, 37, 38, -1, + 40, -1, 42, 43, 281, 45, -1, -1, -1, -1, + 287, 288, 289, 290, -1, -1, -1, -1, -1, -1, + -1, -1, -1, 123, 64, -1, 126, 304, 305, 306, + 307, 308, 309, 310, 311, -1, -1, 314, -1, -1, + 317, 318, 319, -1, -1, -1, -1, -1, -1, -1, + 276, 91, 289, 290, -1, -1, 282, 33, -1, -1, + 36, 37, 38, -1, 40, -1, 42, 43, -1, 45, + -1, -1, -1, 310, 311, -1, -1, 314, -1, -1, + 317, 318, 319, 123, -1, -1, 126, -1, 64, -1, + -1, -1, -1, -1, -1, 256, 257, 258, 259, 260, + 261, -1, 263, 264, 265, -1, -1, -1, 269, -1, + -1, 272, 273, 274, 275, 91, -1, 63, 279, 280, + -1, 282, 283, 284, 285, 286, -1, -1, -1, -1, + 291, 292, 293, 294, 295, 296, -1, -1, -1, -1, + -1, -1, 303, -1, -1, -1, -1, 123, -1, -1, + 126, -1, 313, -1, 315, 316, 256, 257, 258, 259, + 260, 261, -1, 263, 264, 265, -1, -1, -1, 269, + -1, -1, 272, 273, 274, 275, -1, -1, -1, 279, + 280, -1, 282, 283, 284, 285, 286, -1, -1, -1, + -1, 291, 292, 293, 294, 295, 296, -1, -1, -1, + -1, -1, 33, 303, -1, 36, 37, 38, -1, 40, + -1, 42, 43, 313, 45, 315, 316, 257, 258, 259, + 260, 261, 262, 263, 264, 265, -1, -1, -1, 269, + -1, -1, -1, 64, -1, -1, -1, -1, -1, -1, + 280, -1, 282, 283, 284, 285, 286, -1, -1, -1, + -1, 291, 292, 293, 294, 295, 296, -1, -1, -1, + 91, -1, 41, 303, -1, 44, -1, 287, -1, 289, + 290, -1, -1, 313, -1, 315, 316, -1, -1, 58, + 59, 257, 258, 259, 260, 261, -1, 263, 264, 265, + 310, 311, 123, 269, 314, 126, -1, 317, 318, 319, + -1, -1, -1, -1, 280, -1, 282, 283, 284, 285, + 286, -1, -1, -1, 93, 291, 292, 293, 294, 295, + 296, 33, -1, -1, 36, 37, 38, 303, 40, -1, + 42, 43, -1, 45, -1, 281, -1, 313, -1, 315, + 316, 287, 288, 289, 290, -1, -1, 59, -1, -1, + -1, -1, 64, -1, -1, -1, -1, -1, -1, 305, + 306, 307, 308, 309, 310, 311, -1, -1, 314, -1, + -1, 317, 318, 319, 287, 288, 289, 290, -1, 91, + -1, 33, -1, -1, 36, 37, 38, -1, 40, 41, + 42, 43, -1, 45, 307, 308, 309, 310, 311, -1, + -1, 314, -1, -1, 317, 318, 319, -1, -1, -1, + -1, -1, 64, -1, 126, -1, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, 257, 258, 259, 260, + 261, -1, 263, 264, 265, -1, -1, -1, 269, 91, + -1, -1, -1, -1, -1, -1, -1, -1, -1, 280, + -1, 282, 283, 284, 285, 286, -1, -1, -1, -1, + 291, 292, 293, 294, 295, 296, 33, -1, -1, 36, + 37, 38, 303, 40, 126, 42, 43, -1, 45, -1, + -1, -1, 313, -1, 315, 316, -1, -1, -1, -1, + -1, -1, -1, 272, 273, 274, 275, 64, -1, -1, + 279, -1, -1, -1, -1, -1, -1, 33, -1, -1, + 36, 37, 38, -1, 40, 41, 42, 43, -1, 45, + -1, 300, 301, 302, 91, 304, 93, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, 64, -1, + 41, -1, -1, 44, -1, 257, 258, 259, 260, 261, + -1, 263, 264, 265, -1, -1, -1, 269, 59, 126, + -1, -1, -1, -1, -1, 91, -1, -1, 280, -1, + 282, 283, 284, 285, 286, -1, -1, -1, -1, 291, + 292, 293, 294, 295, 296, -1, -1, -1, -1, -1, + -1, 303, 93, -1, -1, -1, -1, -1, -1, -1, + 126, 313, -1, 315, 316, 257, 258, 259, 260, 261, + -1, 263, 264, 265, -1, 33, -1, 269, 36, 37, + 38, -1, 40, 41, 42, 43, -1, 45, 280, -1, + 282, 283, 284, 285, 286, -1, -1, -1, -1, 291, + 292, 293, 294, 295, 296, -1, 64, -1, -1, -1, + -1, 303, -1, -1, -1, -1, -1, 287, 288, 289, + 290, 313, -1, 315, 316, -1, -1, -1, 41, -1, + -1, 44, -1, 91, -1, 305, 306, 307, 308, 309, + 310, 311, -1, -1, 314, 58, 59, 317, 318, 319, + 257, 258, 259, 260, 261, -1, 263, 264, 265, -1, + -1, -1, 269, 41, -1, -1, 44, -1, 126, -1, + -1, -1, -1, 280, -1, 282, 283, 284, 285, 286, + 93, 59, -1, -1, 291, 292, 293, 294, 295, 296, + -1, 257, 258, 259, 260, 261, 303, 263, 264, 265, + -1, -1, -1, 269, -1, -1, 313, -1, 315, 316, + -1, -1, -1, -1, 280, 93, 282, 283, 284, 285, + 286, -1, -1, -1, -1, 291, 292, 293, 294, 295, + 296, 272, 273, 274, 275, -1, 33, 303, 279, 36, + 37, 38, -1, 40, 41, 42, 43, 313, 45, 315, + 316, 287, 288, 289, 290, -1, -1, -1, -1, 300, + 301, -1, -1, -1, -1, -1, -1, 64, -1, -1, + -1, -1, -1, 309, 310, 311, -1, -1, 314, -1, + -1, 317, 318, 319, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, 91, -1, -1, -1, -1, 257, + 258, 259, 260, 261, -1, 263, 264, 265, -1, 33, + -1, 269, 36, 37, 38, -1, 40, 41, 42, 43, + -1, 45, 280, -1, 282, 283, 284, 285, 286, 126, + -1, -1, -1, 291, 292, 293, 294, 295, 296, -1, + 64, -1, -1, -1, -1, 303, -1, -1, -1, -1, + -1, -1, -1, -1, -1, 313, -1, 315, 316, 272, + 273, 274, 275, -1, -1, -1, 279, 91, -1, -1, + -1, -1, 33, -1, -1, 36, 37, 38, -1, 40, + -1, 42, 43, -1, 45, -1, -1, 300, 301, 302, + -1, -1, -1, -1, 272, 273, 274, 275, -1, -1, + -1, 279, 126, 64, -1, -1, -1, 41, -1, -1, + 44, -1, -1, -1, -1, -1, -1, -1, -1, -1, + -1, -1, 300, 301, 58, 59, -1, -1, -1, -1, + 91, -1, -1, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, -1, 33, -1, -1, 36, 37, + 38, -1, 40, 41, 42, 43, -1, 45, -1, 93, + 257, 258, 259, 260, 261, 126, 263, 264, 265, -1, + -1, -1, 269, -1, -1, -1, 64, -1, -1, -1, + -1, -1, -1, 280, -1, 282, 283, 284, 285, 286, + -1, -1, -1, -1, 291, 292, 293, 294, 295, 296, + -1, -1, -1, 91, -1, -1, 303, -1, -1, -1, + -1, -1, -1, -1, -1, -1, 313, 33, 315, 316, + 36, 37, 38, -1, 40, 41, 42, 43, -1, 45, + -1, -1, -1, 257, 258, 259, 260, 261, 126, 263, + 264, 265, -1, -1, -1, 269, -1, -1, 64, -1, + -1, -1, -1, -1, -1, -1, 280, -1, 282, 283, + 284, 285, 286, -1, -1, -1, -1, 291, 292, 293, + 294, 295, 296, -1, -1, 91, -1, -1, -1, 303, + -1, -1, -1, -1, -1, -1, -1, -1, -1, 313, + -1, 315, 316, -1, -1, 256, 257, 258, 259, 260, + 261, -1, 263, 264, 265, -1, -1, -1, 269, -1, + 126, -1, -1, -1, -1, -1, -1, -1, -1, 280, + -1, 282, 283, 284, 285, 286, -1, -1, -1, -1, + 291, 292, 293, 294, 295, 296, -1, -1, 272, 273, + 274, 275, 303, -1, -1, 279, -1, -1, -1, -1, + -1, -1, 313, 33, 315, 316, 36, 37, 38, -1, + 40, 41, 42, 43, -1, 45, 300, 301, 302, 257, + 258, 259, 260, 261, -1, 263, 264, 265, -1, -1, + -1, 269, -1, -1, 64, -1, -1, -1, -1, -1, + -1, -1, 280, -1, 282, 283, 284, 285, 286, -1, + -1, -1, -1, 291, 292, 293, 294, 295, 296, -1, + -1, 91, -1, -1, -1, 303, -1, -1, -1, -1, + -1, -1, -1, -1, -1, 313, 33, 315, 316, 36, + 37, 38, -1, 40, -1, 42, 43, -1, 45, -1, + -1, 257, 258, 259, 260, 261, 126, 263, 264, 265, + -1, -1, -1, 269, -1, -1, -1, 64, -1, -1, + -1, -1, -1, -1, 280, -1, 282, 283, 284, 285, + 286, -1, -1, -1, -1, 291, 292, 293, 294, 295, + 296, -1, -1, -1, 91, -1, -1, 303, -1, -1, + -1, -1, -1, -1, -1, 41, -1, 313, 44, 315, + 316, -1, -1, 41, -1, -1, 44, -1, -1, -1, + -1, -1, 58, 59, -1, -1, -1, 63, -1, 126, + 58, 59, -1, -1, -1, 63, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, 93, -1, -1, + -1, -1, -1, -1, -1, 93, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, 257, 258, 259, + 260, 261, -1, 263, 264, 265, -1, -1, -1, 269, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + 280, -1, 282, 283, 284, 285, 286, -1, -1, -1, + -1, 291, 292, 293, 294, 295, 296, -1, -1, -1, + -1, -1, 41, 303, -1, 44, -1, -1, -1, -1, + -1, -1, -1, 313, -1, 315, 316, -1, -1, 58, + 59, -1, 41, -1, 63, 44, -1, -1, -1, -1, + 257, 258, 259, 260, 261, -1, 263, 264, 265, 58, + 59, -1, 269, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, 280, 93, 282, 283, 284, 285, 286, + -1, -1, -1, -1, 291, 292, 293, 294, 295, 296, + -1, -1, 33, -1, 93, 41, 303, -1, 44, -1, + 41, -1, -1, -1, 45, -1, 313, 48, 315, 316, + 51, -1, 58, 59, 55, 56, 57, 58, 59, -1, + -1, -1, 63, 64, -1, -1, 272, 273, 274, 275, + -1, -1, -1, 279, 272, 273, 274, 275, -1, -1, + -1, 279, -1, 281, -1, -1, -1, 93, -1, 287, + 288, 289, 290, -1, 300, 301, 302, -1, 304, -1, + -1, 102, 300, 301, 302, -1, 304, 305, 306, 307, + 308, 309, 310, 311, -1, -1, 314, -1, -1, 317, + 318, 319, -1, -1, -1, -1, -1, 41, -1, -1, + 44, -1, -1, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, 58, 59, -1, -1, -1, 63, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, 165, 166, 167, 168, 169, 170, + 171, 172, 173, 174, 175, 176, 177, 178, 179, 93, + -1, 41, -1, -1, 44, -1, -1, -1, -1, -1, + -1, -1, 193, 272, 273, 274, 275, -1, 58, 59, + 279, -1, 281, 63, -1, -1, -1, -1, 287, 288, + 289, 290, -1, 272, 273, 274, 275, -1, -1, -1, + 279, 300, 301, 302, -1, 304, 305, 306, 307, 308, + 309, 310, 311, 93, 41, 314, -1, 44, 317, 318, + 319, 300, 301, 302, -1, -1, -1, -1, -1, -1, + -1, 58, 59, -1, -1, -1, 63, -1, -1, -1, + -1, -1, -1, -1, -1, -1, 272, 273, 274, 275, + -1, -1, -1, 279, -1, -1, -1, -1, -1, 280, + -1, -1, 41, -1, -1, 44, 93, -1, -1, -1, + -1, -1, -1, -1, 300, 301, 302, -1, -1, 58, + 59, -1, -1, -1, 63, -1, -1, -1, -1, -1, + -1, -1, 313, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + 41, -1, -1, 44, 93, -1, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, 58, 59, -1, + -1, -1, 63, -1, -1, -1, -1, -1, 272, 273, + 274, 275, -1, -1, -1, 279, -1, 281, -1, -1, + -1, -1, -1, 287, 288, 289, 290, -1, -1, -1, + -1, -1, 93, -1, -1, -1, 300, 301, 302, -1, + 304, 305, 306, 307, 308, 309, 310, 311, -1, -1, + 314, -1, -1, 317, 318, 319, -1, -1, -1, -1, + -1, -1, 272, 273, 274, 275, -1, 41, -1, 279, + 44, 281, -1, -1, -1, -1, -1, 287, 288, 289, + 290, -1, -1, -1, 58, 59, -1, -1, -1, 63, + 300, 301, 302, -1, 304, 305, 306, 307, 308, 309, + 310, 311, -1, -1, 314, -1, -1, 317, 318, 319, + -1, -1, -1, -1, -1, 272, 273, 274, 275, 93, + -1, -1, 279, -1, 281, -1, -1, -1, -1, -1, + 287, 288, 289, 290, -1, -1, -1, -1, -1, -1, + -1, -1, -1, 300, 301, 302, -1, 304, 305, 306, + 307, 308, 309, 310, 311, -1, -1, 314, -1, -1, + 317, 318, 319, 272, 273, 274, 275, -1, -1, -1, + 279, -1, 281, -1, -1, -1, -1, -1, 287, 288, + 289, 290, -1, -1, -1, -1, -1, -1, -1, -1, + -1, 300, 301, 302, -1, 304, 305, 306, 307, 308, + 309, 310, 311, -1, -1, 314, -1, -1, 317, 318, + 319, 272, 273, 274, 275, -1, 41, -1, 279, 44, + 281, -1, -1, -1, -1, -1, 287, 288, 289, 290, + -1, -1, -1, 58, 59, -1, -1, -1, 63, 300, + 301, 302, -1, 304, 305, 306, 307, 308, 309, 310, + 311, -1, -1, 314, -1, -1, 317, 318, 319, -1, + -1, -1, -1, -1, -1, -1, 41, -1, 93, 44, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, 58, 59, -1, -1, -1, 63, -1, + -1, -1, -1, -1, -1, -1, -1, -1, 272, 273, + 274, 275, -1, -1, -1, 279, -1, 281, -1, -1, + -1, -1, -1, 287, 288, 289, 290, -1, 93, -1, + -1, -1, -1, -1, -1, -1, 300, 301, 302, -1, + 304, 305, 306, 307, 308, 309, 310, 311, 41, -1, + 314, 44, -1, 317, 318, 319, -1, -1, -1, -1, + -1, -1, -1, -1, -1, 58, 59, -1, -1, -1, + 63, -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, 41, -1, -1, 44, + 93, -1, -1, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, 58, 59, -1, -1, -1, 63, -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, 41, -1, -1, 93, -1, + -1, -1, -1, -1, -1, -1, -1, 272, 273, 274, + 275, -1, 58, 59, 279, -1, 281, 63, -1, -1, + -1, -1, 287, 288, 289, 290, -1, -1, -1, -1, + -1, -1, -1, -1, -1, 300, 301, 302, -1, 304, + 305, 306, 307, 308, 309, 310, 311, 93, -1, 314, + -1, -1, 317, 318, 319, -1, -1, 272, 273, 274, + 275, -1, 41, -1, 279, 44, 281, -1, -1, -1, + -1, -1, 287, 288, 289, 290, -1, -1, -1, 58, + 59, -1, -1, -1, 63, 300, 301, 302, -1, 304, + 305, 306, 307, 308, 309, 310, 311, -1, -1, 314, + -1, -1, 317, 318, 319, -1, -1, -1, -1, -1, + -1, -1, -1, -1, 93, -1, -1, 41, -1, -1, + 44, -1, -1, -1, -1, -1, -1, -1, -1, 272, + 273, 274, 275, -1, 58, 59, 279, -1, 281, 63, + -1, -1, -1, -1, 287, 288, 289, 290, -1, -1, + -1, -1, -1, -1, -1, -1, -1, 300, 301, 302, + -1, 304, 305, 306, 307, 308, 309, 310, 311, 93, + -1, 314, -1, -1, 317, 318, 319, 272, 273, 274, + 275, -1, 41, -1, 279, 44, 281, -1, -1, -1, + -1, -1, 287, 288, 289, 290, -1, -1, -1, 58, + 59, -1, -1, -1, 63, 300, 301, 302, -1, 304, + 305, 306, 307, 308, 309, 310, 311, -1, -1, 314, + -1, -1, 317, 318, 319, -1, 272, 273, 274, 275, + 41, -1, -1, 279, 93, 281, -1, -1, -1, -1, + -1, 287, 288, 289, 290, -1, -1, 58, 59, -1, + -1, -1, 63, -1, 300, 301, 302, -1, 304, 305, + 306, 307, 308, 309, 310, 311, -1, -1, 314, -1, + -1, 317, 318, 319, -1, -1, -1, -1, -1, -1, + -1, 41, 93, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, 272, 273, 274, 275, -1, 58, 59, + 279, -1, 281, 63, -1, -1, -1, -1, 287, 288, + 289, 290, -1, -1, -1, -1, -1, -1, -1, -1, + -1, 300, 301, 302, -1, 304, 305, 306, 307, 308, + 309, 310, 311, 93, -1, 314, -1, -1, 317, 318, + 319, -1, -1, -1, -1, -1, -1, -1, 272, 273, + 274, 275, -1, 41, -1, 279, 44, 281, -1, -1, + -1, -1, -1, 287, 288, 289, 290, -1, -1, -1, + 58, 59, -1, -1, -1, 63, 300, 301, 302, -1, + 304, 305, 306, 307, 308, 309, 310, 311, -1, -1, + 314, -1, -1, 317, 318, 319, -1, -1, -1, -1, + -1, 41, -1, -1, 44, 93, -1, -1, -1, -1, + -1, -1, -1, 272, 273, 274, 275, -1, 58, 59, + 279, -1, 281, 63, -1, -1, -1, -1, 287, 288, + 289, 290, -1, -1, -1, -1, -1, -1, -1, -1, + -1, 300, 301, 302, -1, 304, 305, 306, 307, 308, + 309, 310, 311, 93, -1, 314, -1, -1, 317, 318, + 319, 272, 273, 274, 275, -1, 41, -1, 279, 44, + 281, -1, -1, -1, -1, -1, 287, 288, 289, 290, + -1, -1, -1, 58, 59, -1, -1, -1, 63, 300, + 301, 302, -1, 304, 305, 306, 307, 308, 309, 310, + 311, -1, -1, 314, -1, -1, 317, 318, 319, -1, + -1, -1, 272, 273, 274, 275, -1, 41, 93, 279, + 44, 281, -1, -1, -1, -1, -1, 287, 288, 289, + 290, -1, -1, -1, 58, 59, -1, -1, -1, 63, + 300, 301, 302, -1, 304, 305, 306, 307, 308, 309, + 310, 311, -1, -1, 314, -1, -1, 317, 318, 319, + -1, -1, -1, -1, -1, -1, -1, -1, -1, 93, + -1, -1, 41, -1, -1, 44, -1, -1, -1, -1, + -1, -1, -1, -1, 272, 273, 274, 275, -1, 58, + 59, 279, -1, 281, 63, -1, -1, -1, -1, 287, + 288, 289, 290, -1, -1, -1, -1, -1, -1, -1, + -1, -1, 300, 301, 302, -1, 304, 305, 306, 307, + 308, 309, 310, 311, 93, -1, 314, -1, -1, -1, + -1, -1, 272, 273, 274, 275, -1, 41, -1, 279, + 44, 281, -1, -1, -1, -1, -1, 287, 288, 289, + 290, -1, -1, -1, 58, 59, -1, -1, -1, 63, + 300, 301, 302, -1, 304, 305, 306, 307, 308, 309, + 310, 311, -1, -1, 314, -1, -1, -1, -1, -1, + -1, -1, -1, -1, -1, 41, -1, -1, 44, 93, + -1, -1, -1, -1, -1, -1, -1, 272, 273, 274, + 275, -1, 58, 59, 279, -1, 281, 63, -1, -1, + -1, -1, 287, 288, 289, 290, -1, -1, -1, -1, + -1, -1, -1, -1, -1, 300, 301, 302, -1, 304, + 305, 306, 307, 308, 309, 310, 311, 93, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, 272, 273, + 274, 275, -1, -1, -1, 279, -1, 281, -1, -1, + -1, -1, -1, 287, 288, 289, 290, -1, -1, -1, + -1, 41, -1, -1, 44, -1, 300, 301, 302, -1, + 304, 305, 306, 307, 308, 309, 310, 311, 58, 59, + -1, -1, -1, 63, -1, -1, -1, -1, -1, -1, + -1, -1, -1, 272, 273, 274, 275, -1, -1, -1, + 279, -1, 281, -1, -1, -1, -1, -1, 287, 288, + 289, 290, -1, 93, -1, -1, 41, -1, -1, 44, + -1, 300, 301, 302, -1, 304, 305, 306, 307, 308, + 309, 310, 311, 58, 59, -1, -1, -1, 63, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, 272, 273, + 274, 275, -1, -1, -1, 279, -1, 281, 93, -1, + -1, -1, -1, 287, 288, 289, 290, -1, -1, -1, + -1, 41, -1, -1, 44, -1, 300, 301, 302, -1, + 304, 305, 306, 307, 308, 309, 310, 311, 58, 59, + -1, -1, -1, 63, -1, -1, 272, 273, 274, 275, + -1, -1, -1, 279, -1, 281, -1, -1, -1, -1, + -1, 287, 288, 289, 290, -1, -1, -1, -1, 41, + -1, -1, 44, 93, 300, 301, 302, -1, 304, 305, + 306, 307, 308, 309, 310, 311, 58, 59, -1, -1, + -1, 63, -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, + 41, 93, -1, 44, -1, -1, -1, -1, -1, -1, + -1, -1, 272, 273, 274, 275, -1, 58, 59, 279, + -1, 281, 63, -1, -1, -1, -1, 287, 288, 289, + 290, -1, -1, -1, -1, -1, -1, -1, -1, -1, + 300, 301, 302, -1, 304, 305, 306, 307, 308, 309, + 310, 311, 93, -1, -1, 41, -1, -1, 44, -1, + -1, -1, -1, -1, -1, -1, -1, 272, 273, 274, + 275, -1, 58, 59, 279, -1, 281, 63, -1, -1, + -1, -1, 287, 288, 289, 290, -1, -1, -1, -1, + -1, -1, -1, -1, -1, 300, 301, 302, -1, 304, + 305, 306, 307, 308, 309, 310, 311, 93, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + 41, -1, -1, 44, -1, -1, -1, -1, -1, -1, + -1, -1, 272, 273, 274, 275, -1, 58, 59, 279, + -1, 281, 63, -1, -1, -1, -1, 287, 288, 289, + 290, -1, -1, -1, -1, -1, -1, -1, -1, -1, + 300, 301, 302, -1, 304, 305, 306, 307, 308, 309, + 310, -1, 93, -1, -1, 41, -1, -1, 44, -1, + 272, 273, 274, 275, -1, 41, -1, 279, 44, 281, + -1, -1, 58, 59, -1, 287, 288, 63, 290, -1, + -1, -1, 58, 59, -1, -1, -1, 63, 300, 301, + 302, -1, 304, 305, 306, 307, 308, 309, 310, -1, + -1, -1, -1, -1, -1, -1, 41, 93, -1, 44, + -1, 272, 273, 274, 275, -1, -1, 93, 279, -1, + 281, -1, -1, 58, 59, -1, 287, 288, 63, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, 300, + 301, 302, -1, 304, 305, 306, 307, 308, 309, 310, + -1, -1, -1, -1, 41, -1, -1, 44, 93, -1, + -1, -1, -1, -1, -1, -1, 272, 273, 274, 275, + -1, 58, 59, 279, -1, 281, 63, -1, -1, -1, + -1, 287, 288, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, 300, 301, 302, -1, 304, 305, + 306, 307, 308, 309, 41, -1, 93, 44, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + -1, 58, 59, -1, -1, -1, 63, -1, -1, -1, + -1, 272, 273, 274, 275, -1, -1, -1, 279, -1, + 281, -1, -1, -1, -1, -1, 287, 288, -1, -1, + -1, -1, 41, -1, -1, 44, 93, -1, -1, 300, + 301, 302, -1, 304, 305, 306, 307, 308, 309, 58, + 59, -1, -1, -1, 63, -1, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, 272, 273, 274, 275, + -1, 41, -1, 279, 44, 281, 272, 273, 274, 275, + -1, 287, 288, 279, 93, 281, -1, -1, 58, 59, + -1, 287, 288, 63, 300, 301, 302, -1, 304, 305, + 306, 307, 308, 309, 300, 301, 302, -1, 304, 305, + 306, 307, 308, 309, -1, -1, -1, 272, 273, 274, + 275, -1, -1, 93, 279, -1, 281, -1, -1, -1, + -1, -1, -1, 288, -1, -1, -1, -1, 41, -1, + -1, 44, -1, -1, -1, 300, 301, 302, -1, 304, + 305, 306, 307, 308, 309, 58, 59, -1, -1, -1, + 63, -1, -1, -1, -1, 272, 273, 274, 275, -1, + -1, -1, 279, -1, 281, -1, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, 41, -1, -1, 44, + 93, -1, -1, 300, 301, 302, -1, 304, 305, 306, + 307, 308, 309, 58, 59, -1, -1, -1, 63, -1, + -1, -1, -1, -1, -1, 272, 273, 274, 275, -1, + -1, -1, 279, -1, 281, -1, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, 93, -1, + -1, -1, -1, 300, 301, 302, -1, 304, 305, 306, + 307, 308, 309, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, 272, 273, 274, 275, -1, -1, -1, + 279, -1, 281, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + -1, 300, 301, 302, -1, 304, 305, 306, 307, 308, + -1, -1, 272, 273, 274, 275, -1, -1, -1, 279, + -1, 281, -1, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + 300, 301, 302, -1, 304, 305, 306, 307, -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, 272, + 273, 274, 275, -1, -1, -1, 279, -1, 281, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, 300, 301, 302, + -1, 304, 305, 306, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, 272, 273, 274, + 275, -1, -1, -1, 279, -1, 281, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, -1, 300, 301, 302, -1, 304, + 305, 306, +}; +#define YYFINAL 1 #ifndef YYDEBUG -# define YYDEBUG 0 /* don't allow debugging */ +#define YYDEBUG 0 #endif - +#define YYMAXTOKEN 319 #if YYDEBUG - -yytoktype yytoks[] = -{ - "{", 123, - ")", 41, - "WORD", 257, - "METHOD", 258, - "THING", 259, - "PMFUNC", 260, - "LABEL", 261, - "FORMAT", 262, - "SUB", 263, - "PACKAGE", 264, - "WHILE", 265, - "UNTIL", 266, - "IF", 267, - "UNLESS", 268, - "ELSE", 269, - "ELSIF", 270, - "CONTINUE", 271, - "FOR", 272, - "LOOPEX", 273, - "DOTDOT", 274, - "FUNC0", 275, - "FUNC1", 276, - "FUNC", 277, - "RELOP", 278, - "EQOP", 279, - "MULOP", 280, - "ADDOP", 281, - "DOLSHARP", 282, - "DO", 283, - "LOCAL", 284, - "DELETE", 285, - "HASHBRACK", 286, - "LSTOP", 287, - ",", 44, - "=", 61, - "?", 63, - ":", 58, - "OROR", 288, - "ANDAND", 289, - "BITOROP", 290, - "BITANDOP", 291, - "UNIOP", 292, - "SHIFTOP", 293, - "MATCHOP", 294, - "ARROW", 295, - "!", 33, - "~", 126, - "UMINUS", 296, - "REFGEN", 297, - "POWOP", 298, - "PREINC", 299, - "PREDEC", 300, - "POSTINC", 301, - "POSTDEC", 302, - "(", 40, - "-unknown-", -1 /* ends search */ +static char *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,0,0,0,0,"WORD","METHOD","FUNCMETH","THING", +"PMFUNC","PRIVATEREF","FUNC0SUB","UNIOPSUB","LSTOPSUB","LABEL","FORMAT","SUB", +"ANONSUB","PACKAGE","USE","WHILE","UNTIL","IF","UNLESS","ELSE","ELSIF", +"CONTINUE","FOR","LOOPEX","DOTDOT","FUNC0","FUNC1","FUNC","UNIOP","LSTOP", +"RELOP","EQOP","MULOP","ADDOP","DOLSHARP","DO","HASHBRACK","NOAMP","LOCAL","MY", +"MYSUB","COLONATTR","PREC_LOW","OROP","DOROP","ANDOP","NOTOP","ASSIGNOP","OROR", +"DORDOR","ANDAND","BITOROP","BITANDOP","SHIFTOP","MATCHOP","UMINUS","REFGEN", +"POWOP","PREINC","PREDEC","POSTINC","POSTDEC","ARROW", }; - -char * yyreds[] = -{ - "-no such reduction-", - "prog : /* empty */", - "prog : lineseq", - "block : '{' remember lineseq '}'", - "remember : /* empty */", - "lineseq : /* empty */", - "lineseq : lineseq decl", - "lineseq : lineseq line", - "line : label cond", - "line : loop", - "line : label ';'", - "line : label sideff ';'", - "sideff : error", - "sideff : expr", - "sideff : expr IF expr", - "sideff : expr UNLESS expr", - "sideff : expr WHILE expr", - "sideff : expr UNTIL expr", - "else : /* empty */", - "else : ELSE block", - "else : ELSIF '(' expr ')' block else", - "cond : IF '(' expr ')' block else", - "cond : UNLESS '(' expr ')' block else", - "cond : IF block block else", - "cond : UNLESS block block else", - "cont : /* empty */", - "cont : CONTINUE block", - "loop : label WHILE '(' texpr ')' block cont", - "loop : label UNTIL '(' expr ')' block cont", - "loop : label WHILE block block cont", - "loop : label UNTIL block block cont", - "loop : label FOR scalar '(' expr crp block cont", - "loop : label FOR '(' expr crp block cont", - "loop : label FOR '(' nexpr ';' texpr ';' nexpr ')' block", - "loop : label block cont", - "nexpr : /* empty */", - "nexpr : sideff", - "texpr : /* empty */", - "texpr : expr", - "label : /* empty */", - "label : LABEL", - "decl : format", - "decl : subrout", - "decl : package", - "format : FORMAT WORD block", - "format : FORMAT block", - "subrout : SUB WORD block", - "package : PACKAGE WORD ';'", - "expr : expr ',' sexpr", - "expr : sexpr", - "listop : LSTOP indirob listexpr", - "listop : FUNC '(' indirob listexpr ')'", - "listop : indirob ARROW LSTOP listexpr", - "listop : indirob ARROW FUNC '(' listexpr ')'", - "listop : term ARROW METHOD '(' listexpr ')'", - "listop : METHOD indirob listexpr", - "listop : LSTOP listexpr", - "listop : FUNC '(' listexpr ')'", - "sexpr : sexpr '=' sexpr", - "sexpr : sexpr POWOP '=' sexpr", - "sexpr : sexpr MULOP '=' sexpr", - "sexpr : sexpr ADDOP '=' sexpr", - "sexpr : sexpr SHIFTOP '=' sexpr", - "sexpr : sexpr BITANDOP '=' sexpr", - "sexpr : sexpr BITOROP '=' sexpr", - "sexpr : sexpr ANDAND '=' sexpr", - "sexpr : sexpr OROR '=' sexpr", - "sexpr : sexpr POWOP sexpr", - "sexpr : sexpr MULOP sexpr", - "sexpr : sexpr ADDOP sexpr", - "sexpr : sexpr SHIFTOP sexpr", - "sexpr : sexpr RELOP sexpr", - "sexpr : sexpr EQOP sexpr", - "sexpr : sexpr BITANDOP sexpr", - "sexpr : sexpr BITOROP sexpr", - "sexpr : sexpr DOTDOT sexpr", - "sexpr : sexpr ANDAND sexpr", - "sexpr : sexpr OROR sexpr", - "sexpr : sexpr '?' sexpr ':' sexpr", - "sexpr : sexpr MATCHOP sexpr", - "sexpr : term", - "term : '-' term", - "term : '+' term", - "term : '!' term", - "term : '~' term", - "term : REFGEN term", - "term : term POSTINC", - "term : term POSTDEC", - "term : PREINC term", - "term : PREDEC term", - "term : LOCAL sexpr", - "term : '(' expr crp", - "term : '(' ')'", - "term : '[' expr crb", - "term : '[' ']'", - "term : HASHBRACK expr crhb", - "term : HASHBRACK ';' '}'", - "term : scalar", - "term : star", - "term : scalar '[' expr ']'", - "term : term ARROW '[' expr ']'", - "term : hsh", - "term : ary", - "term : arylen", - "term : scalar '{' expr ';' '}'", - "term : term ARROW '{' expr ';' '}'", - "term : '(' expr crp '[' expr ']'", - "term : '(' ')' '[' expr ']'", - "term : ary '[' expr ']'", - "term : ary '{' expr ';' '}'", - "term : DELETE scalar '{' expr ';' '}'", - "term : DELETE '(' scalar '{' expr ';' '}' ')'", - "term : THING", - "term : amper", - "term : amper '(' ')'", - "term : amper '(' expr crp", - "term : DO sexpr", - "term : DO block", - "term : DO WORD '(' ')'", - "term : DO WORD '(' expr crp", - "term : DO scalar '(' ')'", - "term : DO scalar '(' expr crp", - "term : LOOPEX", - "term : LOOPEX WORD", - "term : UNIOP", - "term : UNIOP block", - "term : UNIOP sexpr", - "term : FUNC0", - "term : FUNC0 '(' ')'", - "term : FUNC1 '(' ')'", - "term : FUNC1 '(' expr ')'", - "term : PMFUNC '(' sexpr ')'", - "term : PMFUNC '(' sexpr ',' sexpr ')'", - "term : WORD", - "term : listop", - "listexpr : /* empty */", - "listexpr : expr", - "amper : '&' indirob", - "scalar : '$' indirob", - "ary : '@' indirob", - "hsh : '%' indirob", - "arylen : DOLSHARP indirob", - "star : '*' indirob", - "indirob : WORD", - "indirob : scalar", - "indirob : block", - "crp : ',' ')'", - "crp : ')'", - "crb : ',' ']'", - "crb : ']'", - "crhb : ',' ';' '}'", - "crhb : ';' '}'", +static char *yyrule[] = { +"$accept : prog", +"prog : progstart lineseq", +"block : '{' remember lineseq '}'", +"remember :", +"progstart :", +"mblock : '{' mremember lineseq '}'", +"mremember :", +"lineseq :", +"lineseq : lineseq decl", +"lineseq : lineseq line", +"line : label cond", +"line : loop", +"line : label ';'", +"line : label sideff ';'", +"sideff : error", +"sideff : expr", +"sideff : expr IF expr", +"sideff : expr UNLESS expr", +"sideff : expr WHILE expr", +"sideff : expr UNTIL iexpr", +"sideff : expr FOR expr", +"else :", +"else : ELSE mblock", +"else : ELSIF '(' mexpr ')' mblock else", +"cond : IF '(' remember mexpr ')' mblock else", +"cond : UNLESS '(' remember miexpr ')' mblock else", +"cont :", +"cont : CONTINUE block", +"loop : label WHILE '(' remember mtexpr ')' mblock cont", +"loop : label UNTIL '(' remember miexpr ')' mblock cont", +"loop : label FOR MY remember my_scalar '(' mexpr ')' mblock cont", +"loop : label FOR scalar '(' remember mexpr ')' mblock cont", +"loop : label FOR '(' remember mexpr ')' mblock cont", +"loop : label FOR '(' remember mnexpr ';' mtexpr ';' mnexpr ')' mblock", +"loop : label block cont", +"nexpr :", +"nexpr : sideff", +"texpr :", +"texpr : expr", +"iexpr : expr", +"mexpr : expr", +"mnexpr : nexpr", +"mtexpr : texpr", +"miexpr : iexpr", +"label :", +"label : LABEL", +"decl : format", +"decl : subrout", +"decl : mysubrout", +"decl : package", +"decl : use", +"format : FORMAT startformsub formname block", +"formname : WORD", +"formname :", +"mysubrout : MYSUB startsub subname proto subattrlist subbody", +"subrout : SUB startsub subname proto subattrlist subbody", +"startsub :", +"startanonsub :", +"startformsub :", +"subname : WORD", +"proto :", +"proto : THING", +"subattrlist :", +"subattrlist : COLONATTR THING", +"subattrlist : COLONATTR", +"myattrlist : COLONATTR THING", +"myattrlist : COLONATTR", +"subbody : block", +"subbody : ';'", +"package : PACKAGE WORD ';'", +"package : PACKAGE ';'", +"$$1 :", +"use : USE startsub $$1 WORD WORD listexpr ';'", +"expr : expr ANDOP expr", +"expr : expr OROP expr", +"expr : expr DOROP expr", +"expr : argexpr", +"argexpr : argexpr ','", +"argexpr : argexpr ',' term", +"argexpr : term", +"listop : LSTOP indirob argexpr", +"listop : FUNC '(' indirob expr ')'", +"listop : term ARROW method '(' listexprcom ')'", +"listop : term ARROW method", +"listop : METHOD indirob listexpr", +"listop : FUNCMETH indirob '(' listexprcom ')'", +"listop : LSTOP listexpr", +"listop : FUNC '(' listexprcom ')'", +"$$2 :", +"listop : LSTOPSUB startanonsub block $$2 listexpr", +"method : METHOD", +"method : scalar", +"subscripted : star '{' expr ';' '}'", +"subscripted : scalar '[' expr ']'", +"subscripted : term ARROW '[' expr ']'", +"subscripted : subscripted '[' expr ']'", +"subscripted : scalar '{' expr ';' '}'", +"subscripted : term ARROW '{' expr ';' '}'", +"subscripted : subscripted '{' expr ';' '}'", +"subscripted : term ARROW '(' ')'", +"subscripted : term ARROW '(' expr ')'", +"subscripted : subscripted '(' expr ')'", +"subscripted : subscripted '(' ')'", +"termbinop : term ASSIGNOP term", +"termbinop : term POWOP term", +"termbinop : term MULOP term", +"termbinop : term ADDOP term", +"termbinop : term SHIFTOP term", +"termbinop : term RELOP term", +"termbinop : term EQOP term", +"termbinop : term BITANDOP term", +"termbinop : term BITOROP term", +"termbinop : term DOTDOT term", +"termbinop : term ANDAND term", +"termbinop : term OROR term", +"termbinop : term DORDOR term", +"termbinop : term MATCHOP term", +"termunop : '-' term", +"termunop : '+' term", +"termunop : '!' term", +"termunop : '~' term", +"termunop : term POSTINC", +"termunop : term POSTDEC", +"termunop : PREINC term", +"termunop : PREDEC term", +"anonymous : '[' expr ']'", +"anonymous : '[' ']'", +"anonymous : HASHBRACK expr ';' '}'", +"anonymous : HASHBRACK ';' '}'", +"anonymous : ANONSUB startanonsub proto subattrlist block", +"termdo : DO term", +"termdo : DO block", +"termdo : DO WORD '(' ')'", +"termdo : DO WORD '(' expr ')'", +"termdo : DO scalar '(' ')'", +"termdo : DO scalar '(' expr ')'", +"term : termbinop", +"term : termunop", +"term : anonymous", +"term : termdo", +"term : term '?' term ':' term", +"term : REFGEN term", +"term : myattrterm", +"term : LOCAL term", +"term : '(' expr ')'", +"term : '(' ')'", +"term : scalar", +"term : star", +"term : hsh", +"term : ary", +"term : arylen", +"term : subscripted", +"term : '(' expr ')' '[' expr ']'", +"term : '(' ')' '[' expr ']'", +"term : ary '[' expr ']'", +"term : ary '{' expr ';' '}'", +"term : THING", +"term : amper", +"term : amper '(' ')'", +"term : amper '(' expr ')'", +"term : NOAMP WORD listexpr", +"term : LOOPEX", +"term : LOOPEX term", +"term : NOTOP argexpr", +"term : UNIOP", +"term : UNIOP block", +"term : UNIOP term", +"term : UNIOPSUB term", +"term : FUNC0", +"term : FUNC0 '(' ')'", +"term : FUNC0SUB", +"term : FUNC1 '(' ')'", +"term : FUNC1 '(' expr ')'", +"term : PMFUNC '(' term ')'", +"term : PMFUNC '(' term ',' term ')'", +"term : WORD", +"term : listop", +"myattrterm : MY myterm myattrlist", +"myattrterm : MY myterm", +"myterm : '(' expr ')'", +"myterm : '(' ')'", +"myterm : scalar", +"myterm : hsh", +"myterm : ary", +"listexpr :", +"listexpr : argexpr", +"listexprcom :", +"listexprcom : expr", +"listexprcom : expr ','", +"my_scalar : scalar", +"amper : '&' indirob", +"scalar : '$' indirob", +"ary : '@' indirob", +"hsh : '%' indirob", +"arylen : DOLSHARP indirob", +"star : '*' indirob", +"indirob : WORD", +"indirob : scalar", +"indirob : block", +"indirob : PRIVATEREF", }; -#endif /* YYDEBUG */ -#line 1 "/usr/lib/yaccpar" -/* @(#)yaccpar 1.10 89/04/04 SMI; from S5R3 1.10 */ - -/* -** Skeleton parser driver for yacc output -*/ - -/* -** yacc user known macros and defines -*/ -#define YYERROR goto yyerrlab -#define YYACCEPT { free(yys); free(yyv); return(0); } -#define YYABORT { free(yys); free(yyv); return(1); } -#define YYBACKUP( newtoken, newvalue )\ -{\ - if ( yychar >= 0 || ( yyr2[ yytmp ] >> 1 ) != 1 )\ - {\ - yyerror( "syntax error - cannot backup" );\ - goto yyerrlab;\ - }\ - yychar = newtoken;\ - yystate = *yyps;\ - yylval = newvalue;\ - goto yynewstate;\ -} -#define YYRECOVERING() (!!yyerrflag) -#ifndef YYDEBUG -# define YYDEBUG 1 /* make debugging available */ #endif +#define yyclearin (yychar=(-1)) +#define yyerrok (yyerrflag=0) +#ifdef YYSTACKSIZE +#ifndef YYMAXDEPTH +#define YYMAXDEPTH YYSTACKSIZE +#endif +#else +#ifdef YYMAXDEPTH +#define YYSTACKSIZE YYMAXDEPTH +#else +#define YYSTACKSIZE 500 +#define YYMAXDEPTH 500 +#endif +#endif +#line 797 "perly.y" + /* PROGRAM */ -/* -** user known globals -*/ -int yydebug; /* set to 1 to get debugging */ - -/* -** driver internal defines -*/ -#define YYFLAG (-1000) - -/* -** static variables used by the parser -*/ -static YYSTYPE *yyv; /* value stack */ -static int *yys; /* state stack */ - -static YYSTYPE *yypv; /* top of value stack */ -static int *yyps; /* top of state stack */ - -static int yystate; /* current state */ -static int yytmp; /* extra var (lasts between blocks) */ - -int yynerrs; /* number of errors */ - -int yyerrflag; /* error recovery flag */ -int yychar; /* current input token number */ +/* more stuff added to make perly_c.diff easier to apply */ +#ifdef yyparse +#undef yyparse +#endif +#define yyparse() Perl_yyparse(pTHX) -/* -** yyparse - return 0 if worked, 1 if syntax error not recovered from -*/ +#line 1509 "perly.c" +#define YYABORT goto yyabort +#define YYACCEPT goto yyaccept +#define YYERROR goto yyerrlab int yyparse() { - register YYSTYPE *yypvt; /* top of value stack for $vars */ - unsigned yymaxdepth = YYMAXDEPTH; + register int yym, yyn, yystate; + register short *yyssp; + register YYSTYPE *yyvsp; + short* yyss; + YYSTYPE* yyvs; + unsigned yystacksize = YYSTACKSIZE; + int retval = 0; +#if YYDEBUG + register char *yys; +#endif - /* - ** Initialize externals - yyparse may be called more than once - */ - yyv = (YYSTYPE*)malloc(yymaxdepth*sizeof(YYSTYPE)); - yys = (int*)malloc(yymaxdepth*sizeof(int)); - if (!yyv || !yys) - { - yyerror( "out of memory" ); - return(1); - } - yypv = &yyv[-1]; - yyps = &yys[-1]; - yystate = 0; - yytmp = 0; - yynerrs = 0; - yyerrflag = 0; - yychar = -1; + struct ysv *ysave; +#ifdef USE_ITHREADS + ENTER; /* force yydestruct() before we return */ +#endif + New(73, ysave, 1, struct ysv); + SAVEDESTRUCTOR_X(yydestruct, ysave); + ysave->oldyydebug = yydebug; + ysave->oldyynerrs = yynerrs; + ysave->oldyyerrflag = yyerrflag; + ysave->oldyychar = yychar; + ysave->oldyyval = yyval; + ysave->oldyylval = yylval; - goto yystack; - { - register YYSTYPE *yy_pv; /* top of value stack */ - register int *yy_ps; /* top of state stack */ - register int yy_state; /* current state */ - register int yy_n; /* internal state number info */ +#if YYDEBUG + if ((yys = getenv("YYDEBUG"))) + { + yyn = *yys; + if (yyn >= '0' && yyn <= '9') + yydebug = yyn - '0'; + } +#endif - /* - ** get globals into registers. - ** branch to here only if YYBACKUP was called. - */ - yynewstate: - yy_pv = yypv; - yy_ps = yyps; - yy_state = yystate; - goto yy_newstate; + yynerrs = 0; + yyerrflag = 0; + yychar = (-1); - /* - ** get globals into registers. - ** either we just started, or we just finished a reduction - */ - yystack: - yy_pv = yypv; - yy_ps = yyps; - yy_state = yystate; + /* + ** Initialize private stacks (yyparse may be called from an action) + */ + New(73, yyss, yystacksize, short); + New(73, yyvs, yystacksize, YYSTYPE); + ysave->yyss = yyss; + ysave->yyvs = yyvs; + if (!yyvs || !yyss) + goto yyoverflow; - /* - ** top of for (;;) loop while no reductions done - */ - yy_stack: - /* - ** put a state and value onto the stacks - */ -#if YYDEBUG - /* - ** if debugging, look up token value in list of value vs. - ** name pairs. 0 and negative (-1) are special values. - ** Note: linear search is used since time is not a real - ** consideration while debugging. - */ - if ( yydebug ) - { - register int yy_i; + yyssp = yyss; + yyvsp = yyvs; + *yyssp = yystate = 0; - (void)printf( "State %d, token ", yy_state ); - if ( yychar == 0 ) - (void)printf( "end-of-file\n" ); - else if ( yychar < 0 ) - (void)printf( "-none-\n" ); - else - { - for ( yy_i = 0; yytoks[yy_i].t_val >= 0; - yy_i++ ) - { - if ( yytoks[yy_i].t_val == yychar ) - break; - } - (void)printf( "%s\n", yytoks[yy_i].t_name ); - } - } -#endif /* YYDEBUG */ - if ( ++yy_ps >= &yys[ yymaxdepth ] ) /* room on stack? */ - { - /* - ** reallocate and recover. Note that pointers - ** have to be reset, or bad things will happen - */ - int yyps_index = (yy_ps - yys); - int yypv_index = (yy_pv - yyv); - int yypvt_index = (yypvt - yyv); - yymaxdepth += YYMAXDEPTH; - yyv = (YYSTYPE*)realloc((char*)yyv, - yymaxdepth * sizeof(YYSTYPE)); - yys = (int*)realloc((char*)yys, - yymaxdepth * sizeof(int)); - if (!yyv || !yys) - { - yyerror( "yacc stack overflow" ); - return(1); - } - yy_ps = yys + yyps_index; - yy_pv = yyv + yypv_index; - yypvt = yyv + yypvt_index; - } - *yy_ps = yy_state; - *++yy_pv = yyval; - - /* - ** we have a new state - find out what to do - */ - yy_newstate: - if ( ( yy_n = yypact[ yy_state ] ) <= YYFLAG ) - goto yydefault; /* simple state */ +yyloop: + if ((yyn = yydefred[yystate])) goto yyreduce; + if (yychar < 0) + { + if ((yychar = yylex()) < 0) yychar = 0; #if YYDEBUG - /* - ** if debugging, need to mark whether new token grabbed - */ - yytmp = yychar < 0; + if (yydebug) + { + yys = 0; + if (yychar <= YYMAXTOKEN) yys = yyname[yychar]; + if (!yys) yys = "illegal-symbol"; + PerlIO_printf(Perl_debug_log, "yydebug: state %d, reading %d (%s)\n", yystate, + yychar, yys); + } #endif - if ( ( yychar < 0 ) && ( ( yychar = yylex() ) < 0 ) ) - yychar = 0; /* reached EOF */ + } + if ((yyn = yysindex[yystate]) && (yyn += yychar) >= 0 && + yyn <= YYTABLESIZE && yycheck[yyn] == yychar) + { #if YYDEBUG - if ( yydebug && yytmp ) - { - register int yy_i; - - (void)printf( " *** Received token " ); - if ( yychar == 0 ) - (void)printf( "end-of-file\n" ); - else if ( yychar < 0 ) - (void)printf( "-none-\n" ); - else - { - for ( yy_i = 0; yytoks[yy_i].t_val >= 0; - yy_i++ ) - { - if ( yytoks[yy_i].t_val == yychar ) - break; - } - (void)printf( "%s\n", yytoks[yy_i].t_name ); - } - } -#endif /* YYDEBUG */ - if ( ( ( yy_n += yychar ) < 0 ) || ( yy_n >= YYLAST ) ) - goto yydefault; - if ( yychk[ yy_n = yyact[ yy_n ] ] == yychar ) /*valid shift*/ - { - yychar = -1; - yyval = yylval; - yy_state = yy_n; - if ( yyerrflag > 0 ) - yyerrflag--; - goto yy_stack; - } + if (yydebug) + PerlIO_printf(Perl_debug_log, "yydebug: state %d, shifting to state %d\n", + yystate, yytable[yyn]); +#endif + if (yyssp >= yyss + yystacksize - 1) + { + /* + ** reallocate and recover. Note that pointers + ** have to be reset, or bad things will happen + */ + int yyps_index = (yyssp - yyss); + int yypv_index = (yyvsp - yyvs); + yystacksize += YYSTACKSIZE; + ysave->yyvs = Renew(yyvs, yystacksize, YYSTYPE); + ysave->yyss = Renew(yyss, yystacksize, short); + if (!yyvs || !yyss) + goto yyoverflow; + yyssp = yyss + yyps_index; + yyvsp = yyvs + yypv_index; + } + *++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; +#ifdef lint - yydefault: - if ( ( yy_n = yydef[ yy_state ] ) == -2 ) - { -#if YYDEBUG - yytmp = yychar < 0; #endif - if ( ( yychar < 0 ) && ( ( yychar = yylex() ) < 0 ) ) - yychar = 0; /* reached EOF */ -#if YYDEBUG - if ( yydebug && yytmp ) - { - register int yy_i; - (void)printf( " *** Received token " ); - if ( yychar == 0 ) - (void)printf( "end-of-file\n" ); - else if ( yychar < 0 ) - (void)printf( "-none-\n" ); - else - { - for ( yy_i = 0; - yytoks[yy_i].t_val >= 0; - yy_i++ ) - { - if ( yytoks[yy_i].t_val - == yychar ) - { - break; - } - } - (void)printf( "%s\n", yytoks[yy_i].t_name ); - } - } -#endif /* YYDEBUG */ - /* - ** look through exception table - */ - { - register int *yyxi = yyexca; + yyerror("syntax error"); +#ifdef lint - while ( ( *yyxi != -1 ) || - ( yyxi[1] != yy_state ) ) - { - yyxi += 2; - } - while ( ( *(yyxi += 2) >= 0 ) && - ( *yyxi != yychar ) ) - ; - if ( ( yy_n = yyxi[1] ) < 0 ) - YYACCEPT; - } - } +#endif - /* - ** check for syntax error - */ - if ( yy_n == 0 ) /* have an error */ - { - /* no worry about speed here! */ - switch ( yyerrflag ) - { - case 0: /* new error */ - yyerror( "syntax error" ); - goto skip_init; - yyerrlab: - /* - ** get globals into registers. - ** we have a user generated syntax type error - */ - yy_pv = yypv; - yy_ps = yyps; - yy_state = yystate; - yynerrs++; - skip_init: - case 1: - case 2: /* incompletely recovered error */ - /* try again... */ - yyerrflag = 3; - /* - ** find state where "error" is a legal - ** shift action - */ - while ( yy_ps >= yys ) - { - yy_n = yypact[ *yy_ps ] + YYERRCODE; - if ( yy_n >= 0 && yy_n < YYLAST && - yychk[yyact[yy_n]] == YYERRCODE) { - /* - ** simulate shift of "error" - */ - yy_state = yyact[ yy_n ]; - goto yy_stack; - } - /* - ** current state has no shift on - ** "error", pop stack - */ + ++yynerrs; +yyinrecovery: + if (yyerrflag < 3) + { + yyerrflag = 3; + for (;;) + { + if ((yyn = yysindex[*yyssp]) && (yyn += YYERRCODE) >= 0 && + yyn <= YYTABLESIZE && yycheck[yyn] == YYERRCODE) + { #if YYDEBUG -# define _POP_ "Error recovery pops state %d, uncovers state %d\n" - if ( yydebug ) - (void)printf( _POP_, *yy_ps, - yy_ps[-1] ); -# undef _POP_ + if (yydebug) + PerlIO_printf(Perl_debug_log, "yydebug: state %d, error recovery shifting\ + to state %d\n", *yyssp, yytable[yyn]); #endif - yy_ps--; - yy_pv--; - } - /* - ** there is no state on stack with "error" as - ** a valid shift. give up. - */ - YYABORT; - case 3: /* no shift yet; eat a token */ + if (yyssp >= yyss + yystacksize - 1) + { + /* + ** reallocate and recover. Note that pointers + ** have to be reset, or bad things will happen + */ + int yyps_index = (yyssp - yyss); + int yypv_index = (yyvsp - yyvs); + yystacksize += YYSTACKSIZE; + ysave->yyvs = Renew(yyvs, yystacksize, YYSTYPE); + ysave->yyss = Renew(yyss, yystacksize, short); + if (!yyvs || !yyss) + goto yyoverflow; + yyssp = yyss + yyps_index; + yyvsp = yyvs + yypv_index; + } + *++yyssp = yystate = yytable[yyn]; + *++yyvsp = yylval; + goto yyloop; + } + else + { #if YYDEBUG - /* - ** if debugging, look up token in list of - ** pairs. 0 and negative shouldn't occur, - ** but since timing doesn't matter when - ** debugging, it doesn't hurt to leave the - ** tests here. - */ - if ( yydebug ) - { - register int yy_i; - - (void)printf( "Error recovery discards " ); - if ( yychar == 0 ) - (void)printf( "token end-of-file\n" ); - else if ( yychar < 0 ) - (void)printf( "token -none-\n" ); - else - { - for ( yy_i = 0; - yytoks[yy_i].t_val >= 0; - yy_i++ ) - { - if ( yytoks[yy_i].t_val - == yychar ) - { - break; - } - } - (void)printf( "token %s\n", - yytoks[yy_i].t_name ); - } - } -#endif /* YYDEBUG */ - if ( yychar == 0 ) /* reached EOF. quit */ - YYABORT; - yychar = -1; - goto yy_newstate; - } - }/* end if ( yy_n == 0 ) */ - /* - ** reduction by production yy_n - ** put stack tops, etc. so things right after switch - */ + if (yydebug) + PerlIO_printf(Perl_debug_log, "yydebug: error recovery discarding state %d\n", + *yyssp); +#endif + if (yyssp <= yyss) goto yyabort; + --yyssp; + --yyvsp; + } + } + } + else + { + if (yychar == 0) goto yyabort; #if YYDEBUG - /* - ** if debugging, print the string that is the user's - ** specification of the reduction which is just about - ** to be done. - */ - if ( yydebug ) - (void)printf( "Reduce by (%d) \"%s\"\n", - yy_n, yyreds[ yy_n ] ); + if (yydebug) + { + yys = 0; + if (yychar <= YYMAXTOKEN) yys = yyname[yychar]; + if (!yys) yys = "illegal-symbol"; + PerlIO_printf(Perl_debug_log, "yydebug: state %d, error recovery discards token %d (%s)\n", + yystate, yychar, yys); + } #endif - yytmp = yy_n; /* value to switch over */ - yypvt = yy_pv; /* $vars top of value stack */ - /* - ** Look in goto table for next state - ** Sorry about using yy_state here as temporary - ** register variable, but why not, if it works... - ** If yyr2[ yy_n ] doesn't have the low order bit - ** set, then there is no action to be done for - ** this reduction. So, no saving & unsaving of - ** registers done. The only difference between the - ** code just after the if and the body of the if is - ** the goto yy_stack in the body. This way the test - ** can be made before the choice of what to do is needed. - */ - { - /* length of production doubled with extra bit */ - register int yy_len = yyr2[ yy_n ]; - - if ( !( yy_len & 01 ) ) - { - yy_len >>= 1; - yyval = ( yy_pv -= yy_len )[1]; /* $$ = $1 */ - yy_state = yypgo[ yy_n = yyr1[ yy_n ] ] + - *( yy_ps -= yy_len ) + 1; - if ( yy_state >= YYLAST || - yychk[ yy_state = - yyact[ yy_state ] ] != -yy_n ) - { - yy_state = yyact[ yypgo[ yy_n ] ]; - } - goto yy_stack; - } - yy_len >>= 1; - yyval = ( yy_pv -= yy_len )[1]; /* $$ = $1 */ - yy_state = yypgo[ yy_n = yyr1[ yy_n ] ] + - *( yy_ps -= yy_len ) + 1; - if ( yy_state >= YYLAST || - yychk[ yy_state = yyact[ yy_state ] ] != -yy_n ) - { - yy_state = yyact[ yypgo[ yy_n ] ]; - } - } - /* save until reenter driver code */ - yystate = yy_state; - yyps = yy_ps; - yypv = yy_pv; - } - /* - ** code supplied by user is placed in this switch - */ - switch( yytmp ) - { - -case 1: -# line 100 "perly.y" -{ -#if defined(YYDEBUG) && defined(DEBUGGING) - yydebug = (debug & 1); + yychar = (-1); + goto yyloop; + } +yyreduce: +#if YYDEBUG + if (yydebug) + PerlIO_printf(Perl_debug_log, "yydebug: state %d, reducing by rule %d (%s)\n", + yystate, yyn, yyrule[yyn]); #endif - expect = XBLOCK; - } break; + yym = yylen[yyn]; + yyval = yyvsp[1-yym]; + switch (yyn) + { +case 1: +#line 131 "perly.y" +{ yyval.ival = yyvsp[-1].ival; newPROG(block_end(yyvsp[-1].ival,yyvsp[0].opval)); } +break; case 2: -# line 107 "perly.y" -{ if (in_eval) { - eval_root = newUNOP(OP_LEAVEEVAL, 0, yypvt[-0].opval); - eval_start = linklist(eval_root); - eval_root->op_next = 0; - peep(eval_start); - } - else - main_root = block_head(scalar(yypvt[-0].opval), &main_start); - } break; +#line 136 "perly.y" +{ if (PL_copline > (line_t)yyvsp[-3].ival) + PL_copline = (line_t)yyvsp[-3].ival; + yyval.opval = block_end(yyvsp[-2].ival, yyvsp[-1].opval); } +break; case 3: -# line 119 "perly.y" -{ yyval.opval = scalarseq(yypvt[-1].opval); - if (copline > (line_t)yypvt[-3].ival) - copline = yypvt[-3].ival; - if (savestack_ix > yypvt[-2].ival) - leave_scope(yypvt[-2].ival); - expect = XBLOCK; } break; +#line 142 "perly.y" +{ yyval.ival = block_start(TRUE); } +break; case 4: -# line 128 "perly.y" -{ yyval.ival = savestack_ix; } break; +#line 146 "perly.y" +{ +#if defined(YYDEBUG) && defined(DEBUGGING) + yydebug = (DEBUG_p_TEST); +#endif + PL_expect = XSTATE; yyval.ival = block_start(TRUE); + } +break; case 5: -# line 132 "perly.y" -{ yyval.opval = Nullop; } break; +#line 156 "perly.y" +{ if (PL_copline > (line_t)yyvsp[-3].ival) + PL_copline = (line_t)yyvsp[-3].ival; + yyval.opval = block_end(yyvsp[-2].ival, yyvsp[-1].opval); } +break; case 6: -# line 134 "perly.y" -{ yyval.opval = yypvt[-1].opval; } break; +#line 162 "perly.y" +{ yyval.ival = block_start(FALSE); } +break; case 7: -# line 136 "perly.y" -{ yyval.opval = append_list(OP_LINESEQ, yypvt[-1].opval, yypvt[-0].opval); pad_reset(); } break; +#line 167 "perly.y" +{ yyval.opval = Nullop; } +break; case 8: -# line 140 "perly.y" -{ yyval.opval = newSTATEOP(0, yypvt[-1].pval, yypvt[-0].opval); } break; +#line 169 "perly.y" +{ yyval.opval = yyvsp[-1].opval; } +break; +case 9: +#line 171 "perly.y" +{ yyval.opval = append_list(OP_LINESEQ, + (LISTOP*)yyvsp[-1].opval, (LISTOP*)yyvsp[0].opval); + PL_pad_reset_pending = TRUE; + if (yyvsp[-1].opval && yyvsp[0].opval) PL_hints |= HINT_BLOCK_SCOPE; } +break; case 10: -# line 143 "perly.y" -{ if (yypvt[-1].pval != Nullch) { - yyval.opval = newSTATEOP(0, yypvt[-1].pval, newOP(OP_NULL, 0)); +#line 179 "perly.y" +{ yyval.opval = newSTATEOP(0, yyvsp[-1].pval, yyvsp[0].opval); } +break; +case 12: +#line 182 "perly.y" +{ if (yyvsp[-1].pval != Nullch) { + yyval.opval = newSTATEOP(0, yyvsp[-1].pval, newOP(OP_NULL, 0)); } else { yyval.opval = Nullop; - copline = NOLINE; + PL_copline = NOLINE; } - expect = XBLOCK; } break; -case 11: -# line 152 "perly.y" -{ yyval.opval = newSTATEOP(0, yypvt[-2].pval, yypvt[-1].opval); - expect = XBLOCK; } break; -case 12: -# line 157 "perly.y" -{ yyval.opval = Nullop; } break; + PL_expect = XSTATE; } +break; case 13: -# line 159 "perly.y" -{ yyval.opval = yypvt[-0].opval; } break; +#line 191 "perly.y" +{ yyval.opval = newSTATEOP(0, yyvsp[-2].pval, yyvsp[-1].opval); + PL_expect = XSTATE; } +break; case 14: -# line 161 "perly.y" -{ yyval.opval = newLOGOP(OP_AND, 0, yypvt[-0].opval, yypvt[-2].opval); } break; +#line 197 "perly.y" +{ yyval.opval = Nullop; } +break; case 15: -# line 163 "perly.y" -{ yyval.opval = newLOGOP(OP_OR, 0, yypvt[-0].opval, yypvt[-2].opval); } break; +#line 199 "perly.y" +{ yyval.opval = yyvsp[0].opval; } +break; case 16: -# line 165 "perly.y" -{ yyval.opval = newLOOPOP(0, 1, scalar(yypvt[-0].opval), yypvt[-2].opval, Nullop); } break; +#line 201 "perly.y" +{ yyval.opval = newLOGOP(OP_AND, 0, yyvsp[0].opval, yyvsp[-2].opval); } +break; case 17: -# line 167 "perly.y" -{ yyval.opval = newLOOPOP(0, 1, invert(scalar(yypvt[-0].opval)), yypvt[-2].opval, Nullop);} break; +#line 203 "perly.y" +{ yyval.opval = newLOGOP(OP_OR, 0, yyvsp[0].opval, yyvsp[-2].opval); } +break; case 18: -# line 171 "perly.y" -{ yyval.opval = Nullop; } break; +#line 205 "perly.y" +{ yyval.opval = newLOOPOP(OPf_PARENS, 1, scalar(yyvsp[0].opval), yyvsp[-2].opval); } +break; case 19: -# line 173 "perly.y" -{ yyval.opval = scope(yypvt[-0].opval); } break; +#line 207 "perly.y" +{ yyval.opval = newLOOPOP(OPf_PARENS, 1, yyvsp[0].opval, yyvsp[-2].opval);} +break; case 20: -# line 175 "perly.y" -{ copline = yypvt[-5].ival; - yyval.opval = newCONDOP(0, yypvt[-3].opval, scope(yypvt[-1].opval), yypvt[-0].opval); } break; +#line 209 "perly.y" +{ yyval.opval = newFOROP(0, Nullch, (line_t)yyvsp[-1].ival, + Nullop, yyvsp[0].opval, yyvsp[-2].opval, Nullop); } +break; case 21: -# line 180 "perly.y" -{ copline = yypvt[-5].ival; - yyval.opval = newCONDOP(0, yypvt[-3].opval, scope(yypvt[-1].opval), yypvt[-0].opval); } break; +#line 215 "perly.y" +{ yyval.opval = Nullop; } +break; case 22: -# line 183 "perly.y" -{ copline = yypvt[-5].ival; - yyval.opval = newCONDOP(0, - invert(scalar(yypvt[-3].opval)), scope(yypvt[-1].opval), yypvt[-0].opval); } break; +#line 217 "perly.y" +{ (yyvsp[0].opval)->op_flags |= OPf_PARENS; yyval.opval = scope(yyvsp[0].opval); } +break; case 23: -# line 187 "perly.y" -{ copline = yypvt[-3].ival; - yyval.opval = newCONDOP(0, scope(yypvt[-2].opval), scope(yypvt[-1].opval), yypvt[-0].opval); } break; +#line 219 "perly.y" +{ PL_copline = (line_t)yyvsp[-5].ival; + yyval.opval = newCONDOP(0, yyvsp[-3].opval, scope(yyvsp[-1].opval), yyvsp[0].opval); + PL_hints |= HINT_BLOCK_SCOPE; } +break; case 24: -# line 190 "perly.y" -{ copline = yypvt[-3].ival; - yyval.opval = newCONDOP(0, invert(scalar(scope(yypvt[-2].opval))), - scope(yypvt[-1].opval), yypvt[-0].opval); } break; +#line 226 "perly.y" +{ PL_copline = (line_t)yyvsp[-6].ival; + yyval.opval = block_end(yyvsp[-4].ival, + newCONDOP(0, yyvsp[-3].opval, scope(yyvsp[-1].opval), yyvsp[0].opval)); } +break; case 25: -# line 196 "perly.y" -{ yyval.opval = Nullop; } break; +#line 230 "perly.y" +{ PL_copline = (line_t)yyvsp[-6].ival; + yyval.opval = block_end(yyvsp[-4].ival, + newCONDOP(0, yyvsp[-3].opval, scope(yyvsp[-1].opval), yyvsp[0].opval)); } +break; case 26: -# line 198 "perly.y" -{ yyval.opval = scope(yypvt[-0].opval); } break; +#line 237 "perly.y" +{ yyval.opval = Nullop; } +break; case 27: -# line 202 "perly.y" -{ copline = yypvt[-5].ival; - yyval.opval = newSTATEOP(0, yypvt[-6].pval, - newWHILEOP(0, 1, Nullop, yypvt[-3].opval, yypvt[-1].opval, yypvt[-0].opval) ); } break; +#line 239 "perly.y" +{ yyval.opval = scope(yyvsp[0].opval); } +break; case 28: -# line 206 "perly.y" -{ copline = yypvt[-5].ival; - yyval.opval = newSTATEOP(0, yypvt[-6].pval, - newWHILEOP(0, 1, Nullop, - invert(scalar(yypvt[-3].opval)), yypvt[-1].opval, yypvt[-0].opval) ); } break; +#line 244 "perly.y" +{ PL_copline = (line_t)yyvsp[-6].ival; + yyval.opval = block_end(yyvsp[-4].ival, + newSTATEOP(0, yyvsp[-7].pval, + newWHILEOP(0, 1, (LOOP*)Nullop, + yyvsp[-6].ival, yyvsp[-3].opval, yyvsp[-1].opval, yyvsp[0].opval))); } +break; case 29: -# line 211 "perly.y" -{ copline = yypvt[-3].ival; - yyval.opval = newSTATEOP(0, yypvt[-4].pval, - newWHILEOP(0, 1, Nullop, - scope(yypvt[-2].opval), yypvt[-1].opval, yypvt[-0].opval) ); } break; +#line 250 "perly.y" +{ PL_copline = (line_t)yyvsp[-6].ival; + yyval.opval = block_end(yyvsp[-4].ival, + newSTATEOP(0, yyvsp[-7].pval, + newWHILEOP(0, 1, (LOOP*)Nullop, + yyvsp[-6].ival, yyvsp[-3].opval, yyvsp[-1].opval, yyvsp[0].opval))); } +break; case 30: -# line 216 "perly.y" -{ copline = yypvt[-3].ival; - yyval.opval = newSTATEOP(0, yypvt[-4].pval, - newWHILEOP(0, 1, Nullop, - invert(scalar(scope(yypvt[-2].opval))), yypvt[-1].opval, yypvt[-0].opval)); } break; +#line 256 "perly.y" +{ yyval.opval = block_end(yyvsp[-6].ival, + newFOROP(0, yyvsp[-9].pval, (line_t)yyvsp[-8].ival, yyvsp[-5].opval, yyvsp[-3].opval, yyvsp[-1].opval, yyvsp[0].opval)); } +break; case 31: -# line 221 "perly.y" -{ yyval.opval = newFOROP(0, yypvt[-7].pval, yypvt[-6].ival, ref(yypvt[-5].opval, OP_ENTERLOOP), - yypvt[-3].opval, yypvt[-1].opval, yypvt[-0].opval); } break; +#line 259 "perly.y" +{ yyval.opval = block_end(yyvsp[-4].ival, + newFOROP(0, yyvsp[-8].pval, (line_t)yyvsp[-7].ival, mod(yyvsp[-6].opval, OP_ENTERLOOP), + yyvsp[-3].opval, yyvsp[-1].opval, yyvsp[0].opval)); } +break; case 32: -# line 224 "perly.y" -{ yyval.opval = newFOROP(0, yypvt[-6].pval, yypvt[-5].ival, Nullop, yypvt[-3].opval, yypvt[-1].opval, yypvt[-0].opval); } break; +#line 263 "perly.y" +{ yyval.opval = block_end(yyvsp[-4].ival, + newFOROP(0, yyvsp[-7].pval, (line_t)yyvsp[-6].ival, Nullop, yyvsp[-3].opval, yyvsp[-1].opval, yyvsp[0].opval)); } +break; case 33: -# line 227 "perly.y" -{ copline = yypvt[-8].ival; - yyval.opval = append_elem(OP_LINESEQ, - newSTATEOP(0, yypvt[-9].pval, scalar(yypvt[-6].opval)), - newSTATEOP(0, yypvt[-9].pval, - newWHILEOP(0, 1, Nullop, - scalar(yypvt[-4].opval), yypvt[-0].opval, scalar(yypvt[-2].opval)) )); } break; +#line 267 "perly.y" +{ OP *forop; + PL_copline = (line_t)yyvsp[-9].ival; + forop = newSTATEOP(0, yyvsp[-10].pval, + newWHILEOP(0, 1, (LOOP*)Nullop, + yyvsp[-9].ival, scalar(yyvsp[-4].opval), + yyvsp[0].opval, yyvsp[-2].opval)); + if (yyvsp[-6].opval) { + forop = append_elem(OP_LINESEQ, + newSTATEOP(0, (yyvsp[-10].pval?savepv(yyvsp[-10].pval):Nullch), + yyvsp[-6].opval), + forop); + } + + yyval.opval = block_end(yyvsp[-7].ival, forop); } +break; case 34: -# line 234 "perly.y" -{ yyval.opval = newSTATEOP(0, - yypvt[-2].pval, newWHILEOP(0, 1, Nullop, Nullop, yypvt[-1].opval, yypvt[-0].opval)); } break; +#line 282 "perly.y" +{ yyval.opval = newSTATEOP(0, yyvsp[-2].pval, + newWHILEOP(0, 1, (LOOP*)Nullop, + NOLINE, Nullop, yyvsp[-1].opval, yyvsp[0].opval)); } +break; case 35: -# line 239 "perly.y" -{ yyval.opval = Nullop; } break; +#line 289 "perly.y" +{ yyval.opval = Nullop; } +break; case 37: -# line 244 "perly.y" -{ (void)scan_num("1"); yyval.opval = yylval.opval; } break; +#line 295 "perly.y" +{ (void)scan_num("1", &yylval); yyval.opval = yylval.opval; } +break; case 39: -# line 249 "perly.y" -{ yyval.pval = Nullch; } break; +#line 301 "perly.y" +{ yyval.opval = invert(scalar(yyvsp[0].opval)); } +break; +case 40: +#line 306 "perly.y" +{ yyval.opval = yyvsp[0].opval; intro_my(); } +break; case 41: -# line 254 "perly.y" -{ yyval.ival = 0; } break; +#line 310 "perly.y" +{ yyval.opval = yyvsp[0].opval; intro_my(); } +break; case 42: -# line 256 "perly.y" -{ yyval.ival = 0; } break; +#line 314 "perly.y" +{ yyval.opval = yyvsp[0].opval; intro_my(); } +break; case 43: -# line 258 "perly.y" -{ yyval.ival = 0; } break; +#line 318 "perly.y" +{ yyval.opval = yyvsp[0].opval; intro_my(); } +break; case 44: -# line 262 "perly.y" -{ newFORM(yypvt[-2].ival, yypvt[-1].opval, yypvt[-0].opval); } break; -case 45: -# line 264 "perly.y" -{ newFORM(yypvt[-1].ival, Nullop, yypvt[-0].opval); } break; +#line 323 "perly.y" +{ yyval.pval = Nullch; } +break; case 46: -# line 268 "perly.y" -{ newSUB(yypvt[-2].ival, yypvt[-1].opval, yypvt[-0].opval); } break; +#line 329 "perly.y" +{ yyval.ival = 0; } +break; case 47: -# line 272 "perly.y" -{ package(yypvt[-1].opval); } break; +#line 331 "perly.y" +{ yyval.ival = 0; } +break; case 48: -# line 276 "perly.y" -{ yyval.opval = append_elem(OP_LIST, yypvt[-2].opval, yypvt[-0].opval); } break; +#line 333 "perly.y" +{ yyval.ival = 0; } +break; +case 49: +#line 335 "perly.y" +{ yyval.ival = 0; } +break; case 50: -# line 281 "perly.y" -{ yyval.opval = convert(yypvt[-2].ival, OPf_STACKED, - prepend_elem(OP_LIST, newGVREF(yypvt[-1].opval), yypvt[-0].opval) ); } break; +#line 337 "perly.y" +{ yyval.ival = 0; } +break; case 51: -# line 284 "perly.y" -{ yyval.opval = convert(yypvt[-4].ival, OPf_STACKED, - prepend_elem(OP_LIST, newGVREF(yypvt[-2].opval), yypvt[-1].opval) ); } break; +#line 341 "perly.y" +{ newFORM(yyvsp[-2].ival, yyvsp[-1].opval, yyvsp[0].opval); } +break; case 52: -# line 287 "perly.y" -{ yyval.opval = convert(yypvt[-1].ival, OPf_STACKED, - prepend_elem(OP_LIST, newGVREF(yypvt[-3].opval), yypvt[-0].opval) ); } break; +#line 344 "perly.y" +{ yyval.opval = yyvsp[0].opval; } +break; case 53: -# line 290 "perly.y" -{ yyval.opval = convert(yypvt[-3].ival, OPf_STACKED, - prepend_elem(OP_LIST, newGVREF(yypvt[-5].opval), yypvt[-1].opval) ); } break; +#line 345 "perly.y" +{ yyval.opval = Nullop; } +break; case 54: -# line 293 "perly.y" -{ yyval.opval = convert(OP_ENTERSUBR, OPf_STACKED|OPf_SPECIAL, - prepend_elem(OP_LIST, newMETHOD(yypvt[-5].opval,yypvt[-3].opval), yypvt[-1].opval)); } break; +#line 350 "perly.y" +{ newMYSUB(yyvsp[-4].ival, yyvsp[-3].opval, yyvsp[-2].opval, yyvsp[-1].opval, yyvsp[0].opval); } +break; case 55: -# line 296 "perly.y" -{ yyval.opval = convert(OP_ENTERSUBR, OPf_STACKED|OPf_SPECIAL, - prepend_elem(OP_LIST, newMETHOD(yypvt[-1].opval,yypvt[-2].opval), yypvt[-0].opval)); } break; +#line 355 "perly.y" +{ newATTRSUB(yyvsp[-4].ival, yyvsp[-3].opval, yyvsp[-2].opval, yyvsp[-1].opval, yyvsp[0].opval); } +break; case 56: -# line 299 "perly.y" -{ yyval.opval = convert(yypvt[-1].ival, 0, yypvt[-0].opval); } break; +#line 359 "perly.y" +{ yyval.ival = start_subparse(FALSE, 0); } +break; case 57: -# line 301 "perly.y" -{ yyval.opval = convert(yypvt[-3].ival, 0, yypvt[-1].opval); } break; +#line 363 "perly.y" +{ yyval.ival = start_subparse(FALSE, CVf_ANON); } +break; case 58: -# line 305 "perly.y" -{ yyval.opval = newASSIGNOP(OPf_STACKED, yypvt[-2].opval, yypvt[-0].opval); } break; +#line 367 "perly.y" +{ yyval.ival = start_subparse(TRUE, 0); } +break; case 59: -# line 307 "perly.y" -{ yyval.opval = newBINOP(yypvt[-2].ival, OPf_STACKED, - ref(scalar(yypvt[-3].opval), yypvt[-2].ival), scalar(yypvt[-0].opval)); } break; +#line 371 "perly.y" +{ STRLEN n_a; char *name = SvPV(((SVOP*)yyvsp[0].opval)->op_sv,n_a); + if (strEQ(name, "BEGIN") || strEQ(name, "END") + || strEQ(name, "INIT") || strEQ(name, "CHECK")) + CvSPECIAL_on(PL_compcv); + yyval.opval = yyvsp[0].opval; } +break; case 60: -# line 310 "perly.y" -{ yyval.opval = newBINOP(yypvt[-2].ival, OPf_STACKED, - ref(scalar(yypvt[-3].opval), yypvt[-2].ival), scalar(yypvt[-0].opval)); } break; -case 61: -# line 313 "perly.y" -{ yyval.opval = newBINOP(yypvt[-2].ival, OPf_STACKED, - ref(scalar(yypvt[-3].opval), yypvt[-2].ival), scalar(yypvt[-0].opval));} break; +#line 380 "perly.y" +{ yyval.opval = Nullop; } +break; case 62: -# line 316 "perly.y" -{ yyval.opval = newBINOP(yypvt[-2].ival, OPf_STACKED, - ref(scalar(yypvt[-3].opval), yypvt[-2].ival), scalar(yypvt[-0].opval)); } break; +#line 386 "perly.y" +{ yyval.opval = Nullop; } +break; case 63: -# line 319 "perly.y" -{ yyval.opval = newBINOP(yypvt[-2].ival, OPf_STACKED, - ref(scalar(yypvt[-3].opval), yypvt[-2].ival), scalar(yypvt[-0].opval)); } break; +#line 388 "perly.y" +{ yyval.opval = yyvsp[0].opval; } +break; case 64: -# line 322 "perly.y" -{ yyval.opval = newBINOP(yypvt[-2].ival, OPf_STACKED, - ref(scalar(yypvt[-3].opval), yypvt[-2].ival), scalar(yypvt[-0].opval)); } break; +#line 390 "perly.y" +{ yyval.opval = Nullop; } +break; case 65: -# line 325 "perly.y" -{ yyval.opval = newLOGOP(OP_ANDASSIGN, 0, - ref(scalar(yypvt[-3].opval), OP_ANDASSIGN), - newUNOP(OP_SASSIGN, 0, scalar(yypvt[-0].opval))); } break; +#line 395 "perly.y" +{ yyval.opval = yyvsp[0].opval; } +break; case 66: -# line 329 "perly.y" -{ yyval.opval = newLOGOP(OP_ORASSIGN, 0, - ref(scalar(yypvt[-3].opval), OP_ORASSIGN), - newUNOP(OP_SASSIGN, 0, scalar(yypvt[-0].opval))); } break; +#line 397 "perly.y" +{ yyval.opval = Nullop; } +break; case 67: -# line 335 "perly.y" -{ yyval.opval = newBINOP(yypvt[-1].ival, 0, scalar(yypvt[-2].opval), scalar(yypvt[-0].opval)); } break; +#line 401 "perly.y" +{ yyval.opval = yyvsp[0].opval; } +break; case 68: -# line 337 "perly.y" -{ if (yypvt[-1].ival != OP_REPEAT) - scalar(yypvt[-2].opval); - yyval.opval = newBINOP(yypvt[-1].ival, 0, yypvt[-2].opval, scalar(yypvt[-0].opval)); } break; +#line 402 "perly.y" +{ yyval.opval = Nullop; PL_expect = XSTATE; } +break; case 69: -# line 341 "perly.y" -{ yyval.opval = newBINOP(yypvt[-1].ival, 0, scalar(yypvt[-2].opval), scalar(yypvt[-0].opval)); } break; +#line 406 "perly.y" +{ package(yyvsp[-1].opval); } +break; case 70: -# line 343 "perly.y" -{ yyval.opval = newBINOP(yypvt[-1].ival, 0, scalar(yypvt[-2].opval), scalar(yypvt[-0].opval)); } break; +#line 408 "perly.y" +{ package(Nullop); } +break; case 71: -# line 345 "perly.y" -{ yyval.opval = newBINOP(yypvt[-1].ival, 0, scalar(yypvt[-2].opval), scalar(yypvt[-0].opval)); } break; +#line 412 "perly.y" +{ CvSPECIAL_on(PL_compcv); /* It's a BEGIN {} */ } +break; case 72: -# line 347 "perly.y" -{ yyval.opval = newBINOP(yypvt[-1].ival, 0, scalar(yypvt[-2].opval), scalar(yypvt[-0].opval)); } break; +#line 414 "perly.y" +{ utilize(yyvsp[-6].ival, yyvsp[-5].ival, yyvsp[-3].opval, yyvsp[-2].opval, yyvsp[-1].opval); } +break; case 73: -# line 349 "perly.y" -{ yyval.opval = newBINOP(yypvt[-1].ival, 0, scalar(yypvt[-2].opval), scalar(yypvt[-0].opval)); } break; +#line 419 "perly.y" +{ yyval.opval = newLOGOP(OP_AND, 0, yyvsp[-2].opval, yyvsp[0].opval); } +break; case 74: -# line 351 "perly.y" -{ yyval.opval = newBINOP(yypvt[-1].ival, 0, scalar(yypvt[-2].opval), scalar(yypvt[-0].opval)); } break; +#line 421 "perly.y" +{ yyval.opval = newLOGOP(yyvsp[-1].ival, 0, yyvsp[-2].opval, yyvsp[0].opval); } +break; case 75: -# line 353 "perly.y" -{ yyval.opval = newRANGE(yypvt[-1].ival, scalar(yypvt[-2].opval), scalar(yypvt[-0].opval));} break; -case 76: -# line 355 "perly.y" -{ yyval.opval = newLOGOP(OP_AND, 0, yypvt[-2].opval, yypvt[-0].opval); } break; +#line 423 "perly.y" +{ yyval.opval = newLOGOP(OP_DOR, 0, yyvsp[-2].opval, yyvsp[0].opval); } +break; case 77: -# line 357 "perly.y" -{ yyval.opval = newLOGOP(OP_OR, 0, yypvt[-2].opval, yypvt[-0].opval); } break; +#line 429 "perly.y" +{ yyval.opval = yyvsp[-1].opval; } +break; case 78: -# line 359 "perly.y" -{ yyval.opval = newCONDOP(0, yypvt[-4].opval, yypvt[-2].opval, yypvt[-0].opval); } break; -case 79: -# line 361 "perly.y" -{ yyval.opval = bind_match(yypvt[-1].ival, yypvt[-2].opval, yypvt[-0].opval); } break; +#line 431 "perly.y" +{ yyval.opval = append_elem(OP_LIST, yyvsp[-2].opval, yyvsp[0].opval); } +break; case 80: -# line 363 "perly.y" -{ yyval.opval = yypvt[-0].opval; } break; +#line 437 "perly.y" +{ yyval.opval = convert(yyvsp[-2].ival, OPf_STACKED, + prepend_elem(OP_LIST, newGVREF(yyvsp[-2].ival,yyvsp[-1].opval), yyvsp[0].opval) ); } +break; case 81: -# line 367 "perly.y" -{ yyval.opval = newUNOP(OP_NEGATE, 0, scalar(yypvt[-0].opval)); } break; +#line 440 "perly.y" +{ yyval.opval = convert(yyvsp[-4].ival, OPf_STACKED, + prepend_elem(OP_LIST, newGVREF(yyvsp[-4].ival,yyvsp[-2].opval), yyvsp[-1].opval) ); } +break; case 82: -# line 369 "perly.y" -{ yyval.opval = yypvt[-0].opval; } break; +#line 443 "perly.y" +{ yyval.opval = convert(OP_ENTERSUB, OPf_STACKED, + append_elem(OP_LIST, + prepend_elem(OP_LIST, scalar(yyvsp[-5].opval), yyvsp[-1].opval), + newUNOP(OP_METHOD, 0, yyvsp[-3].opval))); } +break; case 83: -# line 371 "perly.y" -{ yyval.opval = newUNOP(OP_NOT, 0, scalar(yypvt[-0].opval)); } break; +#line 448 "perly.y" +{ yyval.opval = convert(OP_ENTERSUB, OPf_STACKED, + append_elem(OP_LIST, scalar(yyvsp[-2].opval), + newUNOP(OP_METHOD, 0, yyvsp[0].opval))); } +break; case 84: -# line 373 "perly.y" -{ yyval.opval = newUNOP(OP_COMPLEMENT, 0, scalar(yypvt[-0].opval));} break; +#line 452 "perly.y" +{ yyval.opval = convert(OP_ENTERSUB, OPf_STACKED, + append_elem(OP_LIST, + prepend_elem(OP_LIST, yyvsp[-1].opval, yyvsp[0].opval), + newUNOP(OP_METHOD, 0, yyvsp[-2].opval))); } +break; case 85: -# line 375 "perly.y" -{ yyval.opval = newUNOP(OP_REFGEN, 0, ref(yypvt[-0].opval, OP_REFGEN)); } break; +#line 457 "perly.y" +{ yyval.opval = convert(OP_ENTERSUB, OPf_STACKED, + append_elem(OP_LIST, + prepend_elem(OP_LIST, yyvsp[-3].opval, yyvsp[-1].opval), + newUNOP(OP_METHOD, 0, yyvsp[-4].opval))); } +break; case 86: -# line 377 "perly.y" -{ yyval.opval = newUNOP(OP_POSTINC, 0, - ref(scalar(yypvt[-1].opval), OP_POSTINC)); } break; +#line 462 "perly.y" +{ yyval.opval = convert(yyvsp[-1].ival, 0, yyvsp[0].opval); } +break; case 87: -# line 380 "perly.y" -{ yyval.opval = newUNOP(OP_POSTDEC, 0, - ref(scalar(yypvt[-1].opval), OP_POSTDEC)); } break; +#line 464 "perly.y" +{ yyval.opval = convert(yyvsp[-3].ival, 0, yyvsp[-1].opval); } +break; case 88: -# line 383 "perly.y" -{ yyval.opval = newUNOP(OP_PREINC, 0, - ref(scalar(yypvt[-0].opval), OP_PREINC)); } break; +#line 466 "perly.y" +{ yyvsp[0].opval = newANONATTRSUB(yyvsp[-1].ival, 0, Nullop, yyvsp[0].opval); } +break; case 89: -# line 386 "perly.y" -{ yyval.opval = newUNOP(OP_PREDEC, 0, - ref(scalar(yypvt[-0].opval), OP_PREDEC)); } break; -case 90: -# line 389 "perly.y" -{ yyval.opval = localize(yypvt[-0].opval); } break; -case 91: -# line 391 "perly.y" -{ yyval.opval = sawparens(yypvt[-1].opval); } break; +#line 468 "perly.y" +{ yyval.opval = newUNOP(OP_ENTERSUB, OPf_STACKED, + append_elem(OP_LIST, + prepend_elem(OP_LIST, yyvsp[-2].opval, yyvsp[0].opval), yyvsp[-4].opval)); } +break; case 92: -# line 393 "perly.y" -{ yyval.opval = newNULLLIST(); } break; +#line 482 "perly.y" +{ yyval.opval = newBINOP(OP_GELEM, 0, yyvsp[-4].opval, scalar(yyvsp[-2].opval)); } +break; case 93: -# line 395 "perly.y" -{ yyval.opval = newANONLIST(yypvt[-1].opval); } break; +#line 484 "perly.y" +{ yyval.opval = newBINOP(OP_AELEM, 0, oopsAV(yyvsp[-3].opval), scalar(yyvsp[-1].opval)); } +break; case 94: -# line 397 "perly.y" -{ yyval.opval = newANONLIST(Nullop); } break; +#line 486 "perly.y" +{ yyval.opval = newBINOP(OP_AELEM, 0, + ref(newAVREF(yyvsp[-4].opval),OP_RV2AV), + scalar(yyvsp[-1].opval));} +break; case 95: -# line 399 "perly.y" -{ yyval.opval = newANONHASH(yypvt[-1].opval); } break; +#line 490 "perly.y" +{ yyval.opval = newBINOP(OP_AELEM, 0, + ref(newAVREF(yyvsp[-3].opval),OP_RV2AV), + scalar(yyvsp[-1].opval));} +break; case 96: -# line 401 "perly.y" -{ yyval.opval = newANONHASH(Nullop); } break; +#line 494 "perly.y" +{ yyval.opval = newBINOP(OP_HELEM, 0, oopsHV(yyvsp[-4].opval), jmaybe(yyvsp[-2].opval)); + PL_expect = XOPERATOR; } +break; case 97: -# line 403 "perly.y" -{ yyval.opval = yypvt[-0].opval; } break; +#line 497 "perly.y" +{ yyval.opval = newBINOP(OP_HELEM, 0, + ref(newHVREF(yyvsp[-5].opval),OP_RV2HV), + jmaybe(yyvsp[-2].opval)); + PL_expect = XOPERATOR; } +break; case 98: -# line 405 "perly.y" -{ yyval.opval = yypvt[-0].opval; } break; +#line 502 "perly.y" +{ yyval.opval = newBINOP(OP_HELEM, 0, + ref(newHVREF(yyvsp[-4].opval),OP_RV2HV), + jmaybe(yyvsp[-2].opval)); + PL_expect = XOPERATOR; } +break; case 99: -# line 407 "perly.y" -{ yyval.opval = newBINOP(OP_AELEM, 0, oopsAV(yypvt[-3].opval), scalar(yypvt[-1].opval)); } break; +#line 507 "perly.y" +{ yyval.opval = newUNOP(OP_ENTERSUB, OPf_STACKED, + newCVREF(0, scalar(yyvsp[-3].opval))); } +break; case 100: -# line 409 "perly.y" -{ yyval.opval = newBINOP(OP_AELEM, 0, - scalar(ref(newAVREF(yypvt[-4].opval),OP_RV2AV)), - scalar(yypvt[-1].opval));} break; +#line 510 "perly.y" +{ yyval.opval = newUNOP(OP_ENTERSUB, OPf_STACKED, + append_elem(OP_LIST, yyvsp[-1].opval, + newCVREF(0, scalar(yyvsp[-4].opval)))); } +break; case 101: -# line 413 "perly.y" -{ yyval.opval = yypvt[-0].opval; } break; +#line 515 "perly.y" +{ yyval.opval = newUNOP(OP_ENTERSUB, OPf_STACKED, + append_elem(OP_LIST, yyvsp[-1].opval, + newCVREF(0, scalar(yyvsp[-3].opval)))); } +break; case 102: -# line 415 "perly.y" -{ yyval.opval = yypvt[-0].opval; } break; +#line 519 "perly.y" +{ yyval.opval = newUNOP(OP_ENTERSUB, OPf_STACKED, + newCVREF(0, scalar(yyvsp[-2].opval))); } +break; case 103: -# line 417 "perly.y" -{ yyval.opval = newUNOP(OP_AV2ARYLEN, 0, ref(yypvt[-0].opval, OP_AV2ARYLEN));} break; +#line 525 "perly.y" +{ yyval.opval = newASSIGNOP(OPf_STACKED, yyvsp[-2].opval, yyvsp[-1].ival, yyvsp[0].opval); } +break; case 104: -# line 419 "perly.y" -{ yyval.opval = newBINOP(OP_HELEM, 0, oopsHV(yypvt[-4].opval), jmaybe(yypvt[-2].opval)); - expect = XOPERATOR; } break; +#line 527 "perly.y" +{ yyval.opval = newBINOP(yyvsp[-1].ival, 0, scalar(yyvsp[-2].opval), scalar(yyvsp[0].opval)); } +break; case 105: -# line 422 "perly.y" -{ yyval.opval = newBINOP(OP_HELEM, 0, - scalar(ref(newHVREF(yypvt[-5].opval),OP_RV2HV)), - jmaybe(yypvt[-2].opval)); - expect = XOPERATOR; } break; +#line 529 "perly.y" +{ if (yyvsp[-1].ival != OP_REPEAT) + scalar(yyvsp[-2].opval); + yyval.opval = newBINOP(yyvsp[-1].ival, 0, yyvsp[-2].opval, scalar(yyvsp[0].opval)); } +break; case 106: -# line 427 "perly.y" -{ yyval.opval = newSLICEOP(0, yypvt[-1].opval, yypvt[-4].opval); } break; +#line 533 "perly.y" +{ yyval.opval = newBINOP(yyvsp[-1].ival, 0, scalar(yyvsp[-2].opval), scalar(yyvsp[0].opval)); } +break; case 107: -# line 429 "perly.y" -{ yyval.opval = newSLICEOP(0, yypvt[-1].opval, Nullop); } break; +#line 535 "perly.y" +{ yyval.opval = newBINOP(yyvsp[-1].ival, 0, scalar(yyvsp[-2].opval), scalar(yyvsp[0].opval)); } +break; case 108: -# line 431 "perly.y" -{ yyval.opval = prepend_elem(OP_ASLICE, - newOP(OP_PUSHMARK, 0), - list( - newLISTOP(OP_ASLICE, 0, - list(yypvt[-1].opval), - ref(yypvt[-3].opval, OP_ASLICE)))); } break; +#line 537 "perly.y" +{ yyval.opval = newBINOP(yyvsp[-1].ival, 0, scalar(yyvsp[-2].opval), scalar(yyvsp[0].opval)); } +break; case 109: -# line 438 "perly.y" -{ yyval.opval = prepend_elem(OP_HSLICE, - newOP(OP_PUSHMARK, 0), - list( - newLISTOP(OP_HSLICE, 0, - list(yypvt[-2].opval), - ref(oopsHV(yypvt[-4].opval), OP_HSLICE)))); - expect = XOPERATOR; } break; +#line 539 "perly.y" +{ yyval.opval = newBINOP(yyvsp[-1].ival, 0, scalar(yyvsp[-2].opval), scalar(yyvsp[0].opval)); } +break; case 110: -# line 446 "perly.y" -{ yyval.opval = newBINOP(OP_DELETE, 0, oopsHV(yypvt[-4].opval), jmaybe(yypvt[-2].opval)); - expect = XOPERATOR; } break; +#line 541 "perly.y" +{ yyval.opval = newBINOP(yyvsp[-1].ival, 0, scalar(yyvsp[-2].opval), scalar(yyvsp[0].opval)); } +break; case 111: -# line 449 "perly.y" -{ yyval.opval = newBINOP(OP_DELETE, 0, oopsHV(yypvt[-5].opval), jmaybe(yypvt[-3].opval)); - expect = XOPERATOR; } break; +#line 543 "perly.y" +{ yyval.opval = newBINOP(yyvsp[-1].ival, 0, scalar(yyvsp[-2].opval), scalar(yyvsp[0].opval)); } +break; case 112: -# line 452 "perly.y" -{ yyval.opval = yypvt[-0].opval; } break; +#line 545 "perly.y" +{ yyval.opval = newRANGE(yyvsp[-1].ival, scalar(yyvsp[-2].opval), scalar(yyvsp[0].opval));} +break; case 113: -# line 454 "perly.y" -{ yyval.opval = newUNOP(OP_ENTERSUBR, 0, - scalar(yypvt[-0].opval)); } break; +#line 547 "perly.y" +{ yyval.opval = newLOGOP(OP_AND, 0, yyvsp[-2].opval, yyvsp[0].opval); } +break; case 114: -# line 457 "perly.y" -{ yyval.opval = newUNOP(OP_ENTERSUBR, OPf_STACKED, scalar(yypvt[-2].opval)); } break; +#line 549 "perly.y" +{ yyval.opval = newLOGOP(OP_OR, 0, yyvsp[-2].opval, yyvsp[0].opval); } +break; case 115: -# line 459 "perly.y" -{ yyval.opval = newUNOP(OP_ENTERSUBR, OPf_STACKED, - list(prepend_elem(OP_LIST, scalar(yypvt[-3].opval), yypvt[-1].opval))); } break; +#line 551 "perly.y" +{ yyval.opval = newLOGOP(OP_DOR, 0, yyvsp[-2].opval, yyvsp[0].opval); } +break; case 116: -# line 462 "perly.y" -{ yyval.opval = newUNOP(OP_DOFILE, 0, scalar(yypvt[-0].opval)); - allgvs = TRUE;} break; +#line 553 "perly.y" +{ yyval.opval = bind_match(yyvsp[-1].ival, yyvsp[-2].opval, yyvsp[0].opval); } +break; case 117: -# line 465 "perly.y" -{ yyval.opval = newUNOP(OP_NULL, OPf_SPECIAL, scope(yypvt[-0].opval)); } break; +#line 558 "perly.y" +{ yyval.opval = newUNOP(OP_NEGATE, 0, scalar(yyvsp[0].opval)); } +break; case 118: -# line 467 "perly.y" -{ yyval.opval = newUNOP(OP_ENTERSUBR, OPf_SPECIAL|OPf_STACKED, - list(prepend_elem(OP_LIST, - scalar(newCVREF(scalar(yypvt[-2].opval))), newNULLLIST()))); } break; +#line 560 "perly.y" +{ yyval.opval = yyvsp[0].opval; } +break; case 119: -# line 471 "perly.y" -{ yyval.opval = newUNOP(OP_ENTERSUBR, OPf_SPECIAL|OPf_STACKED, - list(prepend_elem(OP_LIST, - scalar(newCVREF(scalar(yypvt[-3].opval))), - yypvt[-1].opval))); } break; +#line 562 "perly.y" +{ yyval.opval = newUNOP(OP_NOT, 0, scalar(yyvsp[0].opval)); } +break; case 120: -# line 476 "perly.y" -{ yyval.opval = newUNOP(OP_ENTERSUBR, OPf_SPECIAL|OPf_STACKED, - list(prepend_elem(OP_LIST, - scalar(newCVREF(scalar(yypvt[-2].opval))), newNULLLIST())));} break; +#line 564 "perly.y" +{ yyval.opval = newUNOP(OP_COMPLEMENT, 0, scalar(yyvsp[0].opval));} +break; case 121: -# line 480 "perly.y" -{ yyval.opval = newUNOP(OP_ENTERSUBR, OPf_SPECIAL|OPf_STACKED, - list(prepend_elem(OP_LIST, - scalar(newCVREF(scalar(yypvt[-3].opval))), - yypvt[-1].opval))); } break; +#line 566 "perly.y" +{ yyval.opval = newUNOP(OP_POSTINC, 0, + mod(scalar(yyvsp[-1].opval), OP_POSTINC)); } +break; case 122: -# line 485 "perly.y" -{ yyval.opval = newOP(yypvt[-0].ival, OPf_SPECIAL); } break; +#line 569 "perly.y" +{ yyval.opval = newUNOP(OP_POSTDEC, 0, + mod(scalar(yyvsp[-1].opval), OP_POSTDEC)); } +break; case 123: -# line 487 "perly.y" -{ yyval.opval = newPVOP(yypvt[-1].ival, 0, - savestr(SvPVnx(((SVOP*)yypvt[-0].opval)->op_sv))); - op_free(yypvt[-0].opval); } break; +#line 572 "perly.y" +{ yyval.opval = newUNOP(OP_PREINC, 0, + mod(scalar(yyvsp[0].opval), OP_PREINC)); } +break; case 124: -# line 491 "perly.y" -{ yyval.opval = newOP(yypvt[-0].ival, 0); } break; +#line 575 "perly.y" +{ yyval.opval = newUNOP(OP_PREDEC, 0, + mod(scalar(yyvsp[0].opval), OP_PREDEC)); } +break; case 125: -# line 493 "perly.y" -{ yyval.opval = newUNOP(yypvt[-1].ival, 0, yypvt[-0].opval); } break; +#line 582 "perly.y" +{ yyval.opval = newANONLIST(yyvsp[-1].opval); } +break; case 126: -# line 495 "perly.y" -{ yyval.opval = newUNOP(yypvt[-1].ival, 0, yypvt[-0].opval); } break; +#line 584 "perly.y" +{ yyval.opval = newANONLIST(Nullop); } +break; case 127: -# line 497 "perly.y" -{ yyval.opval = newOP(yypvt[-0].ival, 0); } break; +#line 586 "perly.y" +{ yyval.opval = newANONHASH(yyvsp[-2].opval); } +break; case 128: -# line 499 "perly.y" -{ yyval.opval = newOP(yypvt[-2].ival, 0); } break; +#line 588 "perly.y" +{ yyval.opval = newANONHASH(Nullop); } +break; case 129: -# line 501 "perly.y" -{ yyval.opval = newOP(yypvt[-2].ival, OPf_SPECIAL); } break; +#line 590 "perly.y" +{ yyval.opval = newANONATTRSUB(yyvsp[-3].ival, yyvsp[-2].opval, yyvsp[-1].opval, yyvsp[0].opval); } +break; case 130: -# line 503 "perly.y" -{ yyval.opval = newUNOP(yypvt[-3].ival, 0, yypvt[-1].opval); } break; +#line 596 "perly.y" +{ yyval.opval = dofile(yyvsp[0].opval); } +break; case 131: -# line 505 "perly.y" -{ yyval.opval = pmruntime(yypvt[-3].opval, yypvt[-1].opval, Nullop); } break; +#line 598 "perly.y" +{ yyval.opval = newUNOP(OP_NULL, OPf_SPECIAL, scope(yyvsp[0].opval)); } +break; case 132: -# line 507 "perly.y" -{ yyval.opval = pmruntime(yypvt[-5].opval, yypvt[-3].opval, yypvt[-1].opval); } break; +#line 600 "perly.y" +{ yyval.opval = newUNOP(OP_ENTERSUB, + OPf_SPECIAL|OPf_STACKED, + prepend_elem(OP_LIST, + scalar(newCVREF( + (OPpENTERSUB_AMPER<<8), + scalar(yyvsp[-2].opval) + )),Nullop)); dep();} +break; +case 133: +#line 608 "perly.y" +{ yyval.opval = newUNOP(OP_ENTERSUB, + OPf_SPECIAL|OPf_STACKED, + append_elem(OP_LIST, + yyvsp[-1].opval, + scalar(newCVREF( + (OPpENTERSUB_AMPER<<8), + scalar(yyvsp[-3].opval) + )))); dep();} +break; +case 134: +#line 617 "perly.y" +{ yyval.opval = newUNOP(OP_ENTERSUB, OPf_SPECIAL|OPf_STACKED, + prepend_elem(OP_LIST, + scalar(newCVREF(0,scalar(yyvsp[-2].opval))), Nullop)); dep();} +break; case 135: -# line 513 "perly.y" -{ yyval.opval = newNULLLIST(); } break; -case 136: -# line 515 "perly.y" -{ yyval.opval = yypvt[-0].opval; } break; -case 137: -# line 519 "perly.y" -{ yyval.opval = newCVREF(yypvt[-0].opval); } break; -case 138: -# line 523 "perly.y" -{ yyval.opval = newSVREF(yypvt[-0].opval); } break; -case 139: -# line 527 "perly.y" -{ yyval.opval = newAVREF(yypvt[-0].opval); } break; +#line 621 "perly.y" +{ yyval.opval = newUNOP(OP_ENTERSUB, OPf_SPECIAL|OPf_STACKED, + prepend_elem(OP_LIST, + yyvsp[-1].opval, + scalar(newCVREF(0,scalar(yyvsp[-3].opval))))); dep();} +break; case 140: -# line 531 "perly.y" -{ yyval.opval = newHVREF(yypvt[-0].opval); } break; +#line 633 "perly.y" +{ yyval.opval = newCONDOP(0, yyvsp[-4].opval, yyvsp[-2].opval, yyvsp[0].opval); } +break; case 141: -# line 535 "perly.y" -{ yyval.opval = newAVREF(yypvt[-0].opval); } break; +#line 635 "perly.y" +{ yyval.opval = newUNOP(OP_REFGEN, 0, mod(yyvsp[0].opval,OP_REFGEN)); } +break; case 142: -# line 539 "perly.y" -{ yyval.opval = newGVREF(yypvt[-0].opval); } break; +#line 637 "perly.y" +{ yyval.opval = yyvsp[0].opval; } +break; case 143: -# line 543 "perly.y" -{ yyval.opval = scalar(yypvt[-0].opval); } break; +#line 639 "perly.y" +{ yyval.opval = localize(yyvsp[0].opval,yyvsp[-1].ival); } +break; case 144: -# line 545 "perly.y" -{ yyval.opval = scalar(yypvt[-0].opval); } break; +#line 641 "perly.y" +{ yyval.opval = sawparens(yyvsp[-1].opval); } +break; case 145: -# line 547 "perly.y" -{ yyval.opval = scalar(scope(yypvt[-0].opval)); } break; +#line 643 "perly.y" +{ yyval.opval = sawparens(newNULLLIST()); } +break; case 146: -# line 552 "perly.y" -{ yyval.ival = 1; } break; +#line 645 "perly.y" +{ yyval.opval = yyvsp[0].opval; } +break; case 147: -# line 554 "perly.y" -{ yyval.ival = 0; } break; +#line 647 "perly.y" +{ yyval.opval = yyvsp[0].opval; } +break; case 148: -# line 558 "perly.y" -{ yyval.ival = 1; } break; +#line 649 "perly.y" +{ yyval.opval = yyvsp[0].opval; } +break; case 149: -# line 560 "perly.y" -{ yyval.ival = 0; } break; +#line 651 "perly.y" +{ yyval.opval = yyvsp[0].opval; } +break; case 150: -# line 564 "perly.y" -{ yyval.ival = 1; } break; +#line 653 "perly.y" +{ yyval.opval = newUNOP(OP_AV2ARYLEN, 0, ref(yyvsp[0].opval, OP_AV2ARYLEN));} +break; case 151: -# line 566 "perly.y" -{ yyval.ival = 0; } break; - } - goto yystack; /* reset registers in driver code */ +#line 655 "perly.y" +{ yyval.opval = yyvsp[0].opval; } +break; +case 152: +#line 657 "perly.y" +{ yyval.opval = newSLICEOP(0, yyvsp[-1].opval, yyvsp[-4].opval); } +break; +case 153: +#line 659 "perly.y" +{ yyval.opval = newSLICEOP(0, yyvsp[-1].opval, Nullop); } +break; +case 154: +#line 661 "perly.y" +{ yyval.opval = prepend_elem(OP_ASLICE, + newOP(OP_PUSHMARK, 0), + newLISTOP(OP_ASLICE, 0, + list(yyvsp[-1].opval), + ref(yyvsp[-3].opval, OP_ASLICE))); } +break; +case 155: +#line 667 "perly.y" +{ yyval.opval = prepend_elem(OP_HSLICE, + newOP(OP_PUSHMARK, 0), + newLISTOP(OP_HSLICE, 0, + list(yyvsp[-2].opval), + ref(oopsHV(yyvsp[-4].opval), OP_HSLICE))); + PL_expect = XOPERATOR; } +break; +case 156: +#line 674 "perly.y" +{ yyval.opval = yyvsp[0].opval; } +break; +case 157: +#line 676 "perly.y" +{ yyval.opval = newUNOP(OP_ENTERSUB, 0, scalar(yyvsp[0].opval)); } +break; +case 158: +#line 678 "perly.y" +{ yyval.opval = newUNOP(OP_ENTERSUB, OPf_STACKED, scalar(yyvsp[-2].opval)); } +break; +case 159: +#line 680 "perly.y" +{ yyval.opval = newUNOP(OP_ENTERSUB, OPf_STACKED, + append_elem(OP_LIST, yyvsp[-1].opval, scalar(yyvsp[-3].opval))); } +break; +case 160: +#line 683 "perly.y" +{ yyval.opval = newUNOP(OP_ENTERSUB, OPf_STACKED, + append_elem(OP_LIST, yyvsp[0].opval, scalar(yyvsp[-1].opval))); } +break; +case 161: +#line 686 "perly.y" +{ yyval.opval = newOP(yyvsp[0].ival, OPf_SPECIAL); + PL_hints |= HINT_BLOCK_SCOPE; } +break; +case 162: +#line 689 "perly.y" +{ yyval.opval = newLOOPEX(yyvsp[-1].ival,yyvsp[0].opval); } +break; +case 163: +#line 691 "perly.y" +{ yyval.opval = newUNOP(OP_NOT, 0, scalar(yyvsp[0].opval)); } +break; +case 164: +#line 693 "perly.y" +{ yyval.opval = newOP(yyvsp[0].ival, 0); } +break; +case 165: +#line 695 "perly.y" +{ yyval.opval = newUNOP(yyvsp[-1].ival, 0, yyvsp[0].opval); } +break; +case 166: +#line 697 "perly.y" +{ yyval.opval = newUNOP(yyvsp[-1].ival, 0, yyvsp[0].opval); } +break; +case 167: +#line 699 "perly.y" +{ yyval.opval = newUNOP(OP_ENTERSUB, OPf_STACKED, + append_elem(OP_LIST, yyvsp[0].opval, scalar(yyvsp[-1].opval))); } +break; +case 168: +#line 702 "perly.y" +{ yyval.opval = newOP(yyvsp[0].ival, 0); } +break; +case 169: +#line 704 "perly.y" +{ yyval.opval = newOP(yyvsp[-2].ival, 0); } +break; +case 170: +#line 706 "perly.y" +{ yyval.opval = newUNOP(OP_ENTERSUB, OPf_STACKED, + scalar(yyvsp[0].opval)); } +break; +case 171: +#line 709 "perly.y" +{ yyval.opval = newOP(yyvsp[-2].ival, OPf_SPECIAL); } +break; +case 172: +#line 711 "perly.y" +{ yyval.opval = newUNOP(yyvsp[-3].ival, 0, yyvsp[-1].opval); } +break; +case 173: +#line 713 "perly.y" +{ yyval.opval = pmruntime(yyvsp[-3].opval, yyvsp[-1].opval, Nullop); } +break; +case 174: +#line 715 "perly.y" +{ yyval.opval = pmruntime(yyvsp[-5].opval, yyvsp[-3].opval, yyvsp[-1].opval); } +break; +case 177: +#line 722 "perly.y" +{ yyval.opval = my_attrs(yyvsp[-1].opval,yyvsp[0].opval); } +break; +case 178: +#line 724 "perly.y" +{ yyval.opval = localize(yyvsp[0].opval,yyvsp[-1].ival); } +break; +case 179: +#line 729 "perly.y" +{ yyval.opval = sawparens(yyvsp[-1].opval); } +break; +case 180: +#line 731 "perly.y" +{ yyval.opval = sawparens(newNULLLIST()); } +break; +case 181: +#line 733 "perly.y" +{ yyval.opval = yyvsp[0].opval; } +break; +case 182: +#line 735 "perly.y" +{ yyval.opval = yyvsp[0].opval; } +break; +case 183: +#line 737 "perly.y" +{ yyval.opval = yyvsp[0].opval; } +break; +case 184: +#line 742 "perly.y" +{ yyval.opval = Nullop; } +break; +case 185: +#line 744 "perly.y" +{ yyval.opval = yyvsp[0].opval; } +break; +case 186: +#line 748 "perly.y" +{ yyval.opval = Nullop; } +break; +case 187: +#line 750 "perly.y" +{ yyval.opval = yyvsp[0].opval; } +break; +case 188: +#line 752 "perly.y" +{ yyval.opval = yyvsp[-1].opval; } +break; +case 189: +#line 758 "perly.y" +{ PL_in_my = 0; yyval.opval = my(yyvsp[0].opval); } +break; +case 190: +#line 762 "perly.y" +{ yyval.opval = newCVREF(yyvsp[-1].ival,yyvsp[0].opval); } +break; +case 191: +#line 766 "perly.y" +{ yyval.opval = newSVREF(yyvsp[0].opval); } +break; +case 192: +#line 770 "perly.y" +{ yyval.opval = newAVREF(yyvsp[0].opval); } +break; +case 193: +#line 774 "perly.y" +{ yyval.opval = newHVREF(yyvsp[0].opval); } +break; +case 194: +#line 778 "perly.y" +{ yyval.opval = newAVREF(yyvsp[0].opval); } +break; +case 195: +#line 782 "perly.y" +{ yyval.opval = newGVREF(0,yyvsp[0].opval); } +break; +case 196: +#line 787 "perly.y" +{ yyval.opval = scalar(yyvsp[0].opval); } +break; +case 197: +#line 789 "perly.y" +{ yyval.opval = scalar(yyvsp[0].opval); } +break; +case 198: +#line 791 "perly.y" +{ yyval.opval = scope(yyvsp[0].opval); } +break; +case 199: +#line 794 "perly.y" +{ yyval.opval = yyvsp[0].opval; } +break; +#line 2567 "perly.c" + } + yyssp -= yym; + yystate = *yyssp; + yyvsp -= yym; + yym = yylhs[yyn]; + if (yystate == 0 && yym == 0) + { +#if YYDEBUG + if (yydebug) + PerlIO_printf(Perl_debug_log, "yydebug: after reduction, shifting from state 0 to\ + state %d\n", 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"; + PerlIO_printf(Perl_debug_log, "yydebug: state %d, reading %d (%s)\n", + 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) + PerlIO_printf(Perl_debug_log, "yydebug: after reduction, shifting from state %d \ +to state %d\n", *yyssp, yystate); +#endif + if (yyssp >= yyss + yystacksize - 1) + { + /* + ** reallocate and recover. Note that pointers + ** have to be reset, or bad things will happen + */ + int yyps_index = (yyssp - yyss); + int yypv_index = (yyvsp - yyvs); + yystacksize += YYSTACKSIZE; + ysave->yyvs = Renew(yyvs, yystacksize, YYSTYPE); + ysave->yyss = Renew(yyss, yystacksize, short); + if (!yyvs || !yyss) + goto yyoverflow; + yyssp = yyss + yyps_index; + yyvsp = yyvs + yypv_index; + } + *++yyssp = yystate; + *++yyvsp = yyval; + goto yyloop; +yyoverflow: + yyerror("Out of memory for yacc stack"); +yyabort: + retval = 1; +yyaccept: +#ifdef USE_ITHREADS + LEAVE; /* force yydestruct() before we return */ +#endif + return retval; +} + +static void +yydestruct(pTHX_ void *ptr) +{ + struct ysv* ysave = (struct ysv*)ptr; + if (ysave->yyss) Safefree(ysave->yyss); + if (ysave->yyvs) Safefree(ysave->yyvs); + yydebug = ysave->oldyydebug; + yynerrs = ysave->oldyynerrs; + yyerrflag = ysave->oldyyerrflag; + yychar = ysave->oldyychar; + yyval = ysave->oldyyval; + yylval = ysave->oldyylval; + Safefree(ysave); }