-#ifndef lint
-/* static char yysccsid[] = "@(#)yaccpar 1.8 (Berkeley) 01/20/91"; */
-#endif
-#define YYBYACC 1
-#line 16 "perly.y"
+/* perly.c
+ *
+ * Copyright (c) 2004, 2005, 2006, 2007, by Larry Wall and others
+ *
+ * You may distribute under the terms of either the GNU General Public
+ * License or the Artistic License, as specified in the README file.
+ *
+ * Note that this file was originally generated as an output from
+ * GNU bison version 1.875, but now the code is statically maintained
+ * and edited; the bits that are dependent on perly.y are now
+ * #included from the files perly.tab and perly.act.
+ *
+ * Here is an important copyright statement from the original, generated
+ * file:
+ *
+ * As a special exception, when this file is copied by Bison into a
+ * Bison output file, you may use that output file without
+ * restriction. This special exception was added by the Free
+ * Software Foundation in version 1.24 of Bison.
+ *
+ * Note that this file is also #included in madly.c, to allow compilation
+ * of a second parser, Perl_madparse, that is identical to Perl_yyparse,
+ * but which includes extra code for dumping the parse tree.
+ * This is controlled by the PERL_IN_MADLY_C define.
+ */
+
#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 */
-
-#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 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;
-#line 62 "perly.y"
-#endif /* 0 */
-
-#ifdef USE_PURE_BISON
-#define YYLEX_PARAM (&yychar)
-#define yylex yylex_r
-#endif
-#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
-#endif
-#define YYMAXTOKEN 319
-#if YYDEBUG
-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",
-};
-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",
-};
+typedef unsigned char yytype_uint8;
+typedef signed char yytype_int8;
+typedef unsigned short int yytype_uint16;
+typedef short int yytype_int16;
+typedef signed char yysigned_char;
+
+#ifdef DEBUGGING
+# define YYDEBUG 1
+#else
+# define YYDEBUG 0
#endif
-#define yyclearin (yychar=(-1))
-#define yyerrok (yyerrflag=0)
-#ifdef YYSTACKSIZE
-#ifndef YYMAXDEPTH
-#define YYMAXDEPTH YYSTACKSIZE
+
+/* contains all the parser state tables; auto-generated from perly.y */
+#include "perly.tab"
+
+# define YYSIZE_T size_t
+
+#define YYEOF 0
+#define YYTERROR 1
+
+#define YYACCEPT goto yyacceptlab
+#define YYABORT goto yyabortlab
+#define YYERROR goto yyerrlab1
+
+/* Enable debugging if requested. */
+#ifdef DEBUGGING
+
+# define yydebug (DEBUG_p_TEST)
+
+# define YYFPRINTF PerlIO_printf
+
+# define YYDPRINTF(Args) \
+do { \
+ if (yydebug) \
+ YYFPRINTF Args; \
+} while (0)
+
+# define YYDSYMPRINTF(Title, Token, Value) \
+do { \
+ if (yydebug) { \
+ YYFPRINTF (Perl_debug_log, "%s ", Title); \
+ yysymprint (aTHX_ Perl_debug_log, Token, Value); \
+ YYFPRINTF (Perl_debug_log, "\n"); \
+ } \
+} while (0)
+
+/*--------------------------------.
+| Print this symbol on YYOUTPUT. |
+`--------------------------------*/
+
+static void
+yysymprint(pTHX_ PerlIO * const yyoutput, int yytype, const YYSTYPE * const yyvaluep)
+{
+ if (yytype < YYNTOKENS) {
+ YYFPRINTF (yyoutput, "token %s (", yytname[yytype]);
+# ifdef YYPRINT
+ YYPRINT (yyoutput, yytoknum[yytype], *yyvaluep);
+# else
+ YYFPRINTF (yyoutput, "0x%"UVxf, (UV)yyvaluep->ival);
+# endif
+ }
+ else
+ YYFPRINTF (yyoutput, "nterm %s (", yytname[yytype]);
+
+ YYFPRINTF (yyoutput, ")");
+}
+
+
+/* yy_stack_print()
+ * print the top 8 items on the parse stack.
+ */
+
+static void
+yy_stack_print (pTHX_ const yy_parser *parser)
+{
+ const yy_stack_frame *ps, *min;
+
+ min = parser->ps - 8 + 1;
+ if (min <= parser->stack)
+ min = parser->stack + 1;
+
+ PerlIO_printf(Perl_debug_log, "\nindex:");
+ for (ps = min; ps <= parser->ps; ps++)
+ PerlIO_printf(Perl_debug_log, " %8d", (int)(ps - parser->stack));
+
+ PerlIO_printf(Perl_debug_log, "\nstate:");
+ for (ps = min; ps <= parser->ps; ps++)
+ PerlIO_printf(Perl_debug_log, " %8d", ps->state);
+
+ PerlIO_printf(Perl_debug_log, "\ntoken:");
+ for (ps = min; ps <= parser->ps; ps++)
+ PerlIO_printf(Perl_debug_log, " %8.8s", ps->name);
+
+ PerlIO_printf(Perl_debug_log, "\nvalue:");
+ for (ps = min; ps <= parser->ps; ps++) {
+ switch (yy_type_tab[yystos[ps->state]]) {
+ case toketype_opval:
+ PerlIO_printf(Perl_debug_log, " %8.8s",
+ ps->val.opval
+ ? PL_op_name[ps->val.opval->op_type]
+ : "(Nullop)"
+ );
+ break;
+#ifndef PERL_IN_MADLY_C
+ case toketype_p_tkval:
+ PerlIO_printf(Perl_debug_log, " %8.8s",
+ ps->val.pval ? ps->val.pval : "(NULL)");
+ break;
+
+ case toketype_i_tkval:
#endif
+ case toketype_ival:
+ PerlIO_printf(Perl_debug_log, " %8"IVdf, (IV)ps->val.ival);
+ break;
+ default:
+ PerlIO_printf(Perl_debug_log, " %8"UVxf, (UV)ps->val.ival);
+ }
+ }
+ PerlIO_printf(Perl_debug_log, "\n\n");
+}
+
+# define YY_STACK_PRINT(parser) \
+do { \
+ if (yydebug && DEBUG_v_TEST) \
+ yy_stack_print (aTHX_ parser); \
+} while (0)
+
+
+/*------------------------------------------------.
+| Report that the YYRULE is going to be reduced. |
+`------------------------------------------------*/
+
+static void
+yy_reduce_print (pTHX_ int yyrule)
+{
+ int yyi;
+ const unsigned int yylineno = yyrline[yyrule];
+ YYFPRINTF (Perl_debug_log, "Reducing stack by rule %d (line %u), ",
+ yyrule - 1, yylineno);
+ /* Print the symbols being reduced, and their result. */
+ for (yyi = yyprhs[yyrule]; 0 <= yyrhs[yyi]; yyi++)
+ YYFPRINTF (Perl_debug_log, "%s ", yytname [yyrhs[yyi]]);
+ YYFPRINTF (Perl_debug_log, "-> %s\n", yytname [yyr1[yyrule]]);
+}
+
+# define YY_REDUCE_PRINT(Rule) \
+do { \
+ if (yydebug) \
+ yy_reduce_print (aTHX_ Rule); \
+} while (0)
+
+#else /* !DEBUGGING */
+# define YYDPRINTF(Args)
+# define YYDSYMPRINTF(Title, Token, Value)
+# define YY_STACK_PRINT(parser)
+# define YY_REDUCE_PRINT(Rule)
+#endif /* !DEBUGGING */
+
+/* called during cleanup (via SAVEDESTRUCTOR_X) to free any items on the
+ * parse stack, thus avoiding leaks if we die */
+
+static void
+S_clear_yystack(pTHX_ const yy_parser *parser)
+{
+ yy_stack_frame *ps = parser->ps;
+ int i = 0;
+
+ if (!parser->stack || ps == parser->stack)
+ return;
+
+ YYDPRINTF ((Perl_debug_log, "clearing the parse stack\n"));
+
+ /* Freeing ops on the stack, and the op_latefree / op_latefreed /
+ * op_attached flags:
+ *
+ * When we pop tokens off the stack during error recovery, or when
+ * we pop all the tokens off the stack after a die during a shift or
+ * reduce (i.e. Perl_croak somewhere in yylex() or in one of the
+ * newFOO() functions), then it's possible that some of these tokens are
+ * of type opval, pointing to an OP. All these ops are orphans; each is
+ * its own miniature subtree that has not yet been attached to a
+ * larger tree. In this case, we should clearly free the op (making
+ * sure, for each op we free that we have PL_comppad pointing to the
+ * right place for freeing any SVs attached to the op in threaded
+ * builds.
+ *
+ * However, there is a particular problem if we die in newFOO() called
+ * by a reducing action; e.g.
+ *
+ * foo : bar baz boz
+ * { $$ = newFOO($1,$2,$3) }
+ *
+ * where
+ * OP *newFOO { ....; if (...) croak; .... }
+ *
+ * In this case, when we come to clean bar baz and boz off the stack,
+ * we don't know whether newFOO() has already:
+ * * freed them
+ * * left them as is
+ * * attached them to part of a larger tree
+ * * attached them to PL_compcv
+ * * attached them to PL_compcv then freed it (as in BEGIN {die } )
+ *
+ * To get round this problem, we set the flag op_latefree on every op
+ * that gets pushed onto the parser stack. If op_free() sees this
+ * flag, it clears the op and frees any children,, but *doesn't* free
+ * the op itself; instead it sets the op_latefreed flag. This means
+ * that we can safely call op_free() multiple times on each stack op.
+ * So, when clearing the stack, we first, for each op that was being
+ * reduced, call op_free with op_latefree=1. This ensures that all ops
+ * hanging off these op are freed, but the reducing ops themselces are
+ * just undefed. Then we set op_latefreed=0 on *all* ops on the stack
+ * and free them. A little thought should convince you that this
+ * two-part approach to the reducing ops should handle the first three
+ * cases above safely.
+ *
+ * In the case of attaching to PL_compcv (currently just newATTRSUB
+ * does this), then we set the op_attached flag on the op that has
+ * been so attached, then avoid doing the final op_free during
+ * cleanup, on the assumption that it will happen (or has already
+ * happened) when PL_compcv is freed.
+ *
+ * Note this is fairly fragile mechanism. A more robust approach
+ * would be to use two of these flag bits as 2-bit reference count
+ * field for each op, indicating whether it is pointed to from:
+ * * a parent op
+ * * the parser stack
+ * * a CV
+ * but this would involve reworking all code (core and external) that
+ * manipulate op trees.
+ *
+ * XXX DAPM 17/1/07 I've decided its too fragile for now, and so have
+ * disabled it */
+
+#define DISABLE_STACK_FREE
+
+
+#ifdef DISABLE_STACK_FREE
+ ps -= parser->yylen;
+ PERL_UNUSED_VAR(i);
#else
-#ifdef YYMAXDEPTH
-#define YYSTACKSIZE YYMAXDEPTH
-#else
-#define YYSTACKSIZE 500
-#define YYMAXDEPTH 500
-#endif
+ /* clear any reducing ops (1st pass) */
+
+ for (i=0; i< parser->yylen; i++) {
+ LEAVE_SCOPE(ps[-i].savestack_ix);
+ if (yy_type_tab[yystos[ps[-i].state]] == toketype_opval
+ && ps[-i].val.opval) {
+ if ( ! (ps[-i].val.opval->op_attached
+ && !ps[-i].val.opval->op_latefreed))
+ {
+ if (ps[-i].comppad != PL_comppad) {
+ PAD_RESTORE_LOCAL(ps[-i].comppad);
+ }
+ op_free(ps[-i].val.opval);
+ }
+ }
+ }
#endif
-#line 797 "perly.y"
- /* PROGRAM */
-/* more stuff added to make perly_c.diff easier to apply */
+ /* now free whole the stack, including the just-reduced ops */
-#ifdef yyparse
-#undef yyparse
+ while (ps > parser->stack) {
+ LEAVE_SCOPE(ps->savestack_ix);
+ if (yy_type_tab[yystos[ps->state]] == toketype_opval
+ && ps->val.opval)
+ {
+ if (ps->comppad != PL_comppad) {
+ PAD_RESTORE_LOCAL(ps->comppad);
+ }
+ YYDPRINTF ((Perl_debug_log, "(freeing op)\n"));
+#ifndef DISABLE_STACK_FREE
+ ps->val.opval->op_latefree = 0;
+ if (!(ps->val.opval->op_attached && !ps->val.opval->op_latefreed))
#endif
-#define yyparse() Perl_yyparse(pTHX)
+ op_free(ps->val.opval);
+ }
+ ps--;
+ }
+}
+
+
+/*----------.
+| yyparse. |
+`----------*/
-#line 1509 "perly.c"
-#define YYABORT goto yyabort
-#define YYACCEPT goto yyaccept
-#define YYERROR goto yyerrlab
int
-yyparse()
-{
- 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;
+#ifdef PERL_IN_MADLY_C
+Perl_madparse (pTHX)
+#else
+Perl_yyparse (pTHX)
#endif
+{
+ dVAR;
+ register int yystate;
+ register int yyn;
+ int yyresult;
+
+ /* Lookahead token as an internal (translated) token number. */
+ int yytoken = 0;
+
+ register yy_parser *parser; /* the parser object */
+ register yy_stack_frame *ps; /* current parser stack frame */
+
+#define YYPOPSTACK parser->ps = --ps
+#define YYPUSHSTACK parser->ps = ++ps
- struct ysv *ysave;
-#ifdef USE_ITHREADS
- ENTER; /* force yydestruct() before we return */
+ /* The variable used to return semantic value and location from the
+ action routines: ie $$. */
+ YYSTYPE yyval;
+
+#ifndef PERL_IN_MADLY_C
+# ifdef PERL_MAD
+ if (PL_madskills)
+ return madparse();
+# endif
#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;
-
-#if YYDEBUG
- if ((yys = getenv("YYDEBUG")))
- {
- yyn = *yys;
- if (yyn >= '0' && yyn <= '9')
- yydebug = yyn - '0';
+
+ YYDPRINTF ((Perl_debug_log, "Starting parse\n"));
+
+ parser = PL_parser;
+ ps = parser->ps;
+
+ ENTER; /* force parser stack cleanup before we return */
+ SAVEDESTRUCTOR_X(S_clear_yystack, parser);
+
+/*------------------------------------------------------------.
+| yynewstate -- Push a new state, which is found in yystate. |
+`------------------------------------------------------------*/
+ yynewstate:
+
+ yystate = ps->state;
+
+ YYDPRINTF ((Perl_debug_log, "Entering state %d\n", yystate));
+
+#ifndef DISABLE_STACK_FREE
+ if (yy_type_tab[yystos[yystate]] == toketype_opval && ps->val.opval) {
+ ps->val.opval->op_latefree = 1;
+ ps->val.opval->op_latefreed = 0;
}
#endif
- yynerrs = 0;
- yyerrflag = 0;
- yychar = (-1);
-
- /*
- ** 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;
-
- yyssp = yyss;
- yyvsp = yyvs;
- *yyssp = yystate = 0;
-
-yyloop:
- if ((yyn = yydefred[yystate])) goto yyreduce;
- if (yychar < 0)
+ parser->yylen = 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", yystate,
- yychar, yys);
- }
-#endif
+ size_t size = ps - parser->stack + 1;
+
+ /* grow the stack? We always leave 1 spare slot,
+ * in case of a '' -> 'foo' reduction */
+
+ if (size >= (size_t)parser->stack_size - 1) {
+ /* this will croak on insufficient memory */
+ parser->stack_size *= 2;
+ Renew(parser->stack, parser->stack_size, yy_stack_frame);
+ ps = parser->ps = parser->stack + size -1;
+
+ YYDPRINTF((Perl_debug_log,
+ "parser stack size increased to %lu frames\n",
+ (unsigned long int)parser->stack_size));
+ }
}
- if ((yyn = yysindex[yystate]) && (yyn += yychar) >= 0 &&
- yyn <= YYTABLESIZE && yycheck[yyn] == yychar)
- {
-#if YYDEBUG
- if (yydebug)
- PerlIO_printf(Perl_debug_log, "yydebug: state %d, shifting to state %d\n",
- yystate, yytable[yyn]);
+
+/* Do appropriate processing given the current state. */
+/* Read a lookahead token if we need one and don't already have one. */
+
+ /* First try to decide what to do without reference to lookahead token. */
+
+ yyn = yypact[yystate];
+ if (yyn == YYPACT_NINF)
+ goto yydefault;
+
+ /* Not known => get a lookahead token if don't already have one. */
+
+ /* YYCHAR is either YYEMPTY or YYEOF or a valid lookahead symbol. */
+ if (parser->yychar == YYEMPTY) {
+ YYDPRINTF ((Perl_debug_log, "Reading a token: "));
+#ifdef PERL_IN_MADLY_C
+ parser->yychar = PL_madskills ? madlex() : yylex();
+#else
+ parser->yychar = yylex();
#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;
+
+# ifdef EBCDIC
+ if (parser->yychar >= 0 && parser->yychar < 255) {
+ parser->yychar = NATIVE_TO_ASCII(parser->yychar);
+ }
+# endif
}
- if ((yyn = yyrindex[yystate]) && (yyn += yychar) >= 0 &&
- yyn <= YYTABLESIZE && yycheck[yyn] == yychar)
- {
- yyn = yytable[yyn];
- goto yyreduce;
+
+ if (parser->yychar <= YYEOF) {
+ parser->yychar = yytoken = YYEOF;
+ YYDPRINTF ((Perl_debug_log, "Now at end of input.\n"));
+ }
+ else {
+ yytoken = YYTRANSLATE (parser->yychar);
+ YYDSYMPRINTF ("Next token is", yytoken, &parser->yylval);
}
- if (yyerrflag) goto yyinrecovery;
-#ifdef lint
-#endif
+ /* If the proper action on seeing token YYTOKEN is to reduce or to
+ detect an error, take that action. */
+ yyn += yytoken;
+ if (yyn < 0 || YYLAST < yyn || yycheck[yyn] != yytoken)
+ goto yydefault;
+ yyn = yytable[yyn];
+ if (yyn <= 0) {
+ if (yyn == 0 || yyn == YYTABLE_NINF)
+ goto yyerrlab;
+ yyn = -yyn;
+ goto yyreduce;
+ }
- yyerror("syntax error");
-#ifdef lint
+ if (yyn == YYFINAL)
+ YYACCEPT;
-#endif
+ /* Shift the lookahead token. */
+ YYDPRINTF ((Perl_debug_log, "Shifting token %s, ", yytname[yytoken]));
- ++yynerrs;
-yyinrecovery:
- if (yyerrflag < 3)
- {
- yyerrflag = 3;
- for (;;)
- {
- if ((yyn = yysindex[*yyssp]) && (yyn += YYERRCODE) >= 0 &&
- yyn <= YYTABLESIZE && yycheck[yyn] == YYERRCODE)
- {
-#if YYDEBUG
- if (yydebug)
- PerlIO_printf(Perl_debug_log, "yydebug: state %d, error recovery shifting\
- to state %d\n", *yyssp, yytable[yyn]);
+ /* Discard the token being shifted unless it is eof. */
+ if (parser->yychar != YYEOF)
+ parser->yychar = YYEMPTY;
+
+ YYPUSHSTACK;
+ ps->state = yyn;
+ ps->val = parser->yylval;
+ ps->comppad = PL_comppad;
+ ps->savestack_ix = PL_savestack_ix;
+#ifdef DEBUGGING
+ ps->name = (const char *)(yytname[yytoken]);
#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;
- goto yyloop;
- }
- else
- {
-#if YYDEBUG
- if (yydebug)
- PerlIO_printf(Perl_debug_log, "yydebug: error recovery discarding state %d\n",
- *yyssp);
+
+ /* Count tokens shifted since error; after three, turn off error
+ status. */
+ if (parser->yyerrstatus)
+ parser->yyerrstatus--;
+
+ goto yynewstate;
+
+
+ /*-----------------------------------------------------------.
+ | yydefault -- do the default action for the current state. |
+ `-----------------------------------------------------------*/
+ yydefault:
+ yyn = yydefact[yystate];
+ if (yyn == 0)
+ goto yyerrlab;
+ goto yyreduce;
+
+
+ /*-----------------------------.
+ | yyreduce -- Do a reduction. |
+ `-----------------------------*/
+ yyreduce:
+ /* yyn is the number of a rule to reduce with. */
+ parser->yylen = yyr2[yyn];
+
+ /* If YYLEN is nonzero, implement the default value of the action:
+ "$$ = $1".
+
+ Otherwise, the following line sets YYVAL to garbage.
+ This behavior is undocumented and Bison
+ users should not rely upon it. Assigning to YYVAL
+ unconditionally makes the parser a bit smaller, and it avoids a
+ GCC warning that YYVAL may be used uninitialized. */
+ yyval = ps[1-parser->yylen].val;
+
+ YY_STACK_PRINT(parser);
+ YY_REDUCE_PRINT (yyn);
+
+ switch (yyn) {
+
+
+#define dep() deprecate("\"do\" to call subroutines")
+
+#ifdef PERL_IN_MADLY_C
+# define IVAL(i) (i)->tk_lval.ival
+# define PVAL(p) (p)->tk_lval.pval
+# define TOKEN_GETMAD(a,b,c) token_getmad((a),(b),(c))
+# define TOKEN_FREE(a) token_free(a)
+# define OP_GETMAD(a,b,c) op_getmad((a),(b),(c))
+# define IF_MAD(a,b) (a)
+# define DO_MAD(a) a
+# define MAD
+#else
+# define IVAL(i) (i)
+# define PVAL(p) (p)
+# define TOKEN_GETMAD(a,b,c)
+# define TOKEN_FREE(a)
+# define OP_GETMAD(a,b,c)
+# define IF_MAD(a,b) (b)
+# define DO_MAD(a)
+# undef MAD
#endif
- if (yyssp <= yyss) goto yyabort;
- --yyssp;
- --yyvsp;
- }
- }
+
+/* contains all the rule actions; auto-generated from perly.y */
+#include "perly.act"
+
}
- else
+
+#ifndef DISABLE_STACK_FREE
+ /* any just-reduced ops with the op_latefreed flag cleared need to be
+ * freed; the rest need the flag resetting */
{
- if (yychar == 0) goto yyabort;
-#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, error recovery discards token %d (%s)\n",
- yystate, yychar, yys);
- }
-#endif
- yychar = (-1);
- goto yyloop;
+ int i;
+ for (i=0; i< parser->yylen; i++) {
+ if (yy_type_tab[yystos[ps[-i].state]] == toketype_opval
+ && ps[-i].val.opval)
+ {
+ ps[-i].val.opval->op_latefree = 0;
+ if (ps[-i].val.opval->op_latefreed)
+ op_free(ps[-i].val.opval);
+ }
+ }
}
-yyreduce:
-#if YYDEBUG
- if (yydebug)
- PerlIO_printf(Perl_debug_log, "yydebug: state %d, reducing by rule %d (%s)\n",
- yystate, yyn, yyrule[yyn]);
#endif
- 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 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 142 "perly.y"
-{ yyval.ival = block_start(TRUE); }
-break;
-case 4:
-#line 146 "perly.y"
-{
-#if defined(YYDEBUG) && defined(DEBUGGING)
- yydebug = (DEBUG_p_TEST);
+
+ parser->ps = ps -= (parser->yylen-1);
+
+ /* Now shift the result of the reduction. Determine what state
+ that goes to, based on the state we popped back to and the rule
+ number reduced by. */
+
+ ps->val = yyval;
+ ps->comppad = PL_comppad;
+ ps->savestack_ix = PL_savestack_ix;
+#ifdef DEBUGGING
+ ps->name = (const char *)(yytname [yyr1[yyn]]);
#endif
- PL_expect = XSTATE; yyval.ival = block_start(TRUE);
- }
-break;
-case 5:
-#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 162 "perly.y"
-{ yyval.ival = block_start(FALSE); }
-break;
-case 7:
-#line 167 "perly.y"
-{ yyval.opval = Nullop; }
-break;
-case 8:
-#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 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;
- PL_copline = NOLINE;
- }
- PL_expect = XSTATE; }
-break;
-case 13:
-#line 191 "perly.y"
-{ yyval.opval = newSTATEOP(0, yyvsp[-2].pval, yyvsp[-1].opval);
- PL_expect = XSTATE; }
-break;
-case 14:
-#line 197 "perly.y"
-{ yyval.opval = Nullop; }
-break;
-case 15:
-#line 199 "perly.y"
-{ yyval.opval = yyvsp[0].opval; }
-break;
-case 16:
-#line 201 "perly.y"
-{ yyval.opval = newLOGOP(OP_AND, 0, yyvsp[0].opval, yyvsp[-2].opval); }
-break;
-case 17:
-#line 203 "perly.y"
-{ yyval.opval = newLOGOP(OP_OR, 0, yyvsp[0].opval, yyvsp[-2].opval); }
-break;
-case 18:
-#line 205 "perly.y"
-{ yyval.opval = newLOOPOP(OPf_PARENS, 1, scalar(yyvsp[0].opval), yyvsp[-2].opval); }
-break;
-case 19:
-#line 207 "perly.y"
-{ yyval.opval = newLOOPOP(OPf_PARENS, 1, yyvsp[0].opval, yyvsp[-2].opval);}
-break;
-case 20:
-#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 215 "perly.y"
-{ yyval.opval = Nullop; }
-break;
-case 22:
-#line 217 "perly.y"
-{ (yyvsp[0].opval)->op_flags |= OPf_PARENS; yyval.opval = scope(yyvsp[0].opval); }
-break;
-case 23:
-#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 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 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 237 "perly.y"
-{ yyval.opval = Nullop; }
-break;
-case 27:
-#line 239 "perly.y"
-{ yyval.opval = scope(yyvsp[0].opval); }
-break;
-case 28:
-#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 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 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 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 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 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 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 289 "perly.y"
-{ yyval.opval = Nullop; }
-break;
-case 37:
-#line 295 "perly.y"
-{ (void)scan_num("1", &yylval); yyval.opval = yylval.opval; }
-break;
-case 39:
-#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 310 "perly.y"
-{ yyval.opval = yyvsp[0].opval; intro_my(); }
-break;
-case 42:
-#line 314 "perly.y"
-{ yyval.opval = yyvsp[0].opval; intro_my(); }
-break;
-case 43:
-#line 318 "perly.y"
-{ yyval.opval = yyvsp[0].opval; intro_my(); }
-break;
-case 44:
-#line 323 "perly.y"
-{ yyval.pval = Nullch; }
-break;
-case 46:
-#line 329 "perly.y"
-{ yyval.ival = 0; }
-break;
-case 47:
-#line 331 "perly.y"
-{ yyval.ival = 0; }
-break;
-case 48:
-#line 333 "perly.y"
-{ yyval.ival = 0; }
-break;
-case 49:
-#line 335 "perly.y"
-{ yyval.ival = 0; }
-break;
-case 50:
-#line 337 "perly.y"
-{ yyval.ival = 0; }
-break;
-case 51:
-#line 341 "perly.y"
-{ newFORM(yyvsp[-2].ival, yyvsp[-1].opval, yyvsp[0].opval); }
-break;
-case 52:
-#line 344 "perly.y"
-{ yyval.opval = yyvsp[0].opval; }
-break;
-case 53:
-#line 345 "perly.y"
-{ yyval.opval = Nullop; }
-break;
-case 54:
-#line 350 "perly.y"
-{ newMYSUB(yyvsp[-4].ival, yyvsp[-3].opval, yyvsp[-2].opval, yyvsp[-1].opval, yyvsp[0].opval); }
-break;
-case 55:
-#line 355 "perly.y"
-{ newATTRSUB(yyvsp[-4].ival, yyvsp[-3].opval, yyvsp[-2].opval, yyvsp[-1].opval, yyvsp[0].opval); }
-break;
-case 56:
-#line 359 "perly.y"
-{ yyval.ival = start_subparse(FALSE, 0); }
-break;
-case 57:
-#line 363 "perly.y"
-{ yyval.ival = start_subparse(FALSE, CVf_ANON); }
-break;
-case 58:
-#line 367 "perly.y"
-{ yyval.ival = start_subparse(TRUE, 0); }
-break;
-case 59:
-#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 380 "perly.y"
-{ yyval.opval = Nullop; }
-break;
-case 62:
-#line 386 "perly.y"
-{ yyval.opval = Nullop; }
-break;
-case 63:
-#line 388 "perly.y"
-{ yyval.opval = yyvsp[0].opval; }
-break;
-case 64:
-#line 390 "perly.y"
-{ yyval.opval = Nullop; }
-break;
-case 65:
-#line 395 "perly.y"
-{ yyval.opval = yyvsp[0].opval; }
-break;
-case 66:
-#line 397 "perly.y"
-{ yyval.opval = Nullop; }
-break;
-case 67:
-#line 401 "perly.y"
-{ yyval.opval = yyvsp[0].opval; }
-break;
-case 68:
-#line 402 "perly.y"
-{ yyval.opval = Nullop; PL_expect = XSTATE; }
-break;
-case 69:
-#line 406 "perly.y"
-{ package(yyvsp[-1].opval); }
-break;
-case 70:
-#line 408 "perly.y"
-{ package(Nullop); }
-break;
-case 71:
-#line 412 "perly.y"
-{ CvSPECIAL_on(PL_compcv); /* It's a BEGIN {} */ }
-break;
-case 72:
-#line 414 "perly.y"
-{ utilize(yyvsp[-6].ival, yyvsp[-5].ival, yyvsp[-3].opval, yyvsp[-2].opval, yyvsp[-1].opval); }
-break;
-case 73:
-#line 419 "perly.y"
-{ yyval.opval = newLOGOP(OP_AND, 0, yyvsp[-2].opval, yyvsp[0].opval); }
-break;
-case 74:
-#line 421 "perly.y"
-{ yyval.opval = newLOGOP(yyvsp[-1].ival, 0, yyvsp[-2].opval, yyvsp[0].opval); }
-break;
-case 75:
-#line 423 "perly.y"
-{ yyval.opval = newLOGOP(OP_DOR, 0, yyvsp[-2].opval, yyvsp[0].opval); }
-break;
-case 77:
-#line 429 "perly.y"
-{ yyval.opval = yyvsp[-1].opval; }
-break;
-case 78:
-#line 431 "perly.y"
-{ yyval.opval = append_elem(OP_LIST, yyvsp[-2].opval, yyvsp[0].opval); }
-break;
-case 80:
-#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 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 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 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 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 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 462 "perly.y"
-{ yyval.opval = convert(yyvsp[-1].ival, 0, yyvsp[0].opval); }
-break;
-case 87:
-#line 464 "perly.y"
-{ yyval.opval = convert(yyvsp[-3].ival, 0, yyvsp[-1].opval); }
-break;
-case 88:
-#line 466 "perly.y"
-{ yyvsp[0].opval = newANONATTRSUB(yyvsp[-1].ival, 0, Nullop, yyvsp[0].opval); }
-break;
-case 89:
-#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 482 "perly.y"
-{ yyval.opval = newBINOP(OP_GELEM, 0, yyvsp[-4].opval, scalar(yyvsp[-2].opval)); }
-break;
-case 93:
-#line 484 "perly.y"
-{ yyval.opval = newBINOP(OP_AELEM, 0, oopsAV(yyvsp[-3].opval), scalar(yyvsp[-1].opval)); }
-break;
-case 94:
-#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 490 "perly.y"
-{ yyval.opval = newBINOP(OP_AELEM, 0,
- ref(newAVREF(yyvsp[-3].opval),OP_RV2AV),
- scalar(yyvsp[-1].opval));}
-break;
-case 96:
-#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 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 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 507 "perly.y"
-{ yyval.opval = newUNOP(OP_ENTERSUB, OPf_STACKED,
- newCVREF(0, scalar(yyvsp[-3].opval))); }
-break;
-case 100:
-#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 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 519 "perly.y"
-{ yyval.opval = newUNOP(OP_ENTERSUB, OPf_STACKED,
- newCVREF(0, scalar(yyvsp[-2].opval))); }
-break;
-case 103:
-#line 525 "perly.y"
-{ yyval.opval = newASSIGNOP(OPf_STACKED, yyvsp[-2].opval, yyvsp[-1].ival, yyvsp[0].opval); }
-break;
-case 104:
-#line 527 "perly.y"
-{ yyval.opval = newBINOP(yyvsp[-1].ival, 0, scalar(yyvsp[-2].opval), scalar(yyvsp[0].opval)); }
-break;
-case 105:
-#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 533 "perly.y"
-{ yyval.opval = newBINOP(yyvsp[-1].ival, 0, scalar(yyvsp[-2].opval), scalar(yyvsp[0].opval)); }
-break;
-case 107:
-#line 535 "perly.y"
-{ yyval.opval = newBINOP(yyvsp[-1].ival, 0, scalar(yyvsp[-2].opval), scalar(yyvsp[0].opval)); }
-break;
-case 108:
-#line 537 "perly.y"
-{ yyval.opval = newBINOP(yyvsp[-1].ival, 0, scalar(yyvsp[-2].opval), scalar(yyvsp[0].opval)); }
-break;
-case 109:
-#line 539 "perly.y"
-{ yyval.opval = newBINOP(yyvsp[-1].ival, 0, scalar(yyvsp[-2].opval), scalar(yyvsp[0].opval)); }
-break;
-case 110:
-#line 541 "perly.y"
-{ yyval.opval = newBINOP(yyvsp[-1].ival, 0, scalar(yyvsp[-2].opval), scalar(yyvsp[0].opval)); }
-break;
-case 111:
-#line 543 "perly.y"
-{ yyval.opval = newBINOP(yyvsp[-1].ival, 0, scalar(yyvsp[-2].opval), scalar(yyvsp[0].opval)); }
-break;
-case 112:
-#line 545 "perly.y"
-{ yyval.opval = newRANGE(yyvsp[-1].ival, scalar(yyvsp[-2].opval), scalar(yyvsp[0].opval));}
-break;
-case 113:
-#line 547 "perly.y"
-{ yyval.opval = newLOGOP(OP_AND, 0, yyvsp[-2].opval, yyvsp[0].opval); }
-break;
-case 114:
-#line 549 "perly.y"
-{ yyval.opval = newLOGOP(OP_OR, 0, yyvsp[-2].opval, yyvsp[0].opval); }
-break;
-case 115:
-#line 551 "perly.y"
-{ yyval.opval = newLOGOP(OP_DOR, 0, yyvsp[-2].opval, yyvsp[0].opval); }
-break;
-case 116:
-#line 553 "perly.y"
-{ yyval.opval = bind_match(yyvsp[-1].ival, yyvsp[-2].opval, yyvsp[0].opval); }
-break;
-case 117:
-#line 558 "perly.y"
-{ yyval.opval = newUNOP(OP_NEGATE, 0, scalar(yyvsp[0].opval)); }
-break;
-case 118:
-#line 560 "perly.y"
-{ yyval.opval = yyvsp[0].opval; }
-break;
-case 119:
-#line 562 "perly.y"
-{ yyval.opval = newUNOP(OP_NOT, 0, scalar(yyvsp[0].opval)); }
-break;
-case 120:
-#line 564 "perly.y"
-{ yyval.opval = newUNOP(OP_COMPLEMENT, 0, scalar(yyvsp[0].opval));}
-break;
-case 121:
-#line 566 "perly.y"
-{ yyval.opval = newUNOP(OP_POSTINC, 0,
- mod(scalar(yyvsp[-1].opval), OP_POSTINC)); }
-break;
-case 122:
-#line 569 "perly.y"
-{ yyval.opval = newUNOP(OP_POSTDEC, 0,
- mod(scalar(yyvsp[-1].opval), OP_POSTDEC)); }
-break;
-case 123:
-#line 572 "perly.y"
-{ yyval.opval = newUNOP(OP_PREINC, 0,
- mod(scalar(yyvsp[0].opval), OP_PREINC)); }
-break;
-case 124:
-#line 575 "perly.y"
-{ yyval.opval = newUNOP(OP_PREDEC, 0,
- mod(scalar(yyvsp[0].opval), OP_PREDEC)); }
-break;
-case 125:
-#line 582 "perly.y"
-{ yyval.opval = newANONLIST(yyvsp[-1].opval); }
-break;
-case 126:
-#line 584 "perly.y"
-{ yyval.opval = newANONLIST(Nullop); }
-break;
-case 127:
-#line 586 "perly.y"
-{ yyval.opval = newANONHASH(yyvsp[-2].opval); }
-break;
-case 128:
-#line 588 "perly.y"
-{ yyval.opval = newANONHASH(Nullop); }
-break;
-case 129:
-#line 590 "perly.y"
-{ yyval.opval = newANONATTRSUB(yyvsp[-3].ival, yyvsp[-2].opval, yyvsp[-1].opval, yyvsp[0].opval); }
-break;
-case 130:
-#line 596 "perly.y"
-{ yyval.opval = dofile(yyvsp[0].opval); }
-break;
-case 131:
-#line 598 "perly.y"
-{ yyval.opval = newUNOP(OP_NULL, OPf_SPECIAL, scope(yyvsp[0].opval)); }
-break;
-case 132:
-#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 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 633 "perly.y"
-{ yyval.opval = newCONDOP(0, yyvsp[-4].opval, yyvsp[-2].opval, yyvsp[0].opval); }
-break;
-case 141:
-#line 635 "perly.y"
-{ yyval.opval = newUNOP(OP_REFGEN, 0, mod(yyvsp[0].opval,OP_REFGEN)); }
-break;
-case 142:
-#line 637 "perly.y"
-{ yyval.opval = yyvsp[0].opval; }
-break;
-case 143:
-#line 639 "perly.y"
-{ yyval.opval = localize(yyvsp[0].opval,yyvsp[-1].ival); }
-break;
-case 144:
-#line 641 "perly.y"
-{ yyval.opval = sawparens(yyvsp[-1].opval); }
-break;
-case 145:
-#line 643 "perly.y"
-{ yyval.opval = sawparens(newNULLLIST()); }
-break;
-case 146:
-#line 645 "perly.y"
-{ yyval.opval = yyvsp[0].opval; }
-break;
-case 147:
-#line 647 "perly.y"
-{ yyval.opval = yyvsp[0].opval; }
-break;
-case 148:
-#line 649 "perly.y"
-{ yyval.opval = yyvsp[0].opval; }
-break;
-case 149:
-#line 651 "perly.y"
-{ yyval.opval = yyvsp[0].opval; }
-break;
-case 150:
-#line 653 "perly.y"
-{ yyval.opval = newUNOP(OP_AV2ARYLEN, 0, ref(yyvsp[0].opval, OP_AV2ARYLEN));}
-break;
-case 151:
-#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"
+
+ yyn = yyr1[yyn];
+
+ yystate = yypgoto[yyn - YYNTOKENS] + ps[-1].state;
+ if (0 <= yystate && yystate <= YYLAST && yycheck[yystate] == ps[-1].state)
+ yystate = yytable[yystate];
+ else
+ yystate = yydefgoto[yyn - YYNTOKENS];
+ ps->state = yystate;
+
+ goto yynewstate;
+
+
+ /*------------------------------------.
+ | yyerrlab -- here on detecting error |
+ `------------------------------------*/
+ yyerrlab:
+ /* If not already recovering from an error, report this error. */
+ if (!parser->yyerrstatus) {
+ yyerror ("syntax error");
}
- 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 (parser->yyerrstatus == 3) {
+ /* If just tried and failed to reuse lookahead token after an
+ error, discard it. */
+
+ /* Return failure if at end of input. */
+ if (parser->yychar == YYEOF) {
+ /* Pop the error token. */
+ YYPOPSTACK;
+ /* Pop the rest of the stack. */
+ while (ps > parser->stack) {
+ YYDSYMPRINTF ("Error: popping", yystos[ps->state], &ps->val);
+ LEAVE_SCOPE(ps->savestack_ix);
+ if (yy_type_tab[yystos[ps->state]] == toketype_opval
+ && ps->val.opval)
+ {
+ YYDPRINTF ((Perl_debug_log, "(freeing op)\n"));
+ if (ps->comppad != PL_comppad) {
+ PAD_RESTORE_LOCAL(ps->comppad);
+ }
+ ps->val.opval->op_latefree = 0;
+ op_free(ps->val.opval);
+ }
+ YYPOPSTACK;
+ }
+ YYABORT;
+ }
+
+ YYDSYMPRINTF ("Error: discarding", yytoken, &parser->yylval);
+ parser->yychar = YYEMPTY;
+
}
- 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;
+
+ /* Else will try to reuse lookahead token after shifting the error
+ token. */
+ goto yyerrlab1;
+
+
+ /*----------------------------------------------------.
+ | yyerrlab1 -- error raised explicitly by an action. |
+ `----------------------------------------------------*/
+ yyerrlab1:
+ parser->yyerrstatus = 3; /* Each real token shifted decrements this. */
+
+ for (;;) {
+ yyn = yypact[yystate];
+ if (yyn != YYPACT_NINF) {
+ yyn += YYTERROR;
+ if (0 <= yyn && yyn <= YYLAST && yycheck[yyn] == YYTERROR) {
+ yyn = yytable[yyn];
+ if (0 < yyn)
+ break;
+ }
+ }
+
+ /* Pop the current state because it cannot handle the error token. */
+ if (ps == parser->stack)
+ YYABORT;
+
+ YYDSYMPRINTF ("Error: popping", yystos[ps->state], &ps->val);
+ LEAVE_SCOPE(ps->savestack_ix);
+ if (yy_type_tab[yystos[ps->state]] == toketype_opval && ps->val.opval) {
+ YYDPRINTF ((Perl_debug_log, "(freeing op)\n"));
+ if (ps->comppad != PL_comppad) {
+ PAD_RESTORE_LOCAL(ps->comppad);
+ }
+ ps->val.opval->op_latefree = 0;
+ op_free(ps->val.opval);
+ }
+ YYPOPSTACK;
+ yystate = ps->state;
+
+ YY_STACK_PRINT(parser);
}
- *++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 */
+
+ if (yyn == YYFINAL)
+ YYACCEPT;
+
+ YYDPRINTF ((Perl_debug_log, "Shifting error token, "));
+
+ YYPUSHSTACK;
+ ps->state = yyn;
+ ps->val = parser->yylval;
+ ps->comppad = PL_comppad;
+ ps->savestack_ix = PL_savestack_ix;
+#ifdef DEBUGGING
+ ps->name ="<err>";
#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);
+ goto yynewstate;
+
+
+ /*-------------------------------------.
+ | yyacceptlab -- YYACCEPT comes here. |
+ `-------------------------------------*/
+ yyacceptlab:
+ yyresult = 0;
+ parser->ps = parser->stack; /* disable cleanup */
+ goto yyreturn;
+
+ /*-----------------------------------.
+ | yyabortlab -- YYABORT comes here. |
+ `-----------------------------------*/
+ yyabortlab:
+ yyresult = 1;
+ goto yyreturn;
+
+ yyreturn:
+ LEAVE; /* force parser stack cleanup before we return */
+ return yyresult;
}
+
+/*
+ * Local variables:
+ * c-indentation-style: bsd
+ * c-basic-offset: 4
+ * indent-tabs-mode: t
+ * End:
+ *
+ * ex: set ts=8 sts=4 sw=4 noet:
+ */