-extern char *malloc(), *realloc();
-
-# line 39 "perly.y"
+#ifndef lint
+/* static char yysccsid[] = "@(#)yaccpar 1.8 (Berkeley) 01/20/91"; */
+#endif
+#define YYBYACC 1
+#line 16 "perly.y"
#include "EXTERN.h"
+#define PERL_IN_PERLY_C
#include "perl.h"
+#ifdef EBCDIC
+#undef YYDEBUG
+#endif
+#define dep() deprecate("\"do\" to call subroutines")
+
+/* stuff included here to make perly_c.diff apply better */
-/*SUPPRESS 530*/
-/*SUPPRESS 593*/
-/*SUPPRESS 595*/
+#define yydebug PL_yydebug
+#define yynerrs PL_yynerrs
+#define yyerrflag PL_yyerrflag
+#define yychar PL_yychar
+#define yyval PL_yyval
+#define yylval PL_yylval
+struct ysv {
+ short* yyss;
+ YYSTYPE* yyvs;
+ int oldyydebug;
+ int oldyynerrs;
+ int oldyyerrflag;
+ int oldyychar;
+ YYSTYPE oldyyval;
+ YYSTYPE oldyylval;
+};
+
+static void yydestruct(pTHXo_ void *ptr);
-# line 50 "perly.y"
-typedef union {
+#line 51 "perly.y"
+#if 0 /* get this from perly.h instead */
+#line 54 "perly.y"
+typedef union {
I32 ival;
char *pval;
OP *opval;
GV *gvval;
} YYSTYPE;
-# define WORD 257
-# define METHOD 258
-# define THING 259
-# define PMFUNC 260
-# define LABEL 261
-# define FORMAT 262
-# define SUB 263
-# define PACKAGE 264
-# define WHILE 265
-# define UNTIL 266
-# define IF 267
-# define UNLESS 268
-# define ELSE 269
-# define ELSIF 270
-# define CONTINUE 271
-# define FOR 272
-# define LOOPEX 273
-# define DOTDOT 274
-# define FUNC0 275
-# define FUNC1 276
-# define FUNC 277
-# define RELOP 278
-# define EQOP 279
-# define MULOP 280
-# define ADDOP 281
-# define DOLSHARP 282
-# define DO 283
-# define LOCAL 284
-# define DELETE 285
-# define HASHBRACK 286
-# define LSTOP 287
-# define OROR 288
-# define ANDAND 289
-# define BITOROP 290
-# define BITANDOP 291
-# define UNIOP 292
-# define SHIFTOP 293
-# define MATCHOP 294
-# define ARROW 295
-# define UMINUS 296
-# define REFGEN 297
-# define POWOP 298
-# define PREINC 299
-# define PREDEC 300
-# define POSTINC 301
-# define POSTDEC 302
-#define yyclearin yychar = -1
-#define yyerrok yyerrflag = 0
-extern int yychar;
-extern int yyerrflag;
-#ifndef YYMAXDEPTH
-#define YYMAXDEPTH 150
-#endif
-YYSTYPE yylval, yyval;
-# define YYERRCODE 256
-
-# line 569 "perly.y"
- /* PROGRAM */
-int yyexca[] ={
--1, 1,
- 0, -1,
- -2, 0,
--1, 3,
- 0, 2,
- -2, 39,
--1, 21,
- 295, 145,
- -2, 25,
--1, 40,
- 41, 97,
- 265, 97,
- 266, 97,
- 267, 97,
- 268, 97,
- 274, 97,
- 278, 97,
- 279, 97,
- 280, 97,
- 281, 97,
- 44, 97,
- 61, 97,
- 63, 97,
- 58, 97,
- 288, 97,
- 289, 97,
- 290, 97,
- 291, 97,
- 293, 97,
- 294, 97,
- 295, 97,
- 298, 97,
- 301, 97,
- 302, 97,
- 59, 97,
- 93, 97,
- -2, 144,
--1, 54,
- 41, 133,
- 265, 133,
- 266, 133,
- 267, 133,
- 268, 133,
- 274, 133,
- 278, 133,
- 279, 133,
- 280, 133,
- 281, 133,
- 44, 133,
- 61, 133,
- 63, 133,
- 58, 133,
- 288, 133,
- 289, 133,
- 290, 133,
- 291, 133,
- 293, 133,
- 294, 133,
- 295, 133,
- 298, 133,
- 301, 133,
- 302, 133,
- 59, 133,
- 93, 133,
- -2, 143,
--1, 76,
- 59, 35,
- -2, 0,
--1, 112,
- 301, 0,
- 302, 0,
- -2, 88,
--1, 113,
- 301, 0,
- 302, 0,
- -2, 89,
--1, 192,
- 278, 0,
- -2, 71,
--1, 193,
- 279, 0,
- -2, 72,
--1, 194,
- 274, 0,
- -2, 75,
--1, 310,
- 41, 35,
- -2, 0,
- };
-# define YYNPROD 152
-# define YYLAST 2258
-int yyact[]={
-
- 107, 162, 104, 105, 90, 102, 229, 103, 148, 90,
- 21, 239, 67, 104, 105, 150, 228, 91, 25, 72,
- 74, 240, 241, 80, 82, 78, 91, 92, 56, 31,
- 26, 102, 56, 58, 61, 90, 37, 132, 57, 30,
- 102, 29, 69, 68, 90, 244, 115, 117, 119, 129,
- 98, 133, 91, 92, 324, 16, 155, 77, 91, 92,
- 59, 14, 11, 12, 13, 93, 102, 152, 87, 153,
- 90, 93, 102, 157, 317, 159, 90, 315, 198, 164,
- 156, 166, 158, 168, 298, 161, 297, 38, 165, 296,
- 167, 262, 169, 170, 171, 172, 202, 210, 26, 200,
- 268, 215, 123, 220, 31, 81, 87, 56, 58, 61,
- 199, 37, 121, 57, 30, 26, 29, 87, 258, 26,
- 79, 203, 32, 73, 3, 310, 98, 99, 91, 92,
- 211, 212, 213, 214, 124, 59, 218, 98, 99, 91,
- 92, 93, 102, 71, 122, 223, 90, 97, 96, 95,
- 94, 237, 93, 102, 121, 316, 154, 90, 87, 70,
- 87, 87, 38, 87, 66, 87, 295, 31, 87, 235,
- 56, 58, 61, 318, 37, 299, 57, 30, 293, 29,
- 243, 14, 11, 12, 13, 327, 122, 325, 26, 98,
- 99, 91, 92, 87, 26, 204, 87, 32, 59, 320,
- 96, 95, 94, 26, 93, 102, 26, 255, 256, 90,
- 292, 266, 259, 174, 265, 232, 87, 234, 314, 304,
- 98, 99, 91, 92, 267, 38, 26, 323, 271, 273,
- 87, 264, 281, 94, 282, 93, 102, 284, 278, 286,
- 90, 287, 263, 289, 206, 197, 156, 56, 202, 139,
- 207, 200, 24, 54, 65, 46, 53, 26, 231, 221,
- 32, 18, 19, 22, 23, 209, 56, 294, 20, 49,
- 126, 51, 52, 63, 288, 280, 254, 300, 60, 48,
- 36, 45, 39, 62, 308, 101, 219, 160, 50, 85,
- 86, 83, 84, 33, 285, 34, 35, 312, 311, 274,
- 242, 313, 87, 87, 238, 233, 31, 87, 87, 56,
- 58, 61, 322, 37, 272, 57, 30, 149, 29, 25,
- 85, 86, 83, 84, 326, 201, 328, 24, 54, 65,
- 46, 53, 56, 137, 136, 135, 76, 59, 329, 306,
- 307, 127, 309, 8, 49, 7, 51, 52, 63, 163,
- 2, 9, 55, 60, 48, 36, 45, 39, 62, 17,
- 47, 41, 44, 50, 38, 42, 321, 43, 33, 31,
- 34, 35, 56, 58, 61, 15, 37, 270, 57, 30,
- 10, 29, 5, 208, 205, 88, 6, 4, 147, 1,
- 0, 54, 65, 46, 53, 0, 26, 0, 0, 32,
- 59, 0, 0, 0, 0, 0, 0, 49, 0, 51,
- 52, 63, 0, 0, 0, 28, 60, 48, 36, 45,
- 39, 62, 0, 0, 0, 0, 50, 38, 0, 150,
- 0, 33, 31, 34, 35, 56, 58, 61, 0, 37,
- 0, 57, 30, 0, 29, 106, 108, 109, 110, 111,
- 112, 113, 98, 99, 91, 92, 0, 0, 261, 26,
- 0, 0, 32, 59, 95, 94, 0, 93, 102, 0,
- 0, 0, 90, 0, 0, 0, 31, 0, 0, 56,
- 58, 61, 0, 37, 0, 57, 30, 236, 29, 0,
- 38, 0, 0, 0, 0, 0, 100, 0, 0, 0,
- 98, 99, 91, 92, 0, 0, 0, 59, 0, 0,
- 97, 96, 95, 94, 0, 93, 102, 0, 0, 0,
- 90, 275, 26, 0, 276, 32, 0, 0, 0, 0,
- 54, 65, 46, 53, 38, 225, 260, 0, 227, 0,
- 230, 89, 0, 101, 269, 0, 49, 0, 51, 52,
- 63, 0, 0, 0, 0, 60, 48, 36, 45, 39,
- 62, 283, 0, 0, 0, 50, 26, 0, 0, 32,
- 33, 31, 34, 35, 56, 58, 61, 0, 37, 257,
- 57, 30, 0, 29, 0, 0, 0, 0, 0, 0,
- 0, 0, 0, 54, 65, 46, 53, 301, 0, 302,
- 0, 0, 59, 0, 0, 0, 0, 0, 0, 49,
- 0, 51, 52, 63, 0, 277, 0, 279, 60, 48,
- 36, 45, 39, 62, 319, 0, 0, 0, 50, 38,
- 0, 0, 0, 33, 0, 34, 35, 0, 0, 0,
- 0, 0, 0, 291, 89, 0, 101, 0, 0, 0,
- 0, 64, 0, 0, 0, 0, 54, 65, 46, 53,
- 0, 26, 0, 0, 32, 0, 0, 0, 0, 305,
- 0, 0, 49, 0, 51, 52, 63, 0, 0, 0,
- 0, 60, 48, 36, 45, 39, 62, 89, 0, 101,
- 0, 50, 0, 0, 0, 0, 33, 0, 34, 35,
- 54, 65, 46, 53, 0, 0, 0, 0, 138, 141,
- 142, 143, 144, 145, 146, 0, 49, 151, 51, 52,
- 63, 0, 0, 0, 0, 60, 48, 36, 45, 39,
- 62, 0, 0, 0, 0, 50, 0, 0, 0, 0,
- 33, 31, 34, 35, 56, 58, 61, 0, 37, 222,
- 57, 30, 0, 29, 100, 0, 0, 0, 98, 99,
- 91, 92, 0, 0, 0, 0, 0, 0, 97, 96,
- 95, 94, 59, 93, 102, 0, 0, 0, 90, 0,
- 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
- 0, 0, 0, 0, 0, 54, 65, 46, 53, 38,
- 0, 226, 0, 0, 0, 0, 0, 0, 0, 0,
- 0, 49, 0, 51, 52, 63, 0, 0, 0, 0,
- 60, 48, 36, 45, 39, 62, 0, 0, 0, 0,
- 50, 26, 0, 0, 32, 33, 31, 34, 35, 56,
- 58, 61, 0, 37, 217, 57, 30, 0, 29, 0,
- 0, 0, 0, 0, 0, 0, 0, 100, 0, 0,
- 0, 98, 99, 91, 92, 0, 0, 59, 0, 0,
- 0, 97, 96, 95, 94, 0, 93, 102, 0, 0,
- 31, 90, 0, 56, 58, 61, 0, 37, 0, 57,
- 30, 0, 29, 0, 38, 0, 0, 0, 0, 0,
- 100, 0, 0, 0, 98, 99, 91, 92, 190, 0,
- 0, 59, 0, 0, 97, 96, 95, 94, 0, 93,
- 102, 0, 0, 0, 90, 0, 26, 0, 0, 32,
- 31, 0, 0, 56, 58, 61, 0, 37, 38, 57,
- 30, 0, 29, 0, 0, 0, 0, 0, 0, 0,
- 0, 0, 0, 0, 0, 0, 0, 0, 188, 0,
- 0, 59, 0, 0, 0, 54, 65, 46, 53, 0,
- 26, 0, 0, 32, 0, 0, 0, 0, 0, 0,
- 0, 49, 0, 51, 52, 63, 0, 0, 38, 0,
- 60, 48, 36, 45, 39, 62, 0, 0, 0, 0,
- 50, 0, 0, 0, 0, 33, 31, 34, 35, 56,
- 58, 61, 0, 37, 0, 57, 30, 0, 29, 0,
- 26, 0, 0, 32, 0, 0, 0, 0, 0, 0,
- 0, 0, 0, 0, 186, 0, 0, 59, 0, 0,
- 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
- 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
- 54, 65, 46, 53, 38, 0, 0, 0, 0, 0,
- 0, 0, 0, 0, 0, 0, 49, 0, 51, 52,
- 63, 0, 0, 0, 0, 60, 48, 36, 45, 39,
- 62, 0, 0, 0, 0, 50, 26, 0, 0, 32,
- 33, 0, 34, 35, 54, 65, 46, 53, 0, 31,
- 0, 0, 56, 58, 61, 0, 37, 0, 57, 30,
- 49, 29, 51, 52, 63, 0, 0, 0, 0, 60,
- 48, 36, 45, 39, 62, 0, 0, 184, 0, 50,
- 59, 0, 0, 0, 33, 0, 34, 35, 0, 0,
- 0, 0, 0, 0, 54, 65, 46, 53, 0, 0,
- 0, 0, 0, 0, 0, 0, 0, 38, 0, 0,
- 49, 0, 51, 52, 63, 0, 0, 0, 0, 60,
- 48, 36, 45, 39, 62, 0, 0, 0, 0, 50,
- 0, 0, 0, 0, 33, 0, 34, 35, 0, 26,
- 0, 0, 32, 0, 0, 0, 31, 0, 0, 56,
- 58, 61, 0, 37, 0, 57, 30, 0, 29, 0,
- 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
- 54, 65, 46, 53, 182, 0, 0, 59, 0, 0,
- 0, 0, 0, 0, 0, 0, 49, 0, 51, 52,
- 63, 0, 0, 0, 40, 60, 48, 36, 45, 39,
- 62, 0, 0, 0, 38, 50, 0, 0, 0, 0,
- 33, 0, 34, 35, 31, 75, 0, 56, 58, 61,
- 0, 37, 0, 57, 30, 0, 29, 0, 0, 0,
- 0, 0, 0, 0, 0, 0, 26, 0, 0, 32,
- 125, 0, 180, 131, 0, 59, 0, 0, 0, 0,
- 0, 140, 140, 140, 140, 140, 140, 0, 0, 31,
- 140, 0, 56, 58, 61, 0, 37, 0, 57, 30,
- 0, 29, 38, 54, 65, 46, 53, 0, 0, 0,
- 0, 0, 0, 0, 0, 0, 0, 178, 0, 49,
- 59, 51, 52, 63, 0, 0, 0, 0, 60, 48,
- 36, 45, 39, 62, 26, 0, 0, 32, 50, 0,
- 0, 0, 0, 33, 0, 34, 35, 38, 0, 0,
- 0, 216, 0, 0, 0, 31, 0, 0, 56, 58,
- 61, 0, 37, 0, 57, 30, 0, 29, 0, 0,
- 0, 0, 0, 0, 0, 0, 0, 0, 0, 26,
- 0, 0, 32, 176, 0, 0, 59, 0, 0, 0,
- 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
- 54, 65, 46, 53, 0, 0, 0, 0, 0, 0,
- 0, 0, 0, 38, 0, 0, 49, 0, 51, 52,
- 63, 0, 0, 0, 0, 60, 48, 36, 45, 39,
- 62, 0, 0, 0, 0, 50, 253, 0, 0, 89,
- 33, 101, 34, 35, 0, 26, 0, 0, 32, 0,
- 0, 0, 0, 0, 31, 0, 0, 56, 58, 61,
- 0, 37, 0, 57, 30, 0, 29, 0, 54, 65,
- 46, 53, 0, 0, 0, 0, 0, 0, 0, 0,
- 120, 0, 0, 0, 49, 59, 51, 52, 63, 0,
- 0, 0, 0, 60, 48, 36, 45, 39, 62, 0,
- 0, 0, 0, 50, 0, 0, 0, 0, 33, 0,
- 34, 35, 38, 54, 65, 46, 53, 0, 0, 0,
- 0, 0, 0, 0, 0, 0, 0, 0, 0, 49,
- 0, 51, 52, 63, 0, 0, 0, 0, 60, 48,
- 36, 45, 39, 62, 26, 0, 0, 32, 50, 0,
- 0, 0, 0, 33, 0, 34, 35, 31, 0, 0,
- 56, 58, 61, 0, 37, 0, 57, 30, 0, 29,
- 0, 0, 0, 0, 0, 0, 0, 0, 0, 54,
- 65, 46, 53, 0, 0, 0, 0, 0, 59, 0,
- 0, 0, 0, 0, 0, 49, 0, 51, 52, 63,
- 0, 0, 0, 0, 60, 48, 36, 45, 39, 62,
- 0, 0, 0, 0, 50, 38, 0, 118, 0, 33,
- 0, 34, 35, 0, 31, 0, 0, 56, 58, 61,
- 0, 37, 116, 57, 30, 0, 29, 0, 0, 0,
- 0, 0, 0, 0, 0, 0, 0, 26, 0, 0,
- 32, 0, 100, 0, 0, 59, 98, 99, 91, 92,
- 0, 0, 0, 0, 0, 0, 97, 96, 95, 94,
- 0, 93, 102, 0, 0, 0, 90, 0, 54, 65,
- 46, 53, 38, 0, 0, 0, 0, 0, 0, 0,
- 0, 0, 0, 0, 49, 0, 51, 52, 63, 0,
- 0, 0, 0, 60, 48, 36, 45, 39, 62, 0,
- 0, 0, 0, 50, 26, 0, 0, 32, 33, 0,
- 34, 35, 31, 0, 0, 56, 58, 61, 0, 37,
- 0, 57, 30, 0, 29, 0, 0, 0, 0, 0,
- 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
- 0, 0, 0, 59, 0, 0, 0, 0, 0, 0,
- 0, 0, 0, 0, 0, 0, 0, 31, 0, 0,
- 56, 58, 61, 0, 37, 0, 57, 30, 0, 29,
- 38, 54, 65, 46, 53, 0, 0, 0, 0, 0,
- 0, 0, 0, 0, 0, 0, 0, 49, 59, 51,
- 52, 63, 0, 0, 0, 0, 60, 48, 36, 45,
- 39, 62, 26, 0, 0, 32, 50, 0, 0, 0,
- 0, 33, 0, 34, 35, 38, 0, 0, 0, 0,
- 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
- 0, 0, 0, 0, 0, 0, 0, 0, 54, 65,
- 46, 53, 0, 0, 0, 0, 0, 26, 0, 0,
- 32, 0, 0, 0, 49, 0, 51, 52, 63, 0,
- 0, 0, 0, 60, 48, 36, 45, 39, 62, 0,
- 0, 0, 0, 50, 0, 0, 0, 0, 33, 0,
- 34, 35, 0, 0, 0, 0, 0, 0, 0, 0,
- 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
- 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
- 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
- 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
- 0, 0, 0, 0, 0, 0, 54, 65, 46, 53,
- 27, 0, 0, 0, 0, 0, 0, 0, 0, 0,
- 0, 0, 49, 0, 51, 52, 63, 0, 0, 0,
- 0, 60, 48, 36, 45, 39, 62, 0, 0, 0,
- 0, 50, 0, 0, 0, 0, 33, 114, 34, 35,
- 0, 130, 65, 46, 53, 0, 0, 0, 0, 128,
- 0, 134, 0, 0, 0, 0, 0, 49, 0, 51,
- 52, 63, 0, 0, 0, 0, 60, 48, 36, 45,
- 39, 62, 0, 0, 0, 0, 50, 0, 0, 0,
- 0, 33, 0, 34, 35, 0, 0, 0, 173, 0,
- 175, 177, 179, 181, 183, 185, 187, 189, 191, 192,
- 193, 194, 195, 196, 0, 0, 0, 0, 0, 0,
- 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
- 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
- 0, 0, 0, 0, 0, 0, 0, 0, 224, 0,
- 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
- 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
- 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
- 0, 0, 0, 0, 0, 0, 0, 245, 0, 246,
- 0, 247, 0, 248, 0, 249, 0, 250, 0, 251,
- 0, 252, 0, 0, 0, 0, 0, 0, 0, 0,
- 0, 173, 0, 0, 0, 173, 0, 0, 173, 0,
- 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
- 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
- 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
- 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
- 0, 0, 0, 0, 290, 0, 0, 0, 0, 0,
- 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
- 0, 0, 0, 0, 0, 0, 0, 303 };
-int yypact[]={
-
- -1000, -1000, -1000, -200, -1000, -1000, -1000, -1000, -1000, -4,
- -1000, -93, -214, -215, -1000, -1000, -1000, 100, 103, 83,
- 296, -246, 80, 65, -1000, 24, -1000, 626, -288, 1719,
- 1719, 1719, 1719, 1719, 1719, 1719, 1719, 1621, 1554, 1451,
- 21, -1000, -1000, 11, -1000, 230, -1000, 301, 1764, -220,
- 1719, 295, 294, 293, -1000, -1000, -8, -8, -8, -8,
- -8, -8, 1719, 277, -280, -8, -25, -1000, -25, 97,
- -1000, 1719, -25, 1719, -25, 247, 71, -1000, -25, 1719,
- -25, 1719, -25, 1719, 1719, 1719, 1719, 1719, -1000, 1719,
- 1352, 1286, 1241, 1173, 1076, 973, 897, 847, 1719, 1719,
- 1719, 1719, 1719, -13, -1000, -1000, -299, -1000, -299, -299,
- -299, -299, -1000, -1000, -222, 207, 30, 151, -1000, 206,
- -28, 1719, 1719, 1719, 1719, -22, 211, 803, -222, -1000,
- 246, 63, -1000, -1000, -222, 218, 708, 1719, -1000, -1000,
- -1000, -1000, -1000, -1000, -1000, -1000, 134, -1000, 124, 1719,
- -271, 1719, -1000, -1000, -1000, 217, 124, -246, 264, -246,
- 1719, 55, 92, -1000, -1000, 263, -248, 259, -248, 124,
- 124, 124, 124, 626, -80, 626, 1719, -294, 1719, -289,
- 1719, -263, 1719, -254, 1719, -152, 1719, -58, 1719, 174,
- 1719, -89, -222, -228, -141, 1408, -294, 236, 1719, 1719,
- 538, 27, -1000, 1719, 443, -1000, -1000, 399, -1000, -34,
- -1000, 149, 172, 121, 152, 1719, -23, -1000, 207, 336,
- 273, -1000, -1000, 258, 480, -1000, 134, 197, 1719, 235,
- -1000, -25, -1000, -25, -1000, 207, -25, 1719, -25, -1000,
- -25, 234, -25, -1000, -1000, 626, 626, 626, 626, 626,
- 626, 626, 626, 1719, 1719, 117, 119, -1000, 1719, 73,
- -1000, -36, -1000, -1000, -39, -1000, -41, 116, 1719, -1000,
- -1000, 207, -1000, 207, -1000, -1000, 1719, 178, -1000, -1000,
- 1719, -246, -246, -25, -246, 66, -248, -1000, 1719, -248,
- 222, 177, -1000, -48, 62, -1000, -1000, -1000, -1000, -51,
- 114, -1000, -1000, 583, -1000, 158, -1000, -1000, -246, -1000,
- 71, -1000, 186, -1000, -1000, -1000, -1000, -1000, -71, -1000,
- -1000, -1000, 146, -25, 144, -25, -248, -1000, -1000, -1000 };
-int yypgo[]={
-
- 0, 389, 387, 386, 385, 325, 384, 383, 0, 124,
- 382, 380, 375, 1, 11, 8, 1980, 415, 1254, 367,
- 365, 362, 361, 360, 349, 388, 651, 56, 352, 351,
- 57, 350, 345, 343 };
-int yyr1[]={
-
- 0, 31, 1, 8, 4, 9, 9, 9, 10, 10,
- 10, 10, 24, 24, 24, 24, 24, 24, 14, 14,
- 14, 12, 12, 12, 12, 30, 30, 11, 11, 11,
- 11, 11, 11, 11, 11, 13, 13, 27, 27, 29,
- 29, 2, 2, 2, 3, 3, 32, 33, 15, 15,
- 28, 28, 28, 28, 28, 28, 28, 28, 16, 16,
- 16, 16, 16, 16, 16, 16, 16, 16, 16, 16,
- 16, 16, 16, 16, 16, 16, 16, 16, 16, 16,
- 16, 17, 17, 17, 17, 17, 17, 17, 17, 17,
- 17, 17, 17, 17, 17, 17, 17, 17, 17, 17,
- 17, 17, 17, 17, 17, 17, 17, 17, 17, 17,
- 17, 17, 17, 17, 17, 17, 17, 17, 17, 17,
- 17, 17, 17, 17, 17, 17, 17, 17, 17, 17,
- 17, 17, 17, 17, 17, 25, 25, 23, 18, 19,
- 20, 21, 22, 26, 26, 26, 5, 5, 6, 6,
- 7, 7 };
-int yyr2[]={
-
- 0, 1, 5, 9, 1, 1, 5, 5, 5, 2,
- 5, 7, 3, 3, 7, 7, 7, 7, 1, 5,
- 13, 13, 13, 9, 9, 1, 5, 15, 15, 11,
- 11, 17, 15, 21, 7, 1, 2, 1, 2, 1,
- 2, 3, 3, 3, 7, 5, 7, 7, 7, 2,
- 7, 11, 9, 13, 13, 7, 5, 9, 7, 9,
- 9, 9, 9, 9, 9, 9, 9, 7, 7, 7,
- 7, 7, 7, 7, 7, 7, 7, 7, 11, 7,
- 3, 5, 5, 5, 5, 5, 5, 5, 5, 5,
- 5, 7, 5, 7, 5, 7, 7, 3, 3, 9,
- 11, 3, 3, 3, 11, 13, 13, 11, 9, 11,
- 13, 17, 3, 3, 7, 9, 5, 5, 9, 11,
- 9, 11, 3, 5, 3, 5, 5, 3, 7, 7,
- 9, 9, 13, 2, 2, 1, 3, 5, 5, 5,
- 5, 5, 5, 3, 3, 3, 5, 3, 5, 3,
- 7, 5 };
-int yychk[]={
+#line 62 "perly.y"
+#endif /* 0 */
- -1000, -1, -31, -9, -2, -10, -3, -32, -33, -29,
- -11, 262, 263, 264, 261, -12, 59, -24, 265, 266,
- 272, -8, 267, 268, 256, -15, 123, -16, -17, 45,
- 43, 33, 126, 297, 299, 300, 284, 40, 91, 286,
- -18, -22, -20, -19, -21, 285, 259, -23, 283, 273,
- 292, 275, 276, 260, 257, -28, 36, 42, 37, 64,
- 282, 38, 287, 277, -26, 258, 257, -8, 257, 257,
- 59, 40, -8, 40, -8, -18, 40, -30, 271, 40,
- -8, 40, -8, 267, 268, 265, 266, 44, -4, 61,
- 298, 280, 281, 293, 291, 290, 289, 288, 278, 279,
- 274, 63, 294, 295, 301, 302, -17, -8, -17, -17,
- -17, -17, -17, -17, -16, -15, 41, -15, 93, -15,
- 59, 91, 123, 91, 123, -18, 40, 40, -16, -8,
- 257, -18, 257, -8, -16, 40, 40, 40, -26, 257,
- -18, -26, -26, -26, -26, -26, -26, -25, -15, 40,
- 295, -26, -8, -8, 59, -27, -15, -8, -15, -8,
- 40, -15, -13, -24, -8, -15, -8, -15, -8, -15,
- -15, -15, -15, -16, -9, -16, 61, -16, 61, -16,
- 61, -16, 61, -16, 61, -16, 61, -16, 61, -16,
- 61, -16, -16, -16, -16, -16, -16, 258, 91, 123,
- 44, -5, 41, 91, 44, -6, 93, 44, -7, 59,
- 125, -15, -15, -15, -15, 123, -18, 41, -15, 40,
- 40, 41, 41, -15, -16, -25, -26, -25, 287, 277,
- -25, 41, -30, 41, -30, -15, -5, 59, 41, -14,
- 269, 270, 41, -14, 125, -16, -16, -16, -16, -16,
- -16, -16, -16, 58, 40, -15, -15, 41, 91, -15,
- 93, 59, 125, 93, 59, 93, 59, -15, 123, -5,
- 41, -15, 41, -15, 41, 41, 44, -25, 41, -25,
- 40, -8, -8, -5, -8, -27, -8, -8, 40, -8,
- -16, -25, 93, 59, -15, 93, 125, 125, 125, 59,
- -15, -5, -5, -16, 41, -25, -30, -30, -8, -30,
- 59, -14, -15, -14, 41, 125, 93, 125, 59, 41,
- 41, -30, -13, 41, 125, 41, -8, 41, -8, -14 };
-int yydef[]={
+#ifdef USE_PURE_BISON
+#define YYLEX_PARAM (&yychar)
+#define yylex yylex_r
+#endif
- 1, -2, 5, -2, 6, 7, 41, 42, 43, 0,
- 9, 0, 0, 0, 40, 8, 10, 0, 0, 0,
- 0, -2, 0, 0, 12, 13, 4, 49, 80, 0,
- 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
- -2, 98, 101, 102, 103, 0, 112, 113, 0, 122,
- 124, 127, 0, 0, -2, 134, 0, 0, 0, 0,
- 0, 0, 135, 0, 0, 0, 0, 45, 0, 0,
- 11, 37, 0, 0, 0, 0, -2, 34, 0, 0,
- 0, 0, 0, 0, 0, 0, 0, 0, 5, 0,
- 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
- 0, 0, 0, 0, 86, 87, 81, 145, 82, 83,
- 84, 85, -2, -2, 90, 0, 92, 0, 94, 0,
- 0, 0, 0, 0, 0, 0, 0, 0, 116, 117,
- 133, 97, 123, 125, 126, 0, 0, 0, 138, 143,
- 144, 142, 140, 139, 141, 137, 135, 56, 136, 135,
- 0, 135, 44, 46, 47, 0, 38, 25, 0, 25,
- 0, 13, 0, 36, 26, 0, 18, 0, 18, 14,
- 15, 16, 17, 48, 39, 58, 0, 67, 0, 68,
- 0, 69, 0, 70, 0, 73, 0, 74, 0, 76,
- 0, 77, -2, -2, -2, 0, 79, 0, 0, 0,
- 0, 91, 147, 0, 0, 93, 149, 0, 95, 0,
- 96, 0, 0, 0, 0, 0, 0, 114, 0, 0,
- 0, 128, 129, 0, 0, 50, 135, 0, 135, 0,
- 55, 0, 29, 0, 30, 0, 0, 37, 0, 23,
- 0, 0, 0, 24, 3, 59, 60, 61, 62, 63,
- 64, 65, 66, 0, 135, 0, 0, 146, 0, 0,
- 148, 0, 151, 99, 0, 108, 0, 0, 0, 115,
- 118, 0, 120, 0, 130, 131, 0, 0, 57, 52,
- 135, 25, 25, 0, 25, 0, 18, 19, 0, 18,
- 78, 0, 100, 0, 0, 107, 150, 104, 109, 0,
- 0, 119, 121, 0, 51, 0, 27, 28, 25, 32,
- -2, 21, 0, 22, 54, 105, 106, 110, 0, 132,
- 53, 31, 0, 0, 0, 0, 18, 111, 33, 20 };
-typedef struct { char *t_name; int t_val; } yytoktype;
+#line 54 "perly.c"
+#define YYERRCODE 256
+static short yylhs[] = { -1,
+ 54, 0, 8, 6, 9, 7, 10, 10, 10, 11,
+ 11, 11, 11, 24, 24, 24, 24, 24, 24, 24,
+ 14, 14, 14, 13, 13, 42, 42, 12, 12, 12,
+ 12, 12, 12, 12, 26, 26, 27, 27, 28, 29,
+ 30, 31, 32, 53, 53, 1, 1, 1, 1, 1,
+ 2, 38, 38, 46, 55, 3, 4, 5, 39, 40,
+ 40, 44, 44, 44, 45, 45, 41, 41, 56, 56,
+ 58, 57, 15, 15, 15, 25, 25, 25, 36, 36,
+ 36, 36, 36, 36, 36, 36, 59, 36, 37, 37,
+ 17, 17, 17, 17, 17, 17, 17, 17, 17, 17,
+ 17, 49, 49, 49, 49, 49, 49, 49, 49, 49,
+ 49, 49, 49, 49, 50, 50, 50, 50, 50, 50,
+ 50, 50, 51, 51, 51, 51, 51, 52, 52, 52,
+ 52, 52, 52, 16, 16, 16, 16, 16, 16, 16,
+ 16, 16, 16, 16, 16, 16, 16, 16, 16, 16,
+ 16, 16, 16, 16, 16, 16, 16, 16, 16, 16,
+ 16, 16, 16, 16, 16, 16, 16, 16, 16, 16,
+ 16, 16, 16, 16, 47, 47, 48, 48, 48, 48,
+ 48, 33, 33, 34, 34, 34, 43, 23, 18, 19,
+ 20, 21, 22, 35, 35, 35, 35,
+};
+static short yylen[] = { 2,
+ 0, 2, 4, 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, 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, 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[] = { 1,
+ 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, 4, 173, 0, 0, 154,
+ 0, 168, 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, 146, 148, 0, 0, 0,
+ 0, 174, 140, 134, 135, 136, 137, 52, 0, 59,
+ 0, 69, 0, 0, 7, 194, 197, 196, 195, 0,
+ 0, 0, 0, 0, 0, 4, 4, 4, 4, 4,
+ 4, 0, 0, 0, 0, 0, 163, 0, 0, 0,
+ 0, 85, 0, 192, 0, 129, 0, 0, 0, 0,
+ 0, 0, 0, 179, 181, 180, 0, 188, 0, 0,
+ 0, 0, 0, 0, 0, 0, 124, 0, 0, 0,
+ 189, 190, 191, 193, 0, 34, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 119, 120, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 13,
+ 0, 51, 61, 0, 0, 0, 0, 83, 0, 0,
+ 87, 0, 0, 0, 0, 0, 0, 0, 4, 167,
+ 169, 0, 0, 0, 0, 0, 0, 0, 126, 0,
+ 158, 178, 0, 0, 175, 0, 0, 123, 27, 0,
+ 0, 19, 0, 0, 0, 0, 73, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 89, 0, 0, 90, 0, 0, 101, 0,
+ 0, 0, 0, 0, 0, 0, 156, 0, 0, 0,
+ 0, 0, 0, 3, 0, 0, 171, 0, 0, 0,
+ 42, 0, 43, 0, 0, 0, 0, 187, 0, 0,
+ 36, 41, 0, 0, 0, 170, 186, 86, 0, 130,
+ 0, 132, 0, 125, 177, 65, 0, 0, 0, 0,
+ 98, 0, 0, 0, 0, 100, 94, 0, 92, 0,
+ 152, 0, 157, 63, 68, 67, 55, 0, 54, 84,
+ 0, 88, 127, 0, 0, 0, 0, 0, 0, 0,
+ 0, 80, 131, 133, 151, 0, 0, 0, 99, 93,
+ 0, 97, 95, 153, 91, 72, 172, 6, 0, 0,
+ 0, 0, 0, 0, 0, 0, 150, 96, 81, 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, 95, 370, 98, 359, 3,
+ 12, 13, 70, 375, 285, 72, 73, 74, 75, 76,
+ 77, 78, 79, 291, 81, 292, 281, 283, 286, 294,
+ 282, 284, 122, 214, 100, 82, 257, 89, 91, 194,
+ 327, 156, 289, 271, 225, 14, 83, 137, 84, 85,
+ 86, 87, 15, 2, 16, 17, 18, 93, 278,
+};
+static short yysindex[] = { 0,
+ 0, 0, -132, 0, 0, 0, -51, 0, 0, 0,
+ 0, 0, 0, 0, 650, 0, 0, 0, -239, -215,
+ 5, 0, 0, -215, 0, 0, 0, -31, -31, 0,
+ -24, 0, 2181, 0, 0, 11, 16, 32, 46, -34,
+ 2181, 49, 72, 76, 1017, 977, -31, 1081, 1348, -134,
+ 2181, 85, -31, 2181, 2181, 2181, 2181, 2181, 2181, 1388,
+ 1428, 0, 2181, 2181, -31, -31, -31, -31, -150, 0,
+ 337, 849, -13, -58, -48, 0, 0, 8, 97, 92,
+ 116, 0, 0, 0, 0, 0, 0, 0, 52, 0,
+ -97, 0, -75, -97, 0, 0, 0, 0, 0, 2181,
+ 146, 2181, 395, 52, -97, 0, 0, 0, 0, 0,
+ 0, 150, 849, 153, 1468, 977, 0, 395, 0, -58,
+ 116, 0, 2181, 0, 157, 0, 395, -8, 83, -52,
+ 2181, 395, 1528, 0, 0, 0, -89, 0, 116, 107,
+ 107, 107, -104, -104, 123, -37, 0, -73, 107, 107,
+ 0, 0, 0, 0, 52, 0, 2181, 2181, 2181, 2181,
+ 2181, 2181, 2181, 2181, 2181, 2181, 2181, 2181, 2181, 2181,
+ 2181, 2181, 2181, 2181, 2181, 2181, 2181, 0, 0, -12,
+ 2181, 1735, 2181, 2181, 2181, 2181, 2181, 2181, 1795, 0,
+ 2181, 0, 0, -64, -32, -64, 411, 0, 2181, 291,
+ 0, -64, 2181, 2181, 2181, 2181, 187, 1854, 0, 0,
+ 0, -29, 58, 189, 2181, 116, 1914, 2029, 0, 111,
+ 0, 0, -26, -19, 0, 2181, 165, 0, 0, -241,
+ -241, 0, -241, -241, -241, -40, 0, 1618, 395, 1306,
+ 185, 168, 849, 1235, 1129, 1169, 1268, 782, 235, 107,
+ 107, 2181, 0, 2121, 2181, 0, 218, -46, 0, -3,
+ -68, 61, 106, 65, 108, 68, 0, 17, 849, 26,
+ -30, 2181, -30, 0, 236, 2181, 0, 2181, 52, -241,
+ 0, 250, 0, 255, -241, 259, 260, 0, 248, 337,
+ 0, 0, 262, 261, 2181, 0, 0, 0, 22, 0,
+ 33, 0, 36, 0, 0, 0, 125, 2181, 2181, 71,
+ 0, 50, 127, 2181, 182, 0, 0, 184, 0, 199,
+ 0, 201, 0, 0, 0, 0, 0, 272, 0, 0,
+ 354, 0, 0, 216, 216, 216, 216, 2181, 216, 2181,
+ 301, 0, 0, 0, 0, 167, 2418, 228, 0, 0,
+ 319, 0, 0, 0, 0, 0, 0, 0, -150, -150,
+ -123, -123, 322, -150, 308, 216, 0, 0, 0, 0,
+ 0, 0, 216, 334, 0, 0, 216, 0, 1854, -150,
+ 449, 0, 2181, -150, 340, 0, 0, 355, 0, 216,
+ 216, 0, -123, 0,
+};
+static short yyrindex[] = { 0,
+ 0, 0, 247, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 274, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 40, 455, 0, 0, 2367, 2469, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 119, 0,
+ 3, 943, 2515, 2603, 2653, 0, 0, 2708, 2754, 0,
+ -6, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ -33, 0, 0, -33, 0, 0, 0, 0, 0, 2469,
+ 0, 0, 3919, 0, -102, 0, 0, 0, 0, 0,
+ 0, 0, 3216, 0, 0, 359, 0, 3955, 526, 587,
+ 2276, 0, 0, 0, 2801, 0, 3999, 2603, 0, 0,
+ 2469, 4043, 0, 0, 0, 0, 2858, 0, 3225, 3461,
+ 3527, 3588, 3352, 3399, 2908, 0, 0, 0, 3635, 3680,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 2990, 0, 0, -28, 0, -28, 917, 0, 359, 0,
+ 0, 295, 379, 0, 0, 0, 0, 370, 0, 0,
+ 0, 0, 390, 0, 0, 3291, 0, 0, 0, 0,
+ 0, 0, 0, 3056, 0, 0, 3113, 0, 0, 14,
+ 35, 0, 55, 91, 117, 1991, 0, 4235, 4090, 1826,
+ 3807, 3871, 3283, 0, -22, 4191, 4155, 4145, 1048, 3719,
+ 3763, 0, 0, 0, 0, 0, 3163, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 4267, -10,
+ 0, 375, 0, 0, 0, 0, 0, 2469, 0, 136,
+ 0, 0, 0, 0, 400, 0, 0, 0, 0, 139,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 359, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 396,
+ 0, 0, 0, 0, 0, 0, 4080, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 119, 119,
+ 179, 179, 0, 119, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 415, 119,
+ 917, 0, 0, 119, 0, 0, 0, 0, 0, 0,
+ 0, 0, 179, 0,
+};
+static short yygindex[] = { 0,
+ 0, 0, 196, 425, 0, -2, 0, 37, 634, -94,
+ 0, 0, 0, -323, -15, 2445, 0, 999, 414, 417,
+ 0, 0, 0, 463, -43, 0, 0, 321, -198, 103,
+ 147, 280, -91, -185, 1, 0, 0, 0, 464, -44,
+ 222, 338, 0, -179, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0,
+};
+#define YYTABLESIZE 4568
+static short yytable[] = { 71,
+ 197, 65, 121, 227, 65, 111, 220, 22, 198, 293,
+ 139, 296, 315, 275, 305, 102, 273, 88, 113, 228,
+ 60, 113, 279, 65, 317, 60, 182, 254, 325, 101,
+ 62, 218, 185, 130, 75, 113, 113, 316, 376, 221,
+ 113, 90, 187, 15, 146, 148, 123, 124, 64, 196,
+ 106, 69, 75, 138, 18, 107, 121, 323, 162, 163,
+ 202, 15, 342, 92, 184, 151, 152, 153, 154, 394,
+ 113, 108, 18, 343, 186, 39, 344, 183, 255, 216,
+ 159, 117, 185, 159, 126, 109, 75, 121, 114, 60,
+ 349, 26, 26, 39, 62, 16, 341, 159, 159, 212,
+ 213, 297, 159, 203, 204, 205, 206, 207, 208, 181,
+ 252, 115, 64, 16, 184, 116, 215, 223, 26, 318,
+ 65, 67, 131, 320, 133, 192, 322, 155, 351, 348,
+ 188, 17, 159, 4, 5, 6, 189, 7, 8, 363,
+ 201, 230, 231, 233, 234, 235, 236, 237, 66, 17,
+ 190, 26, 373, 374, 26, 26, 26, 20, 26, 191,
+ 26, 26, 193, 26, 9, 258, 260, 261, 262, 263,
+ 264, 265, 266, 268, 26, 20, 38, 26, 21, 40,
+ 328, 195, 26, 213, 388, 199, 332, 280, 231, 209,
+ 231, 229, 290, 210, 38, 60, 217, 15, 319, 299,
+ 321, 301, 303, 23, 24, 21, 295, 219, 224, 26,
+ 307, 21, 180, 226, 21, 21, 21, 345, 21, 350,
+ 21, 21, 65, 21, 272, 96, 162, 163, 121, 298,
+ 97, 162, 163, 270, 121, 304, 310, 21, 312, 313,
+ 306, 26, 21, 26, 26, 253, 2, 162, 163, 113,
+ 113, 113, 113, 162, 163, 308, 113, 314, 113, 367,
+ 163, 110, 162, 163, 60, 75, 75, 75, 75, 21,
+ 162, 163, 75, 162, 163, 381, 330, 113, 113, 44,
+ 113, 113, 44, 44, 44, 324, 44, 338, 44, 44,
+ 334, 44, 346, 75, 75, 335, 162, 163, 213, 336,
+ 337, 21, 339, 21, 21, 44, 352, 326, 353, 326,
+ 44, 159, 159, 159, 159, 333, 162, 163, 159, 340,
+ 159, 162, 163, 354, 280, 355, 159, 159, 159, 159,
+ 356, 277, 162, 163, 276, 162, 163, 44, 358, 159,
+ 159, 366, 159, 159, 159, 159, 159, 159, 159, 162,
+ 163, 159, 368, 170, 159, 159, 159, 162, 163, 369,
+ 162, 163, 377, 71, 162, 163, 379, 162, 163, 44,
+ 162, 163, 44, 383, 26, 26, 26, 26, 26, 26,
+ 390, 26, 26, 26, 26, 26, 26, 26, 26, 26,
+ 26, 26, 26, 26, 357, 391, 53, 26, 26, 184,
+ 26, 26, 26, 26, 26, 162, 163, 162, 163, 26,
+ 26, 26, 26, 26, 26, 26, 170, 62, 177, 37,
+ 26, 178, 179, 180, 162, 163, 162, 163, 35, 26,
+ 185, 26, 26, 182, 21, 21, 21, 21, 21, 21,
+ 40, 21, 21, 21, 21, 21, 21, 21, 21, 21,
+ 21, 21, 21, 21, 37, 35, 167, 21, 21, 105,
+ 21, 21, 21, 21, 21, 135, 162, 163, 136, 21,
+ 21, 21, 21, 21, 21, 21, 176, 80, 232, 177,
+ 21, 385, 178, 179, 180, 287, 365, 94, 0, 21,
+ 0, 21, 21, 176, 329, 166, 177, 0, 166, 178,
+ 179, 180, 44, 44, 44, 44, 44, 44, 0, 44,
+ 44, 44, 166, 166, 0, 44, 0, 166, 44, 44,
+ 44, 44, 0, 167, 168, 44, 44, 0, 44, 44,
+ 44, 44, 44, 0, 0, 274, 0, 44, 44, 44,
+ 44, 44, 44, 176, 0, 0, 177, 166, 44, 178,
+ 179, 180, 0, 0, 0, 0, 0, 44, 194, 44,
+ 44, 194, 194, 194, 0, 194, 173, 194, 194, 173,
+ 194, 164, 0, 387, 0, 0, 0, 165, 166, 167,
+ 168, 0, 0, 173, 173, 0, 0, 0, 173, 194,
+ 0, 0, 0, 169, 171, 172, 173, 174, 175, 176,
+ 0, 0, 177, 0, 0, 178, 179, 180, 157, 158,
+ 159, 160, 0, 0, 0, 161, 194, 0, 173, 195,
+ 0, 0, 195, 195, 195, 0, 195, 144, 195, 195,
+ 144, 195, 0, 0, 164, 0, 162, 163, 0, 0,
+ 165, 166, 167, 168, 144, 144, 0, 0, 0, 144,
+ 195, 194, 0, 0, 0, 0, 169, 171, 172, 173,
+ 174, 175, 176, 0, 0, 177, 0, 0, 178, 179,
+ 180, 0, 0, 0, 0, 0, 4, 5, 6, 144,
+ 7, 8, 55, 167, 168, 65, 67, 53, 0, 60,
+ 0, 68, 64, 0, 63, 0, 371, 372, 0, 0,
+ 0, 378, 175, 176, 0, 0, 177, 9, 62, 178,
+ 179, 180, 195, 66, 4, 5, 6, 386, 7, 8,
+ 0, 389, 0, 0, 0, 0, 166, 166, 166, 166,
+ 0, 0, 0, 166, 0, 166, 0, 0, 0, 0,
+ 61, 166, 166, 166, 166, 9, 0, 0, 0, 0,
+ 0, 0, 0, 0, 166, 166, 0, 166, 166, 166,
+ 166, 166, 166, 166, 0, 0, 166, 0, 0, 166,
+ 166, 166, 26, 0, 0, 56, 0, 0, 0, 0,
+ 0, 0, 194, 194, 194, 194, 194, 0, 194, 194,
+ 194, 0, 0, 0, 194, 0, 0, 173, 173, 173,
+ 173, 0, 0, 0, 173, 194, 173, 194, 194, 194,
+ 194, 194, 173, 173, 173, 173, 194, 194, 194, 194,
+ 194, 194, 0, 0, 0, 173, 173, 194, 173, 173,
+ 173, 173, 173, 173, 173, 0, 194, 173, 194, 194,
+ 173, 173, 173, 195, 195, 195, 195, 195, 0, 195,
+ 195, 195, 0, 0, 0, 195, 0, 0, 144, 144,
+ 144, 144, 0, 0, 0, 144, 195, 144, 195, 195,
+ 195, 195, 195, 144, 144, 144, 144, 195, 195, 195,
+ 195, 195, 195, 0, 0, 0, 144, 144, 195, 144,
+ 144, 144, 144, 144, 144, 144, 0, 195, 144, 195,
+ 195, 144, 144, 144, 0, 25, 27, 28, 29, 30,
+ 31, 170, 32, 33, 34, 0, 0, 0, 35, 0,
+ 0, 36, 37, 38, 39, 0, 0, 0, 40, 41,
+ 0, 42, 43, 44, 45, 46, 0, 0, 0, 0,
+ 47, 48, 49, 50, 51, 52, 0, 0, 0, 44,
+ 0, 54, 44, 44, 44, 0, 44, 0, 44, 44,
+ 57, 44, 58, 59, 0, 0, 0, 0, 360, 361,
+ 362, 0, 364, 0, 0, 44, 0, 0, 0, 0,
+ 44, 0, 0, 78, 0, 0, 78, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 380,
+ 78, 78, 0, 0, 0, 0, 382, 44, 0, 55,
+ 384, 0, 65, 67, 53, 0, 60, 0, 68, 64,
+ 0, 63, 0, 392, 393, 0, 99, 99, 0, 0,
+ 0, 0, 0, 0, 0, 78, 0, 0, 112, 44,
+ 66, 0, 44, 0, 120, 99, 128, 0, 0, 55,
+ 134, 99, 65, 67, 53, 0, 60, 0, 68, 64,
+ 0, 63, 0, 99, 99, 99, 99, 61, 165, 166,
+ 167, 168, 0, 0, 0, 0, 0, 0, 0, 0,
+ 66, 0, 0, 0, 0, 0, 0, 0, 106, 175,
+ 176, 106, 0, 177, 0, 0, 178, 179, 180, 26,
+ 0, 0, 56, 0, 0, 106, 106, 61, 0, 0,
+ 106, 0, 0, 55, 120, 0, 65, 67, 53, 0,
+ 60, 0, 68, 64, 0, 63, 0, 0, 0, 164,
+ 0, 0, 0, 0, 0, 165, 166, 167, 168, 26,
+ 106, 0, 56, 0, 66, 0, 0, 0, 0, 0,
+ 0, 169, 171, 172, 173, 174, 175, 176, 0, 0,
+ 177, 0, 0, 178, 179, 180, 0, 0, 0, 0,
+ 0, 61, 44, 44, 44, 44, 44, 44, 256, 44,
+ 44, 44, 0, 0, 0, 44, 0, 0, 44, 44,
+ 44, 44, 0, 0, 0, 44, 44, 0, 44, 44,
+ 44, 44, 44, 26, 0, 288, 56, 44, 44, 44,
+ 44, 44, 44, 0, 78, 78, 78, 78, 44, 0,
+ 0, 78, 0, 0, 0, 0, 0, 44, 0, 44,
+ 44, 0, 0, 119, 28, 29, 30, 31, 97, 32,
+ 33, 34, 78, 78, 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, 27, 28, 29, 30, 31, 54, 32,
+ 33, 34, 0, 0, 0, 35, 0, 57, 0, 58,
+ 59, 0, 309, 0, 0, 0, 41, 170, 42, 43,
+ 44, 45, 46, 0, 0, 0, 0, 47, 48, 49,
+ 50, 51, 52, 0, 0, 0, 0, 0, 54, 106,
+ 106, 106, 106, 0, 0, 0, 106, 57, 106, 58,
+ 59, 0, 0, 0, 106, 106, 0, 125, 28, 29,
+ 30, 31, 0, 32, 33, 34, 0, 106, 106, 35,
+ 106, 106, 106, 106, 106, 106, 0, 0, 0, 0,
+ 41, 0, 42, 43, 44, 45, 46, 0, 0, 0,
+ 0, 47, 48, 49, 50, 51, 52, 0, 0, 0,
+ 55, 0, 54, 65, 67, 53, 0, 60, 0, 68,
+ 64, 57, 63, 58, 59, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 129, 0, 0, 0,
+ 0, 66, 0, 0, 0, 165, 166, 167, 168, 0,
+ 55, 0, 0, 65, 67, 53, 0, 60, 145, 68,
+ 64, 0, 63, 172, 173, 174, 175, 176, 61, 0,
+ 177, 0, 0, 178, 179, 180, 0, 0, 0, 0,
+ 0, 66, 0, 0, 0, 165, 166, 167, 168, 0,
+ 55, 0, 0, 65, 67, 53, 0, 60, 0, 68,
+ 64, 0, 63, 56, 173, 174, 175, 176, 61, 0,
+ 177, 0, 0, 178, 179, 180, 0, 0, 0, 0,
+ 0, 66, 0, 0, 0, 0, 0, 0, 0, 0,
+ 55, 0, 0, 65, 67, 53, 0, 60, 211, 68,
+ 64, 0, 63, 56, 0, 164, 0, 0, 61, 0,
+ 147, 165, 166, 167, 168, 0, 0, 0, 0, 0,
+ 0, 66, 0, 0, 0, 0, 0, 169, 171, 172,
+ 173, 174, 175, 176, 0, 0, 177, 0, 0, 178,
+ 179, 180, 0, 56, 165, 166, 167, 168, 61, 0,
+ 55, 0, 0, 65, 67, 53, 0, 60, 222, 68,
+ 64, 0, 63, 0, 174, 175, 176, 0, 0, 177,
+ 0, 0, 178, 179, 180, 0, 0, 0, 0, 0,
+ 0, 66, 165, 56, 167, 168, 0, 0, 0, 0,
+ 0, 0, 0, 0, 27, 28, 29, 30, 31, 0,
+ 32, 33, 34, 175, 176, 0, 35, 177, 61, 0,
+ 178, 179, 180, 0, 0, 0, 0, 41, 0, 42,
+ 43, 44, 45, 46, 0, 0, 0, 0, 47, 48,
+ 49, 50, 51, 52, 27, 28, 29, 30, 31, 54,
+ 32, 33, 34, 56, 0, 0, 35, 0, 57, 0,
+ 58, 59, 0, 0, 0, 0, 0, 41, 0, 42,
+ 43, 44, 45, 46, 0, 0, 0, 0, 47, 48,
+ 49, 50, 51, 52, 27, 28, 29, 30, 31, 54,
+ 32, 33, 34, 0, 0, 0, 35, 0, 57, 0,
+ 58, 59, 0, 0, 0, 0, 0, 41, 0, 42,
+ 43, 44, 45, 46, 0, 0, 0, 0, 47, 48,
+ 49, 50, 51, 52, 27, 28, 29, 30, 31, 54,
+ 32, 33, 34, 0, 0, 0, 35, 0, 57, 0,
+ 58, 59, 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, 55, 0, 54,
+ 65, 67, 53, 0, 60, 259, 68, 64, 57, 63,
+ 58, 59, 0, 0, 27, 28, 29, 30, 31, 0,
+ 32, 33, 34, 0, 0, 0, 35, 0, 66, 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, 61, 0, 55, 0, 54,
+ 65, 67, 53, 0, 60, 267, 68, 64, 57, 63,
+ 58, 59, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 66, 0,
+ 56, 0, 0, 0, 0, 0, 108, 0, 0, 108,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 108, 108, 61, 55, 0, 108, 65,
+ 67, 53, 0, 60, 0, 68, 64, 0, 63, 0,
+ 0, 0, 0, 0, 165, 166, 167, 168, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 66, 108, 0,
+ 56, 171, 172, 173, 174, 175, 176, 0, 0, 177,
+ 0, 0, 178, 179, 180, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 61, 0, 55, 0, 0, 65,
+ 67, 53, 0, 60, 300, 68, 64, 0, 63, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 66, 0, 56,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 27, 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, 74, 0, 0, 74, 0, 54, 0, 0, 56,
+ 0, 0, 0, 0, 0, 57, 0, 58, 59, 74,
+ 0, 27, 28, 29, 30, 31, 0, 32, 33, 34,
+ 0, 55, 0, 35, 65, 67, 53, 0, 60, 302,
+ 68, 64, 0, 63, 41, 0, 42, 43, 44, 45,
+ 46, 0, 0, 74, 0, 47, 48, 49, 50, 51,
+ 52, 0, 66, 0, 0, 0, 54, 108, 108, 108,
+ 108, 0, 0, 0, 108, 57, 108, 58, 59, 25,
+ 27, 28, 29, 30, 31, 0, 32, 33, 34, 61,
+ 0, 0, 35, 0, 0, 108, 108, 0, 108, 108,
+ 108, 108, 108, 41, 0, 42, 43, 44, 45, 46,
+ 0, 0, 0, 0, 47, 48, 49, 50, 51, 52,
+ 0, 0, 0, 55, 56, 54, 65, 67, 53, 0,
+ 60, 311, 68, 64, 57, 63, 58, 59, 0, 0,
+ 27, 28, 29, 30, 31, 0, 32, 33, 34, 0,
+ 0, 0, 35, 0, 66, 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, 61, 0, 55, 0, 54, 65, 67, 53, 0,
+ 60, 0, 68, 64, 57, 63, 58, 59, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 66, 0, 56, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 74, 74, 74, 74, 0, 0, 0, 74,
+ 0, 61, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 27, 28, 29, 30, 31,
+ 74, 32, 33, 34, 0, 0, 0, 35, 0, 0,
+ 0, 0, 0, 0, 0, 0, 56, 0, 41, 0,
+ 42, 43, 44, 45, 46, 0, 183, 0, 0, 47,
+ 48, 49, 50, 51, 52, 0, 0, 0, 0, 0,
+ 54, 0, 0, 183, 183, 0, 0, 0, 183, 57,
+ 0, 58, 59, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 183, 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, 162, 0, 0,
+ 162, 47, 48, 49, 50, 51, 52, 0, 0, 0,
+ 0, 0, 54, 0, 162, 162, 0, 0, 0, 162,
+ 0, 57, 0, 58, 59, 0, 0, 27, 28, 29,
+ 30, 31, 0, 32, 33, 34, 0, 0, 0, 35,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 162,
+ 41, 0, 42, 43, 44, 45, 46, 0, 0, 0,
+ 0, 47, 48, 49, 50, 51, 52, 103, 0, 0,
+ 170, 0, 54, 0, 0, 113, 0, 0, 0, 118,
+ 0, 57, 127, 58, 59, 132, 0, 0, 0, 140,
+ 141, 142, 143, 144, 0, 0, 0, 149, 150, 182,
+ 0, 0, 182, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 182, 182, 0, 0,
+ 0, 182, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 200, 183, 183, 183,
+ 183, 0, 0, 0, 183, 149, 183, 0, 149, 0,
+ 0, 182, 183, 183, 183, 183, 0, 0, 0, 0,
+ 0, 0, 149, 149, 0, 183, 183, 149, 183, 183,
+ 183, 183, 183, 183, 183, 0, 0, 183, 0, 0,
+ 183, 183, 183, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 149, 238, 239,
+ 240, 241, 242, 243, 244, 245, 246, 247, 248, 249,
+ 250, 251, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 269, 0, 0, 162, 162,
+ 162, 162, 0, 144, 0, 162, 144, 162, 0, 0,
+ 0, 0, 0, 162, 162, 162, 162, 0, 0, 0,
+ 144, 144, 0, 0, 0, 144, 162, 162, 0, 162,
+ 162, 162, 162, 162, 162, 162, 0, 0, 162, 0,
+ 0, 162, 162, 162, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 147, 0, 144, 147, 0, 164, 0,
+ 0, 0, 0, 0, 165, 166, 167, 168, 0, 0,
+ 147, 147, 0, 0, 0, 147, 0, 0, 0, 0,
+ 331, 171, 172, 173, 174, 175, 176, 0, 0, 177,
+ 0, 0, 178, 179, 180, 0, 0, 0, 0, 0,
+ 182, 182, 182, 182, 0, 147, 0, 182, 145, 182,
+ 0, 145, 0, 347, 0, 182, 182, 182, 182, 0,
+ 0, 0, 0, 0, 0, 145, 145, 0, 182, 182,
+ 145, 182, 182, 182, 182, 182, 182, 182, 0, 0,
+ 182, 0, 0, 182, 182, 182, 149, 149, 149, 149,
+ 0, 0, 0, 149, 155, 149, 0, 155, 0, 0,
+ 145, 149, 149, 149, 149, 0, 0, 0, 0, 0,
+ 0, 155, 155, 0, 149, 149, 155, 149, 149, 149,
+ 149, 149, 149, 149, 0, 0, 149, 0, 0, 149,
+ 149, 149, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 173, 0, 0, 173, 0, 155, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 173, 173,
+ 0, 0, 0, 173, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 144, 144, 144, 144, 0, 0,
+ 0, 144, 0, 144, 0, 0, 0, 0, 0, 144,
+ 144, 144, 144, 173, 0, 0, 0, 0, 176, 0,
+ 0, 176, 144, 144, 0, 144, 144, 144, 144, 144,
+ 144, 144, 0, 0, 144, 176, 176, 144, 144, 144,
+ 176, 0, 0, 0, 147, 147, 147, 147, 0, 0,
+ 0, 147, 0, 147, 0, 0, 0, 0, 0, 147,
+ 147, 147, 147, 0, 0, 0, 0, 0, 143, 0,
+ 176, 143, 147, 147, 0, 147, 147, 147, 147, 147,
+ 147, 147, 0, 0, 147, 143, 143, 147, 147, 147,
+ 143, 0, 0, 0, 0, 0, 0, 0, 0, 145,
+ 145, 145, 145, 0, 0, 0, 145, 0, 145, 0,
+ 0, 0, 0, 0, 145, 145, 145, 145, 0, 0,
+ 143, 0, 0, 0, 0, 0, 0, 145, 145, 0,
+ 145, 145, 145, 145, 145, 145, 145, 0, 0, 145,
+ 0, 0, 145, 145, 145, 155, 155, 155, 155, 0,
+ 76, 0, 155, 76, 155, 0, 0, 0, 0, 0,
+ 155, 155, 155, 155, 0, 0, 0, 76, 76, 0,
+ 0, 0, 76, 155, 155, 0, 155, 155, 155, 155,
+ 155, 155, 155, 0, 0, 155, 0, 0, 155, 155,
+ 155, 0, 173, 173, 173, 173, 0, 0, 0, 173,
+ 0, 173, 76, 0, 0, 0, 0, 173, 173, 173,
+ 173, 0, 0, 0, 0, 0, 66, 0, 0, 66,
+ 173, 173, 0, 173, 173, 173, 173, 173, 173, 173,
+ 0, 0, 173, 66, 66, 173, 173, 173, 66, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 176,
+ 176, 176, 176, 0, 0, 0, 176, 0, 176, 0,
+ 0, 0, 0, 0, 176, 176, 176, 176, 66, 0,
+ 0, 0, 0, 142, 0, 0, 142, 176, 176, 0,
+ 176, 176, 176, 176, 176, 176, 176, 0, 0, 176,
+ 142, 142, 176, 176, 176, 142, 0, 0, 0, 143,
+ 143, 143, 143, 0, 0, 0, 143, 0, 143, 0,
+ 0, 0, 0, 0, 143, 143, 143, 143, 0, 0,
+ 0, 0, 0, 82, 0, 142, 82, 143, 143, 0,
+ 143, 143, 143, 143, 143, 143, 143, 0, 0, 143,
+ 82, 82, 143, 143, 143, 82, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 82, 160, 0, 0, 160,
+ 0, 76, 76, 76, 76, 161, 0, 0, 76, 0,
+ 76, 0, 0, 160, 160, 0, 76, 76, 76, 76,
+ 0, 0, 161, 161, 0, 0, 0, 161, 0, 76,
+ 76, 0, 76, 76, 76, 76, 76, 76, 76, 0,
+ 0, 76, 0, 0, 76, 76, 76, 0, 160, 0,
+ 0, 0, 0, 0, 0, 0, 0, 161, 0, 0,
+ 0, 0, 0, 102, 0, 0, 102, 66, 66, 66,
+ 66, 79, 0, 0, 66, 0, 66, 0, 0, 0,
+ 102, 102, 66, 66, 66, 66, 0, 0, 79, 79,
+ 0, 0, 0, 79, 0, 66, 66, 0, 66, 66,
+ 66, 66, 66, 66, 66, 0, 0, 66, 0, 0,
+ 66, 66, 66, 0, 0, 102, 0, 0, 0, 0,
+ 0, 0, 0, 79, 142, 142, 142, 142, 0, 0,
+ 0, 142, 121, 142, 0, 121, 0, 0, 0, 142,
+ 142, 142, 142, 0, 0, 0, 0, 0, 0, 121,
+ 121, 0, 142, 142, 121, 142, 142, 142, 142, 142,
+ 142, 142, 0, 0, 142, 0, 0, 142, 142, 142,
+ 0, 0, 0, 0, 82, 82, 82, 82, 0, 122,
+ 0, 82, 122, 82, 121, 0, 0, 0, 0, 82,
+ 82, 82, 82, 0, 0, 0, 122, 122, 0, 0,
+ 0, 122, 82, 82, 0, 82, 82, 82, 82, 82,
+ 82, 82, 0, 0, 82, 0, 0, 82, 82, 82,
+ 0, 0, 0, 0, 0, 0, 0, 160, 160, 160,
+ 160, 122, 0, 0, 160, 0, 161, 161, 161, 161,
+ 0, 117, 0, 161, 117, 161, 0, 0, 0, 0,
+ 0, 161, 161, 161, 161, 160, 160, 0, 117, 117,
+ 0, 0, 0, 117, 161, 161, 0, 161, 161, 161,
+ 161, 161, 161, 161, 0, 0, 161, 0, 0, 161,
+ 161, 161, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 117, 102, 102, 102, 102, 0, 0,
+ 0, 102, 79, 79, 79, 79, 0, 118, 0, 79,
+ 118, 79, 0, 0, 0, 0, 0, 79, 79, 79,
+ 79, 0, 102, 102, 118, 118, 0, 0, 0, 118,
+ 79, 79, 0, 79, 79, 79, 79, 79, 79, 79,
+ 0, 0, 79, 0, 0, 79, 79, 79, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 118,
+ 0, 0, 0, 121, 121, 121, 121, 0, 139, 0,
+ 121, 139, 121, 0, 0, 0, 0, 0, 121, 121,
+ 121, 121, 0, 0, 0, 139, 139, 0, 0, 0,
+ 139, 121, 121, 0, 121, 121, 121, 121, 121, 121,
+ 121, 0, 0, 121, 0, 0, 0, 0, 0, 0,
+ 122, 122, 122, 122, 0, 115, 0, 122, 115, 122,
+ 139, 0, 0, 0, 0, 122, 122, 122, 122, 0,
+ 0, 0, 115, 115, 0, 0, 0, 115, 122, 122,
+ 0, 122, 122, 122, 122, 122, 122, 122, 0, 0,
+ 122, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 116, 0, 0, 116, 0, 0, 0, 115, 0, 0,
+ 0, 0, 117, 117, 117, 117, 0, 116, 116, 117,
+ 0, 117, 116, 0, 0, 0, 0, 117, 117, 117,
+ 117, 0, 0, 0, 0, 0, 0, 0, 0, 114,
+ 117, 117, 114, 117, 117, 117, 117, 117, 117, 117,
+ 0, 0, 116, 0, 0, 0, 114, 114, 0, 0,
+ 0, 114, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 118, 118,
+ 118, 118, 0, 103, 0, 118, 103, 118, 0, 0,
+ 0, 114, 0, 118, 118, 118, 118, 0, 0, 0,
+ 103, 103, 0, 0, 0, 103, 118, 118, 0, 118,
+ 118, 118, 118, 118, 118, 118, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 104, 0, 0,
+ 104, 0, 0, 0, 0, 103, 0, 0, 0, 139,
+ 139, 139, 139, 0, 104, 104, 139, 0, 139, 104,
+ 0, 0, 0, 0, 139, 139, 139, 139, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 139, 139, 0,
+ 139, 139, 139, 139, 139, 139, 139, 0, 0, 104,
+ 0, 0, 0, 0, 0, 0, 115, 115, 115, 115,
+ 0, 105, 0, 115, 105, 115, 0, 0, 0, 0,
+ 0, 115, 115, 115, 115, 0, 0, 0, 105, 105,
+ 0, 0, 0, 105, 115, 115, 0, 115, 115, 115,
+ 115, 115, 115, 115, 0, 0, 0, 0, 0, 0,
+ 0, 116, 116, 116, 116, 0, 0, 0, 116, 165,
+ 116, 0, 165, 105, 0, 0, 116, 116, 116, 116,
+ 0, 0, 0, 0, 0, 0, 165, 165, 0, 116,
+ 116, 165, 116, 116, 116, 116, 116, 116, 116, 0,
+ 114, 114, 114, 114, 0, 164, 0, 114, 164, 114,
+ 0, 0, 0, 0, 0, 114, 114, 114, 114, 0,
+ 0, 165, 164, 164, 0, 0, 0, 164, 114, 114,
+ 0, 114, 114, 114, 114, 114, 114, 114, 0, 0,
+ 0, 0, 0, 0, 103, 103, 103, 103, 0, 128,
+ 0, 103, 128, 103, 0, 0, 0, 164, 0, 103,
+ 103, 103, 103, 0, 0, 0, 128, 128, 0, 0,
+ 0, 128, 103, 103, 0, 103, 103, 103, 103, 103,
+ 103, 103, 0, 0, 0, 0, 0, 0, 104, 104,
+ 104, 104, 0, 141, 0, 104, 141, 104, 0, 0,
+ 0, 128, 0, 104, 104, 104, 104, 0, 0, 0,
+ 141, 141, 0, 0, 0, 141, 104, 104, 0, 104,
+ 104, 104, 104, 104, 104, 0, 0, 0, 0, 0,
+ 138, 0, 0, 138, 0, 0, 0, 0, 0, 0,
+ 107, 0, 0, 107, 0, 141, 0, 138, 138, 0,
+ 0, 0, 105, 105, 105, 105, 0, 107, 107, 105,
+ 0, 105, 107, 0, 0, 0, 0, 105, 105, 0,
+ 105, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 105, 105, 138, 105, 105, 105, 105, 105, 105, 0,
+ 0, 0, 107, 0, 0, 109, 0, 0, 109, 0,
+ 165, 165, 165, 165, 0, 110, 0, 165, 110, 165,
+ 0, 0, 109, 109, 0, 165, 165, 109, 0, 0,
+ 0, 0, 110, 110, 0, 0, 0, 110, 165, 165,
+ 0, 165, 165, 165, 165, 165, 164, 164, 164, 164,
+ 0, 112, 0, 164, 112, 164, 0, 109, 0, 0,
+ 0, 164, 164, 0, 0, 0, 0, 110, 112, 112,
+ 0, 0, 0, 112, 164, 164, 0, 164, 164, 164,
+ 164, 164, 0, 0, 0, 0, 0, 0, 0, 0,
+ 128, 128, 128, 128, 0, 111, 0, 128, 111, 128,
+ 0, 0, 0, 112, 0, 128, 128, 0, 0, 0,
+ 0, 0, 111, 111, 0, 0, 0, 111, 128, 128,
+ 0, 128, 128, 128, 128, 128, 0, 77, 0, 0,
+ 77, 0, 0, 0, 141, 141, 141, 141, 0, 0,
+ 0, 141, 0, 141, 77, 77, 0, 111, 0, 141,
+ 141, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 141, 141, 0, 141, 141, 141, 141, 141,
+ 0, 138, 138, 138, 138, 0, 0, 0, 138, 77,
+ 0, 107, 107, 107, 107, 0, 0, 0, 107, 0,
+ 107, 0, 0, 0, 0, 0, 0, 107, 0, 138,
+ 138, 0, 138, 0, 0, 0, 0, 0, 0, 107,
+ 107, 0, 107, 107, 107, 107, 107, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 109, 109, 109, 109,
+ 0, 0, 0, 109, 0, 109, 110, 110, 110, 110,
+ 0, 0, 0, 110, 0, 110, 0, 0, 0, 0,
+ 0, 0, 0, 0, 109, 109, 0, 109, 109, 109,
+ 109, 109, 0, 0, 110, 110, 0, 110, 110, 110,
+ 110, 0, 112, 112, 112, 112, 0, 0, 0, 112,
+ 0, 112, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 112, 112, 0, 112, 112, 112, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 111, 111, 111, 111,
+ 0, 0, 0, 111, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+ 0, 0, 0, 0, 111, 111, 0, 111, 77, 77,
+ 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, 77, 77,
+};
+static short yycheck[] = { 15,
+ 95, 36, 46, 41, 36, 40, 59, 59, 100, 208,
+ 54, 41, 59, 199, 41, 40, 196, 257, 41, 93,
+ 123, 44, 202, 36, 93, 59, 40, 40, 59, 29,
+ 59, 40, 91, 49, 41, 58, 59, 41, 362, 131,
+ 63, 257, 91, 41, 60, 61, 46, 47, 59, 94,
+ 40, 15, 59, 53, 41, 40, 100, 41, 300, 301,
+ 105, 59, 41, 59, 123, 65, 66, 67, 68, 393,
+ 93, 40, 59, 41, 123, 41, 41, 91, 91, 123,
+ 41, 45, 91, 44, 48, 40, 93, 131, 40, 123,
+ 41, 123, 123, 59, 123, 41, 295, 58, 59, 115,
+ 116, 44, 63, 106, 107, 108, 109, 110, 111, 123,
+ 123, 40, 123, 59, 123, 40, 116, 133, 0, 59,
+ 36, 37, 257, 59, 40, 89, 59, 278, 314, 59,
+ 123, 41, 93, 266, 267, 268, 40, 270, 271, 338,
+ 104, 157, 158, 159, 160, 161, 162, 163, 64, 59,
+ 59, 33, 276, 277, 36, 37, 38, 41, 40, 44,
+ 42, 43, 260, 45, 297, 181, 182, 183, 184, 185,
+ 186, 187, 188, 189, 123, 59, 41, 59, 0, 41,
+ 272, 257, 64, 199, 383, 40, 278, 203, 204, 40,
+ 206, 155, 208, 41, 59, 298, 40, 59, 93, 215,
+ 93, 217, 218, 8, 9, 257, 209, 125, 298, 91,
+ 226, 33, 317, 91, 36, 37, 38, 93, 40, 93,
+ 42, 43, 36, 45, 257, 257, 300, 301, 272, 41,
+ 262, 300, 301, 298, 278, 125, 252, 59, 254, 255,
+ 260, 123, 64, 125, 126, 258, 0, 300, 301, 272,
+ 273, 274, 275, 300, 301, 91, 279, 40, 281, 93,
+ 301, 296, 300, 301, 298, 272, 273, 274, 275, 91,
+ 300, 301, 279, 300, 301, 370, 41, 300, 301, 33,
+ 303, 304, 36, 37, 38, 260, 40, 40, 42, 43,
+ 41, 45, 308, 300, 301, 41, 300, 301, 314, 41,
+ 41, 123, 41, 125, 126, 59, 125, 271, 125, 273,
+ 64, 272, 273, 274, 275, 279, 300, 301, 279, 59,
+ 281, 300, 301, 125, 340, 125, 287, 288, 289, 290,
+ 59, 41, 300, 301, 44, 300, 301, 91, 123, 300,
+ 301, 41, 303, 304, 305, 306, 307, 308, 309, 300,
+ 301, 312, 125, 63, 315, 316, 317, 300, 301, 41,
+ 300, 301, 41, 379, 300, 301, 59, 300, 301, 123,
+ 300, 301, 126, 40, 256, 257, 258, 259, 260, 261,
+ 41, 263, 264, 265, 266, 267, 268, 269, 270, 271,
+ 272, 273, 274, 275, 41, 41, 123, 279, 280, 41,
+ 282, 283, 284, 285, 286, 300, 301, 300, 301, 291,
+ 292, 293, 294, 295, 296, 297, 63, 123, 312, 41,
+ 302, 315, 316, 317, 300, 301, 300, 301, 59, 311,
+ 41, 313, 314, 59, 256, 257, 258, 259, 260, 261,
+ 41, 263, 264, 265, 266, 267, 268, 269, 270, 271,
+ 272, 273, 274, 275, 59, 41, 289, 279, 280, 35,
+ 282, 283, 284, 285, 286, 52, 300, 301, 52, 291,
+ 292, 293, 294, 295, 296, 297, 309, 15, 158, 312,
+ 302, 379, 315, 316, 317, 206, 340, 24, -1, 311,
+ -1, 313, 314, 309, 273, 41, 312, -1, 44, 315,
+ 316, 317, 256, 257, 258, 259, 260, 261, -1, 263,
+ 264, 265, 58, 59, -1, 269, -1, 63, 272, 273,
+ 274, 275, -1, 289, 290, 279, 280, -1, 282, 283,
+ 284, 285, 286, -1, -1, 125, -1, 291, 292, 293,
+ 294, 295, 296, 309, -1, -1, 312, 93, 302, 315,
+ 316, 317, -1, -1, -1, -1, -1, 311, 33, 313,
+ 314, 36, 37, 38, -1, 40, 41, 42, 43, 44,
+ 45, 281, -1, 125, -1, -1, -1, 287, 288, 289,
+ 290, -1, -1, 58, 59, -1, -1, -1, 63, 64,
+ -1, -1, -1, 303, 304, 305, 306, 307, 308, 309,
+ -1, -1, 312, -1, -1, 315, 316, 317, 272, 273,
+ 274, 275, -1, -1, -1, 279, 91, -1, 93, 33,
+ -1, -1, 36, 37, 38, -1, 40, 41, 42, 43,
+ 44, 45, -1, -1, 281, -1, 300, 301, -1, -1,
+ 287, 288, 289, 290, 58, 59, -1, -1, -1, 63,
+ 64, 126, -1, -1, -1, -1, 303, 304, 305, 306,
+ 307, 308, 309, -1, -1, 312, -1, -1, 315, 316,
+ 317, -1, -1, -1, -1, -1, 266, 267, 268, 93,
+ 270, 271, 33, 289, 290, 36, 37, 38, -1, 40,
+ -1, 42, 43, -1, 45, -1, 359, 360, -1, -1,
+ -1, 364, 308, 309, -1, -1, 312, 297, 59, 315,
+ 316, 317, 126, 64, 266, 267, 268, 380, 270, 271,
+ -1, 384, -1, -1, -1, -1, 272, 273, 274, 275,
+ -1, -1, -1, 279, -1, 281, -1, -1, -1, -1,
+ 91, 287, 288, 289, 290, 297, -1, -1, -1, -1,
+ -1, -1, -1, -1, 300, 301, -1, 303, 304, 305,
+ 306, 307, 308, 309, -1, -1, 312, -1, -1, 315,
+ 316, 317, 123, -1, -1, 126, -1, -1, -1, -1,
+ -1, -1, 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, -1, -1, -1, 300, 301, 302, 303, 304,
+ 305, 306, 307, 308, 309, -1, 311, 312, 313, 314,
+ 315, 316, 317, 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, -1, -1, -1, 300, 301, 302, 303,
+ 304, 305, 306, 307, 308, 309, -1, 311, 312, 313,
+ 314, 315, 316, 317, -1, 256, 257, 258, 259, 260,
+ 261, 63, 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, 33,
+ -1, 302, 36, 37, 38, -1, 40, -1, 42, 43,
+ 311, 45, 313, 314, -1, -1, -1, -1, 335, 336,
+ 337, -1, 339, -1, -1, 59, -1, -1, -1, -1,
+ 64, -1, -1, 41, -1, -1, 44, -1, -1, -1,
+ -1, -1, -1, -1, -1, -1, -1, -1, -1, 366,
+ 58, 59, -1, -1, -1, -1, 373, 91, -1, 33,
+ 377, -1, 36, 37, 38, -1, 40, -1, 42, 43,
+ -1, 45, -1, 390, 391, -1, 28, 29, -1, -1,
+ -1, -1, -1, -1, -1, 93, -1, -1, 40, 123,
+ 64, -1, 126, -1, 46, 47, 48, -1, -1, 33,
+ 52, 53, 36, 37, 38, -1, 40, -1, 42, 43,
+ -1, 45, -1, 65, 66, 67, 68, 91, 287, 288,
+ 289, 290, -1, -1, -1, -1, -1, -1, -1, -1,
+ 64, -1, -1, -1, -1, -1, -1, -1, 41, 308,
+ 309, 44, -1, 312, -1, -1, 315, 316, 317, 123,
+ -1, -1, 126, -1, -1, 58, 59, 91, -1, -1,
+ 63, -1, -1, 33, 116, -1, 36, 37, 38, -1,
+ 40, -1, 42, 43, -1, 45, -1, -1, -1, 281,
+ -1, -1, -1, -1, -1, 287, 288, 289, 290, 123,
+ 93, -1, 126, -1, 64, -1, -1, -1, -1, -1,
+ -1, 303, 304, 305, 306, 307, 308, 309, -1, -1,
+ 312, -1, -1, 315, 316, 317, -1, -1, -1, -1,
+ -1, 91, 256, 257, 258, 259, 260, 261, 180, 263,
+ 264, 265, -1, -1, -1, 269, -1, -1, 272, 273,
+ 274, 275, -1, -1, -1, 279, 280, -1, 282, 283,
+ 284, 285, 286, 123, -1, 207, 126, 291, 292, 293,
+ 294, 295, 296, -1, 272, 273, 274, 275, 302, -1,
+ -1, 279, -1, -1, -1, -1, -1, 311, -1, 313,
+ 314, -1, -1, 257, 258, 259, 260, 261, 262, 263,
+ 264, 265, 300, 301, -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, 257, 258, 259, 260, 261, 302, 263,
+ 264, 265, -1, -1, -1, 269, -1, 311, -1, 313,
+ 314, -1, 58, -1, -1, -1, 280, 63, 282, 283,
+ 284, 285, 286, -1, -1, -1, -1, 291, 292, 293,
+ 294, 295, 296, -1, -1, -1, -1, -1, 302, 272,
+ 273, 274, 275, -1, -1, -1, 279, 311, 281, 313,
+ 314, -1, -1, -1, 287, 288, -1, 257, 258, 259,
+ 260, 261, -1, 263, 264, 265, -1, 300, 301, 269,
+ 303, 304, 305, 306, 307, 308, -1, -1, -1, -1,
+ 280, -1, 282, 283, 284, 285, 286, -1, -1, -1,
+ -1, 291, 292, 293, 294, 295, 296, -1, -1, -1,
+ 33, -1, 302, 36, 37, 38, -1, 40, -1, 42,
+ 43, 311, 45, 313, 314, -1, -1, -1, -1, -1,
+ -1, -1, -1, -1, -1, -1, 59, -1, -1, -1,
+ -1, 64, -1, -1, -1, 287, 288, 289, 290, -1,
+ 33, -1, -1, 36, 37, 38, -1, 40, 41, 42,
+ 43, -1, 45, 305, 306, 307, 308, 309, 91, -1,
+ 312, -1, -1, 315, 316, 317, -1, -1, -1, -1,
+ -1, 64, -1, -1, -1, 287, 288, 289, 290, -1,
+ 33, -1, -1, 36, 37, 38, -1, 40, -1, 42,
+ 43, -1, 45, 126, 306, 307, 308, 309, 91, -1,
+ 312, -1, -1, 315, 316, 317, -1, -1, -1, -1,
+ -1, 64, -1, -1, -1, -1, -1, -1, -1, -1,
+ 33, -1, -1, 36, 37, 38, -1, 40, 41, 42,
+ 43, -1, 45, 126, -1, 281, -1, -1, 91, -1,
+ 93, 287, 288, 289, 290, -1, -1, -1, -1, -1,
+ -1, 64, -1, -1, -1, -1, -1, 303, 304, 305,
+ 306, 307, 308, 309, -1, -1, 312, -1, -1, 315,
+ 316, 317, -1, 126, 287, 288, 289, 290, 91, -1,
+ 33, -1, -1, 36, 37, 38, -1, 40, 41, 42,
+ 43, -1, 45, -1, 307, 308, 309, -1, -1, 312,
+ -1, -1, 315, 316, 317, -1, -1, -1, -1, -1,
+ -1, 64, 287, 126, 289, 290, -1, -1, -1, -1,
+ -1, -1, -1, -1, 257, 258, 259, 260, 261, -1,
+ 263, 264, 265, 308, 309, -1, 269, 312, 91, -1,
+ 315, 316, 317, -1, -1, -1, -1, 280, -1, 282,
+ 283, 284, 285, 286, -1, -1, -1, -1, 291, 292,
+ 293, 294, 295, 296, 257, 258, 259, 260, 261, 302,
+ 263, 264, 265, 126, -1, -1, 269, -1, 311, -1,
+ 313, 314, -1, -1, -1, -1, -1, 280, -1, 282,
+ 283, 284, 285, 286, -1, -1, -1, -1, 291, 292,
+ 293, 294, 295, 296, 257, 258, 259, 260, 261, 302,
+ 263, 264, 265, -1, -1, -1, 269, -1, 311, -1,
+ 313, 314, -1, -1, -1, -1, -1, 280, -1, 282,
+ 283, 284, 285, 286, -1, -1, -1, -1, 291, 292,
+ 293, 294, 295, 296, 257, 258, 259, 260, 261, 302,
+ 263, 264, 265, -1, -1, -1, 269, -1, 311, -1,
+ 313, 314, -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, 33, -1, 302,
+ 36, 37, 38, -1, 40, 41, 42, 43, 311, 45,
+ 313, 314, -1, -1, 257, 258, 259, 260, 261, -1,
+ 263, 264, 265, -1, -1, -1, 269, -1, 64, -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, 91, -1, 33, -1, 302,
+ 36, 37, 38, -1, 40, 41, 42, 43, 311, 45,
+ 313, 314, -1, -1, -1, -1, -1, -1, -1, -1,
+ -1, -1, -1, -1, -1, -1, -1, -1, 64, -1,
+ 126, -1, -1, -1, -1, -1, 41, -1, -1, 44,
+ -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
+ -1, -1, -1, 58, 59, 91, 33, -1, 63, 36,
+ 37, 38, -1, 40, -1, 42, 43, -1, 45, -1,
+ -1, -1, -1, -1, 287, 288, 289, 290, -1, -1,
+ -1, -1, -1, -1, -1, -1, -1, 64, 93, -1,
+ 126, 304, 305, 306, 307, 308, 309, -1, -1, 312,
+ -1, -1, 315, 316, 317, -1, -1, -1, -1, -1,
+ -1, -1, -1, -1, 91, -1, 33, -1, -1, 36,
+ 37, 38, -1, 40, 41, 42, 43, -1, 45, -1,
+ -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
+ -1, -1, -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, 41, -1, -1, 44, -1, 302, -1, -1, 126,
+ -1, -1, -1, -1, -1, 311, -1, 313, 314, 59,
+ -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, -1, -1, 93, -1, 291, 292, 293, 294, 295,
+ 296, -1, 64, -1, -1, -1, 302, 272, 273, 274,
+ 275, -1, -1, -1, 279, 311, 281, 313, 314, 256,
+ 257, 258, 259, 260, 261, -1, 263, 264, 265, 91,
+ -1, -1, 269, -1, -1, 300, 301, -1, 303, 304,
+ 305, 306, 307, 280, -1, 282, 283, 284, 285, 286,
+ -1, -1, -1, -1, 291, 292, 293, 294, 295, 296,
+ -1, -1, -1, 33, 126, 302, 36, 37, 38, -1,
+ 40, 41, 42, 43, 311, 45, 313, 314, -1, -1,
+ 257, 258, 259, 260, 261, -1, 263, 264, 265, -1,
+ -1, -1, 269, -1, 64, -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, 91, -1, 33, -1, 302, 36, 37, 38, -1,
+ 40, -1, 42, 43, 311, 45, 313, 314, -1, -1,
+ -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
+ -1, -1, -1, -1, 64, -1, 126, -1, -1, -1,
+ -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
+ -1, -1, 272, 273, 274, 275, -1, -1, -1, 279,
+ -1, 91, -1, -1, -1, -1, -1, -1, -1, -1,
+ -1, -1, -1, -1, -1, 257, 258, 259, 260, 261,
+ 300, 263, 264, 265, -1, -1, -1, 269, -1, -1,
+ -1, -1, -1, -1, -1, -1, 126, -1, 280, -1,
+ 282, 283, 284, 285, 286, -1, 41, -1, -1, 291,
+ 292, 293, 294, 295, 296, -1, -1, -1, -1, -1,
+ 302, -1, -1, 58, 59, -1, -1, -1, 63, 311,
+ -1, 313, 314, -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, 93, -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, 41, -1, -1,
+ 44, 291, 292, 293, 294, 295, 296, -1, -1, -1,
+ -1, -1, 302, -1, 58, 59, -1, -1, -1, 63,
+ -1, 311, -1, 313, 314, -1, -1, 257, 258, 259,
+ 260, 261, -1, 263, 264, 265, -1, -1, -1, 269,
+ -1, -1, -1, -1, -1, -1, -1, -1, -1, 93,
+ 280, -1, 282, 283, 284, 285, 286, -1, -1, -1,
+ -1, 291, 292, 293, 294, 295, 296, 33, -1, -1,
+ 63, -1, 302, -1, -1, 41, -1, -1, -1, 45,
+ -1, 311, 48, 313, 314, 51, -1, -1, -1, 55,
+ 56, 57, 58, 59, -1, -1, -1, 63, 64, 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, 102, 272, 273, 274,
+ 275, -1, -1, -1, 279, 41, 281, -1, 44, -1,
+ -1, 93, 287, 288, 289, 290, -1, -1, -1, -1,
+ -1, -1, 58, 59, -1, 300, 301, 63, 303, 304,
+ 305, 306, 307, 308, 309, -1, -1, 312, -1, -1,
+ 315, 316, 317, -1, -1, -1, -1, -1, -1, -1,
+ -1, -1, -1, -1, -1, -1, -1, 93, 164, 165,
+ 166, 167, 168, 169, 170, 171, 172, 173, 174, 175,
+ 176, 177, -1, -1, -1, -1, -1, -1, -1, -1,
+ -1, -1, -1, -1, -1, 191, -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, -1, 303,
+ 304, 305, 306, 307, 308, 309, -1, -1, 312, -1,
+ -1, 315, 316, 317, -1, -1, -1, -1, -1, -1,
+ -1, -1, -1, 41, -1, 93, 44, -1, 281, -1,
+ -1, -1, -1, -1, 287, 288, 289, 290, -1, -1,
+ 58, 59, -1, -1, -1, 63, -1, -1, -1, -1,
+ 276, 304, 305, 306, 307, 308, 309, -1, -1, 312,
+ -1, -1, 315, 316, 317, -1, -1, -1, -1, -1,
+ 272, 273, 274, 275, -1, 93, -1, 279, 41, 281,
+ -1, 44, -1, 309, -1, 287, 288, 289, 290, -1,
+ -1, -1, -1, -1, -1, 58, 59, -1, 300, 301,
+ 63, 303, 304, 305, 306, 307, 308, 309, -1, -1,
+ 312, -1, -1, 315, 316, 317, 272, 273, 274, 275,
+ -1, -1, -1, 279, 41, 281, -1, 44, -1, -1,
+ 93, 287, 288, 289, 290, -1, -1, -1, -1, -1,
+ -1, 58, 59, -1, 300, 301, 63, 303, 304, 305,
+ 306, 307, 308, 309, -1, -1, 312, -1, -1, 315,
+ 316, 317, -1, -1, -1, -1, -1, -1, -1, -1,
+ -1, 41, -1, -1, 44, -1, 93, -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, 272, 273, 274, 275, -1, -1,
+ -1, 279, -1, 281, -1, -1, -1, -1, -1, 287,
+ 288, 289, 290, 93, -1, -1, -1, -1, 41, -1,
+ -1, 44, 300, 301, -1, 303, 304, 305, 306, 307,
+ 308, 309, -1, -1, 312, 58, 59, 315, 316, 317,
+ 63, -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, 41, -1,
+ 93, 44, 300, 301, -1, 303, 304, 305, 306, 307,
+ 308, 309, -1, -1, 312, 58, 59, 315, 316, 317,
+ 63, -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,
+ 93, -1, -1, -1, -1, -1, -1, 300, 301, -1,
+ 303, 304, 305, 306, 307, 308, 309, -1, -1, 312,
+ -1, -1, 315, 316, 317, 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, -1, 303, 304, 305, 306,
+ 307, 308, 309, -1, -1, 312, -1, -1, 315, 316,
+ 317, -1, 272, 273, 274, 275, -1, -1, -1, 279,
+ -1, 281, 93, -1, -1, -1, -1, 287, 288, 289,
+ 290, -1, -1, -1, -1, -1, 41, -1, -1, 44,
+ 300, 301, -1, 303, 304, 305, 306, 307, 308, 309,
+ -1, -1, 312, 58, 59, 315, 316, 317, 63, -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, 93, -1,
+ -1, -1, -1, 41, -1, -1, 44, 300, 301, -1,
+ 303, 304, 305, 306, 307, 308, 309, -1, -1, 312,
+ 58, 59, 315, 316, 317, 63, -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, 41, -1, 93, 44, 300, 301, -1,
+ 303, 304, 305, 306, 307, 308, 309, -1, -1, 312,
+ 58, 59, 315, 316, 317, 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, -1, 93, 41, -1, -1, 44,
+ -1, 272, 273, 274, 275, 41, -1, -1, 279, -1,
+ 281, -1, -1, 58, 59, -1, 287, 288, 289, 290,
+ -1, -1, 58, 59, -1, -1, -1, 63, -1, 300,
+ 301, -1, 303, 304, 305, 306, 307, 308, 309, -1,
+ -1, 312, -1, -1, 315, 316, 317, -1, 93, -1,
+ -1, -1, -1, -1, -1, -1, -1, 93, -1, -1,
+ -1, -1, -1, 41, -1, -1, 44, 272, 273, 274,
+ 275, 41, -1, -1, 279, -1, 281, -1, -1, -1,
+ 58, 59, 287, 288, 289, 290, -1, -1, 58, 59,
+ -1, -1, -1, 63, -1, 300, 301, -1, 303, 304,
+ 305, 306, 307, 308, 309, -1, -1, 312, -1, -1,
+ 315, 316, 317, -1, -1, 93, -1, -1, -1, -1,
+ -1, -1, -1, 93, 272, 273, 274, 275, -1, -1,
+ -1, 279, 41, 281, -1, 44, -1, -1, -1, 287,
+ 288, 289, 290, -1, -1, -1, -1, -1, -1, 58,
+ 59, -1, 300, 301, 63, 303, 304, 305, 306, 307,
+ 308, 309, -1, -1, 312, -1, -1, 315, 316, 317,
+ -1, -1, -1, -1, 272, 273, 274, 275, -1, 41,
+ -1, 279, 44, 281, 93, -1, -1, -1, -1, 287,
+ 288, 289, 290, -1, -1, -1, 58, 59, -1, -1,
+ -1, 63, 300, 301, -1, 303, 304, 305, 306, 307,
+ 308, 309, -1, -1, 312, -1, -1, 315, 316, 317,
+ -1, -1, -1, -1, -1, -1, -1, 272, 273, 274,
+ 275, 93, -1, -1, 279, -1, 272, 273, 274, 275,
+ -1, 41, -1, 279, 44, 281, -1, -1, -1, -1,
+ -1, 287, 288, 289, 290, 300, 301, -1, 58, 59,
+ -1, -1, -1, 63, 300, 301, -1, 303, 304, 305,
+ 306, 307, 308, 309, -1, -1, 312, -1, -1, 315,
+ 316, 317, -1, -1, -1, -1, -1, -1, -1, -1,
+ -1, -1, -1, 93, 272, 273, 274, 275, -1, -1,
+ -1, 279, 272, 273, 274, 275, -1, 41, -1, 279,
+ 44, 281, -1, -1, -1, -1, -1, 287, 288, 289,
+ 290, -1, 300, 301, 58, 59, -1, -1, -1, 63,
+ 300, 301, -1, 303, 304, 305, 306, 307, 308, 309,
+ -1, -1, 312, -1, -1, 315, 316, 317, -1, -1,
+ -1, -1, -1, -1, -1, -1, -1, -1, -1, 93,
+ -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, -1, 303, 304, 305, 306, 307, 308,
+ 309, -1, -1, 312, -1, -1, -1, -1, -1, -1,
+ 272, 273, 274, 275, -1, 41, -1, 279, 44, 281,
+ 93, -1, -1, -1, -1, 287, 288, 289, 290, -1,
+ -1, -1, 58, 59, -1, -1, -1, 63, 300, 301,
+ -1, 303, 304, 305, 306, 307, 308, 309, -1, -1,
+ 312, -1, -1, -1, -1, -1, -1, -1, -1, -1,
+ 41, -1, -1, 44, -1, -1, -1, 93, -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, 41,
+ 300, 301, 44, 303, 304, 305, 306, 307, 308, 309,
+ -1, -1, 93, -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, 272, 273,
+ 274, 275, -1, 41, -1, 279, 44, 281, -1, -1,
+ -1, 93, -1, 287, 288, 289, 290, -1, -1, -1,
+ 58, 59, -1, -1, -1, 63, 300, 301, -1, 303,
+ 304, 305, 306, 307, 308, 309, -1, -1, -1, -1,
+ -1, -1, -1, -1, -1, -1, -1, 41, -1, -1,
+ 44, -1, -1, -1, -1, 93, -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, -1,
+ 303, 304, 305, 306, 307, 308, 309, -1, -1, 93,
+ -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, -1, 303, 304, 305,
+ 306, 307, 308, 309, -1, -1, -1, -1, -1, -1,
+ -1, 272, 273, 274, 275, -1, -1, -1, 279, 41,
+ 281, -1, 44, 93, -1, -1, 287, 288, 289, 290,
+ -1, -1, -1, -1, -1, -1, 58, 59, -1, 300,
+ 301, 63, 303, 304, 305, 306, 307, 308, 309, -1,
+ 272, 273, 274, 275, -1, 41, -1, 279, 44, 281,
+ -1, -1, -1, -1, -1, 287, 288, 289, 290, -1,
+ -1, 93, 58, 59, -1, -1, -1, 63, 300, 301,
+ -1, 303, 304, 305, 306, 307, 308, 309, -1, -1,
+ -1, -1, -1, -1, 272, 273, 274, 275, -1, 41,
+ -1, 279, 44, 281, -1, -1, -1, 93, -1, 287,
+ 288, 289, 290, -1, -1, -1, 58, 59, -1, -1,
+ -1, 63, 300, 301, -1, 303, 304, 305, 306, 307,
+ 308, 309, -1, -1, -1, -1, -1, -1, 272, 273,
+ 274, 275, -1, 41, -1, 279, 44, 281, -1, -1,
+ -1, 93, -1, 287, 288, 289, 290, -1, -1, -1,
+ 58, 59, -1, -1, -1, 63, 300, 301, -1, 303,
+ 304, 305, 306, 307, 308, -1, -1, -1, -1, -1,
+ 41, -1, -1, 44, -1, -1, -1, -1, -1, -1,
+ 41, -1, -1, 44, -1, 93, -1, 58, 59, -1,
+ -1, -1, 272, 273, 274, 275, -1, 58, 59, 279,
+ -1, 281, 63, -1, -1, -1, -1, 287, 288, -1,
+ 290, -1, -1, -1, -1, -1, -1, -1, -1, -1,
+ 300, 301, 93, 303, 304, 305, 306, 307, 308, -1,
+ -1, -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, -1, -1,
+ -1, -1, 58, 59, -1, -1, -1, 63, 300, 301,
+ -1, 303, 304, 305, 306, 307, 272, 273, 274, 275,
+ -1, 41, -1, 279, 44, 281, -1, 93, -1, -1,
+ -1, 287, 288, -1, -1, -1, -1, 93, 58, 59,
+ -1, -1, -1, 63, 300, 301, -1, 303, 304, 305,
+ 306, 307, -1, -1, -1, -1, -1, -1, -1, -1,
+ 272, 273, 274, 275, -1, 41, -1, 279, 44, 281,
+ -1, -1, -1, 93, -1, 287, 288, -1, -1, -1,
+ -1, -1, 58, 59, -1, -1, -1, 63, 300, 301,
+ -1, 303, 304, 305, 306, 307, -1, 41, -1, -1,
+ 44, -1, -1, -1, 272, 273, 274, 275, -1, -1,
+ -1, 279, -1, 281, 58, 59, -1, 93, -1, 287,
+ 288, -1, -1, -1, -1, -1, -1, -1, -1, -1,
+ -1, -1, 300, 301, -1, 303, 304, 305, 306, 307,
+ -1, 272, 273, 274, 275, -1, -1, -1, 279, 93,
+ -1, 272, 273, 274, 275, -1, -1, -1, 279, -1,
+ 281, -1, -1, -1, -1, -1, -1, 288, -1, 300,
+ 301, -1, 303, -1, -1, -1, -1, -1, -1, 300,
+ 301, -1, 303, 304, 305, 306, 307, -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, 272, 273, 274, 275,
+ -1, -1, -1, 279, -1, 281, -1, -1, -1, -1,
+ -1, -1, -1, -1, 300, 301, -1, 303, 304, 305,
+ 306, 307, -1, -1, 300, 301, -1, 303, 304, 305,
+ 306, -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, -1, 303, 304, 305, -1, -1, -1, -1,
+ -1, -1, -1, -1, -1, -1, 272, 273, 274, 275,
+ -1, -1, -1, 279, -1, -1, -1, -1, -1, -1,
+ -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
+ -1, -1, -1, -1, 300, 301, -1, 303, 272, 273,
+ 274, 275, -1, -1, -1, 279, -1, -1, -1, -1,
+ -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
+ -1, -1, -1, -1, -1, -1, 300, 301,
+};
+#define YYFINAL 1
#ifndef YYDEBUG
-# define YYDEBUG 0 /* don't allow debugging */
+#define YYDEBUG 0
#endif
-
+#define YYMAXTOKEN 317
#if YYDEBUG
-
-yytoktype yytoks[] =
-{
- "{", 123,
- ")", 41,
- "WORD", 257,
- "METHOD", 258,
- "THING", 259,
- "PMFUNC", 260,
- "LABEL", 261,
- "FORMAT", 262,
- "SUB", 263,
- "PACKAGE", 264,
- "WHILE", 265,
- "UNTIL", 266,
- "IF", 267,
- "UNLESS", 268,
- "ELSE", 269,
- "ELSIF", 270,
- "CONTINUE", 271,
- "FOR", 272,
- "LOOPEX", 273,
- "DOTDOT", 274,
- "FUNC0", 275,
- "FUNC1", 276,
- "FUNC", 277,
- "RELOP", 278,
- "EQOP", 279,
- "MULOP", 280,
- "ADDOP", 281,
- "DOLSHARP", 282,
- "DO", 283,
- "LOCAL", 284,
- "DELETE", 285,
- "HASHBRACK", 286,
- "LSTOP", 287,
- ",", 44,
- "=", 61,
- "?", 63,
- ":", 58,
- "OROR", 288,
- "ANDAND", 289,
- "BITOROP", 290,
- "BITANDOP", 291,
- "UNIOP", 292,
- "SHIFTOP", 293,
- "MATCHOP", 294,
- "ARROW", 295,
- "!", 33,
- "~", 126,
- "UMINUS", 296,
- "REFGEN", 297,
- "POWOP", 298,
- "PREINC", 299,
- "PREDEC", 300,
- "POSTINC", 301,
- "POSTDEC", 302,
- "(", 40,
- "-unknown-", -1 /* ends search */
+static char *yyname[] = {
+"end-of-file",0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
+"'!'",0,0,"'$'","'%'","'&'",0,"'('","')'","'*'","'+'","','","'-'",0,0,0,0,0,0,0,
+0,0,0,0,0,"':'","';'",0,0,0,"'?'","'@'",0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
+0,0,0,0,0,0,"'['",0,"']'",0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
+0,0,"'{'",0,"'}'","'~'",0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
+0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
+0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
+0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"WORD","METHOD","FUNCMETH","THING",
+"PMFUNC","PRIVATEREF","FUNC0SUB","UNIOPSUB","LSTOPSUB","LABEL","FORMAT","SUB",
+"ANONSUB","PACKAGE","USE","WHILE","UNTIL","IF","UNLESS","ELSE","ELSIF",
+"CONTINUE","FOR","LOOPEX","DOTDOT","FUNC0","FUNC1","FUNC","UNIOP","LSTOP",
+"RELOP","EQOP","MULOP","ADDOP","DOLSHARP","DO","HASHBRACK","NOAMP","LOCAL","MY",
+"MYSUB","COLONATTR","PREC_LOW","OROP","ANDOP","NOTOP","ASSIGNOP","OROR",
+"ANDAND","BITOROP","BITANDOP","SHIFTOP","MATCHOP","UMINUS","REFGEN","POWOP",
+"PREINC","PREDEC","POSTINC","POSTDEC","ARROW",
};
-
-char * yyreds[] =
-{
- "-no such reduction-",
- "prog : /* empty */",
- "prog : lineseq",
- "block : '{' remember lineseq '}'",
- "remember : /* empty */",
- "lineseq : /* empty */",
- "lineseq : lineseq decl",
- "lineseq : lineseq line",
- "line : label cond",
- "line : loop",
- "line : label ';'",
- "line : label sideff ';'",
- "sideff : error",
- "sideff : expr",
- "sideff : expr IF expr",
- "sideff : expr UNLESS expr",
- "sideff : expr WHILE expr",
- "sideff : expr UNTIL expr",
- "else : /* empty */",
- "else : ELSE block",
- "else : ELSIF '(' expr ')' block else",
- "cond : IF '(' expr ')' block else",
- "cond : UNLESS '(' expr ')' block else",
- "cond : IF block block else",
- "cond : UNLESS block block else",
- "cont : /* empty */",
- "cont : CONTINUE block",
- "loop : label WHILE '(' texpr ')' block cont",
- "loop : label UNTIL '(' expr ')' block cont",
- "loop : label WHILE block block cont",
- "loop : label UNTIL block block cont",
- "loop : label FOR scalar '(' expr crp block cont",
- "loop : label FOR '(' expr crp block cont",
- "loop : label FOR '(' nexpr ';' texpr ';' nexpr ')' block",
- "loop : label block cont",
- "nexpr : /* empty */",
- "nexpr : sideff",
- "texpr : /* empty */",
- "texpr : expr",
- "label : /* empty */",
- "label : LABEL",
- "decl : format",
- "decl : subrout",
- "decl : package",
- "format : FORMAT WORD block",
- "format : FORMAT block",
- "subrout : SUB WORD block",
- "package : PACKAGE WORD ';'",
- "expr : expr ',' sexpr",
- "expr : sexpr",
- "listop : LSTOP indirob listexpr",
- "listop : FUNC '(' indirob listexpr ')'",
- "listop : indirob ARROW LSTOP listexpr",
- "listop : indirob ARROW FUNC '(' listexpr ')'",
- "listop : term ARROW METHOD '(' listexpr ')'",
- "listop : METHOD indirob listexpr",
- "listop : LSTOP listexpr",
- "listop : FUNC '(' listexpr ')'",
- "sexpr : sexpr '=' sexpr",
- "sexpr : sexpr POWOP '=' sexpr",
- "sexpr : sexpr MULOP '=' sexpr",
- "sexpr : sexpr ADDOP '=' sexpr",
- "sexpr : sexpr SHIFTOP '=' sexpr",
- "sexpr : sexpr BITANDOP '=' sexpr",
- "sexpr : sexpr BITOROP '=' sexpr",
- "sexpr : sexpr ANDAND '=' sexpr",
- "sexpr : sexpr OROR '=' sexpr",
- "sexpr : sexpr POWOP sexpr",
- "sexpr : sexpr MULOP sexpr",
- "sexpr : sexpr ADDOP sexpr",
- "sexpr : sexpr SHIFTOP sexpr",
- "sexpr : sexpr RELOP sexpr",
- "sexpr : sexpr EQOP sexpr",
- "sexpr : sexpr BITANDOP sexpr",
- "sexpr : sexpr BITOROP sexpr",
- "sexpr : sexpr DOTDOT sexpr",
- "sexpr : sexpr ANDAND sexpr",
- "sexpr : sexpr OROR sexpr",
- "sexpr : sexpr '?' sexpr ':' sexpr",
- "sexpr : sexpr MATCHOP sexpr",
- "sexpr : term",
- "term : '-' term",
- "term : '+' term",
- "term : '!' term",
- "term : '~' term",
- "term : REFGEN term",
- "term : term POSTINC",
- "term : term POSTDEC",
- "term : PREINC term",
- "term : PREDEC term",
- "term : LOCAL sexpr",
- "term : '(' expr crp",
- "term : '(' ')'",
- "term : '[' expr crb",
- "term : '[' ']'",
- "term : HASHBRACK expr crhb",
- "term : HASHBRACK ';' '}'",
- "term : scalar",
- "term : star",
- "term : scalar '[' expr ']'",
- "term : term ARROW '[' expr ']'",
- "term : hsh",
- "term : ary",
- "term : arylen",
- "term : scalar '{' expr ';' '}'",
- "term : term ARROW '{' expr ';' '}'",
- "term : '(' expr crp '[' expr ']'",
- "term : '(' ')' '[' expr ']'",
- "term : ary '[' expr ']'",
- "term : ary '{' expr ';' '}'",
- "term : DELETE scalar '{' expr ';' '}'",
- "term : DELETE '(' scalar '{' expr ';' '}' ')'",
- "term : THING",
- "term : amper",
- "term : amper '(' ')'",
- "term : amper '(' expr crp",
- "term : DO sexpr",
- "term : DO block",
- "term : DO WORD '(' ')'",
- "term : DO WORD '(' expr crp",
- "term : DO scalar '(' ')'",
- "term : DO scalar '(' expr crp",
- "term : LOOPEX",
- "term : LOOPEX WORD",
- "term : UNIOP",
- "term : UNIOP block",
- "term : UNIOP sexpr",
- "term : FUNC0",
- "term : FUNC0 '(' ')'",
- "term : FUNC1 '(' ')'",
- "term : FUNC1 '(' expr ')'",
- "term : PMFUNC '(' sexpr ')'",
- "term : PMFUNC '(' sexpr ',' sexpr ')'",
- "term : WORD",
- "term : listop",
- "listexpr : /* empty */",
- "listexpr : expr",
- "amper : '&' indirob",
- "scalar : '$' indirob",
- "ary : '@' indirob",
- "hsh : '%' indirob",
- "arylen : DOLSHARP indirob",
- "star : '*' indirob",
- "indirob : WORD",
- "indirob : scalar",
- "indirob : block",
- "crp : ',' ')'",
- "crp : ')'",
- "crb : ',' ']'",
- "crb : ']'",
- "crhb : ',' ';' '}'",
- "crhb : ';' '}'",
+static char *yyrule[] = {
+"$accept : prog",
+"$$1 :",
+"prog : $$1 lineseq",
+"block : '{' remember lineseq '}'",
+"remember :",
+"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 ';'",
+"$$2 :",
+"use : USE startsub $$2 WORD WORD listexpr ';'",
+"expr : expr ANDOP expr",
+"expr : expr OROP 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 ')'",
+"$$3 :",
+"listop : LSTOPSUB startanonsub block $$3 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 MATCHOP term",
+"termunop : '-' term",
+"termunop : '+' term",
+"termunop : '!' term",
+"termunop : '~' term",
+"termunop : term POSTINC",
+"termunop : term POSTDEC",
+"termunop : PREINC term",
+"termunop : PREDEC term",
+"anonymous : '[' expr ']'",
+"anonymous : '[' ']'",
+"anonymous : HASHBRACK expr ';' '}'",
+"anonymous : HASHBRACK ';' '}'",
+"anonymous : ANONSUB startanonsub proto subattrlist block",
+"termdo : DO term",
+"termdo : DO block",
+"termdo : DO WORD '(' ')'",
+"termdo : DO WORD '(' expr ')'",
+"termdo : DO scalar '(' ')'",
+"termdo : DO scalar '(' expr ')'",
+"term : termbinop",
+"term : termunop",
+"term : anonymous",
+"term : termdo",
+"term : term '?' term ':' term",
+"term : REFGEN term",
+"term : myattrterm",
+"term : LOCAL term",
+"term : '(' expr ')'",
+"term : '(' ')'",
+"term : scalar",
+"term : star",
+"term : hsh",
+"term : ary",
+"term : arylen",
+"term : subscripted",
+"term : '(' expr ')' '[' expr ']'",
+"term : '(' ')' '[' expr ']'",
+"term : ary '[' expr ']'",
+"term : ary '{' expr ';' '}'",
+"term : THING",
+"term : amper",
+"term : amper '(' ')'",
+"term : amper '(' expr ')'",
+"term : NOAMP WORD listexpr",
+"term : LOOPEX",
+"term : LOOPEX term",
+"term : NOTOP argexpr",
+"term : UNIOP",
+"term : UNIOP block",
+"term : UNIOP term",
+"term : UNIOPSUB term",
+"term : FUNC0",
+"term : FUNC0 '(' ')'",
+"term : FUNC0SUB",
+"term : FUNC1 '(' ')'",
+"term : FUNC1 '(' expr ')'",
+"term : PMFUNC '(' term ')'",
+"term : PMFUNC '(' term ',' term ')'",
+"term : WORD",
+"term : listop",
+"myattrterm : MY myterm myattrlist",
+"myattrterm : MY myterm",
+"myterm : '(' expr ')'",
+"myterm : '(' ')'",
+"myterm : scalar",
+"myterm : hsh",
+"myterm : ary",
+"listexpr :",
+"listexpr : argexpr",
+"listexprcom :",
+"listexprcom : expr",
+"listexprcom : expr ','",
+"my_scalar : scalar",
+"amper : '&' indirob",
+"scalar : '$' indirob",
+"ary : '@' indirob",
+"hsh : '%' indirob",
+"arylen : DOLSHARP indirob",
+"star : '*' indirob",
+"indirob : WORD",
+"indirob : scalar",
+"indirob : block",
+"indirob : PRIVATEREF",
};
-#endif /* YYDEBUG */
-#line 1 "/usr/lib/yaccpar"
-/* @(#)yaccpar 1.10 89/04/04 SMI; from S5R3 1.10 */
-
-/*
-** Skeleton parser driver for yacc output
-*/
-
-/*
-** yacc user known macros and defines
-*/
-#define YYERROR goto yyerrlab
-#define YYACCEPT { free(yys); free(yyv); return(0); }
-#define YYABORT { free(yys); free(yyv); return(1); }
-#define YYBACKUP( newtoken, newvalue )\
-{\
- if ( yychar >= 0 || ( yyr2[ yytmp ] >> 1 ) != 1 )\
- {\
- yyerror( "syntax error - cannot backup" );\
- goto yyerrlab;\
- }\
- yychar = newtoken;\
- yystate = *yyps;\
- yylval = newvalue;\
- goto yynewstate;\
-}
-#define YYRECOVERING() (!!yyerrflag)
-#ifndef YYDEBUG
-# define YYDEBUG 1 /* make debugging available */
#endif
+#define yyclearin (yychar=(-1))
+#define yyerrok (yyerrflag=0)
+#ifdef YYSTACKSIZE
+#ifndef YYMAXDEPTH
+#define YYMAXDEPTH YYSTACKSIZE
+#endif
+#else
+#ifdef YYMAXDEPTH
+#define YYSTACKSIZE YYMAXDEPTH
+#else
+#define YYSTACKSIZE 500
+#define YYMAXDEPTH 500
+#endif
+#endif
+#line 789 "perly.y"
+ /* PROGRAM */
-/*
-** user known globals
-*/
-int yydebug; /* set to 1 to get debugging */
-
-/*
-** driver internal defines
-*/
-#define YYFLAG (-1000)
-
-/*
-** static variables used by the parser
-*/
-static YYSTYPE *yyv; /* value stack */
-static int *yys; /* state stack */
-
-static YYSTYPE *yypv; /* top of value stack */
-static int *yyps; /* top of state stack */
-
-static int yystate; /* current state */
-static int yytmp; /* extra var (lasts between blocks) */
-
-int yynerrs; /* number of errors */
-
-int yyerrflag; /* error recovery flag */
-int yychar; /* current input token number */
+/* more stuff added to make perly_c.diff easier to apply */
+#ifdef yyparse
+#undef yyparse
+#endif
+#define yyparse() Perl_yyparse(pTHX)
-/*
-** yyparse - return 0 if worked, 1 if syntax error not recovered from
-*/
+#line 1409 "perly.c"
+#define YYABORT goto yyabort
+#define YYACCEPT goto yyaccept
+#define YYERROR goto yyerrlab
int
yyparse()
{
- register YYSTYPE *yypvt; /* top of value stack for $vars */
- unsigned yymaxdepth = YYMAXDEPTH;
-
- /*
- ** Initialize externals - yyparse may be called more than once
- */
- yyv = (YYSTYPE*)malloc(yymaxdepth*sizeof(YYSTYPE));
- yys = (int*)malloc(yymaxdepth*sizeof(int));
- if (!yyv || !yys)
- {
- yyerror( "out of memory" );
- return(1);
- }
- yypv = &yyv[-1];
- yyps = &yys[-1];
- yystate = 0;
- yytmp = 0;
- yynerrs = 0;
- yyerrflag = 0;
- yychar = -1;
-
- goto yystack;
- {
- register YYSTYPE *yy_pv; /* top of value stack */
- register int *yy_ps; /* top of state stack */
- register int yy_state; /* current state */
- register int yy_n; /* internal state number info */
+ register int yym, yyn, yystate;
+ register short *yyssp;
+ register YYSTYPE *yyvsp;
+ short* yyss;
+ YYSTYPE* yyvs;
+ unsigned yystacksize = YYSTACKSIZE;
+ int retval = 0;
+#if YYDEBUG
+ register char *yys;
+#endif
- /*
- ** get globals into registers.
- ** branch to here only if YYBACKUP was called.
- */
- yynewstate:
- yy_pv = yypv;
- yy_ps = yyps;
- yy_state = yystate;
- goto yy_newstate;
+ struct ysv *ysave;
+#ifdef USE_ITHREADS
+ ENTER; /* force yydestruct() before we return */
+#endif
+ New(73, ysave, 1, struct ysv);
+ SAVEDESTRUCTOR_X(yydestruct, ysave);
+ ysave->oldyydebug = yydebug;
+ ysave->oldyynerrs = yynerrs;
+ ysave->oldyyerrflag = yyerrflag;
+ ysave->oldyychar = yychar;
+ ysave->oldyyval = yyval;
+ ysave->oldyylval = yylval;
+
+#if YYDEBUG
+ if ((yys = getenv("YYDEBUG")))
+ {
+ yyn = *yys;
+ if (yyn >= '0' && yyn <= '9')
+ yydebug = yyn - '0';
+ }
+#endif
- /*
- ** get globals into registers.
- ** either we just started, or we just finished a reduction
- */
- yystack:
- yy_pv = yypv;
- yy_ps = yyps;
- yy_state = yystate;
+ yynerrs = 0;
+ yyerrflag = 0;
+ yychar = (-1);
- /*
- ** top of for (;;) loop while no reductions done
- */
- yy_stack:
- /*
- ** put a state and value onto the stacks
- */
-#if YYDEBUG
- /*
- ** if debugging, look up token value in list of value vs.
- ** name pairs. 0 and negative (-1) are special values.
- ** Note: linear search is used since time is not a real
- ** consideration while debugging.
- */
- if ( yydebug )
- {
- register int yy_i;
+ /*
+ ** 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;
- (void)printf( "State %d, token ", yy_state );
- if ( yychar == 0 )
- (void)printf( "end-of-file\n" );
- else if ( yychar < 0 )
- (void)printf( "-none-\n" );
- else
- {
- for ( yy_i = 0; yytoks[yy_i].t_val >= 0;
- yy_i++ )
- {
- if ( yytoks[yy_i].t_val == yychar )
- break;
- }
- (void)printf( "%s\n", yytoks[yy_i].t_name );
- }
- }
-#endif /* YYDEBUG */
- if ( ++yy_ps >= &yys[ yymaxdepth ] ) /* room on stack? */
- {
- /*
- ** reallocate and recover. Note that pointers
- ** have to be reset, or bad things will happen
- */
- int yyps_index = (yy_ps - yys);
- int yypv_index = (yy_pv - yyv);
- int yypvt_index = (yypvt - yyv);
- yymaxdepth += YYMAXDEPTH;
- yyv = (YYSTYPE*)realloc((char*)yyv,
- yymaxdepth * sizeof(YYSTYPE));
- yys = (int*)realloc((char*)yys,
- yymaxdepth * sizeof(int));
- if (!yyv || !yys)
- {
- yyerror( "yacc stack overflow" );
- return(1);
- }
- yy_ps = yys + yyps_index;
- yy_pv = yyv + yypv_index;
- yypvt = yyv + yypvt_index;
- }
- *yy_ps = yy_state;
- *++yy_pv = yyval;
+ yyssp = yyss;
+ yyvsp = yyvs;
+ *yyssp = yystate = 0;
- /*
- ** we have a new state - find out what to do
- */
- yy_newstate:
- if ( ( yy_n = yypact[ yy_state ] ) <= YYFLAG )
- goto yydefault; /* simple state */
+yyloop:
+ if ((yyn = yydefred[yystate])) goto yyreduce;
+ if (yychar < 0)
+ {
+ if ((yychar = yylex()) < 0) yychar = 0;
#if YYDEBUG
- /*
- ** if debugging, need to mark whether new token grabbed
- */
- yytmp = yychar < 0;
+ if (yydebug)
+ {
+ yys = 0;
+ if (yychar <= YYMAXTOKEN) yys = yyname[yychar];
+ if (!yys) yys = "illegal-symbol";
+ PerlIO_printf(Perl_debug_log, "yydebug: state %d, reading %d (%s)\n", yystate,
+ yychar, yys);
+ }
#endif
- if ( ( yychar < 0 ) && ( ( yychar = yylex() ) < 0 ) )
- yychar = 0; /* reached EOF */
+ }
+ if ((yyn = yysindex[yystate]) && (yyn += yychar) >= 0 &&
+ yyn <= YYTABLESIZE && yycheck[yyn] == yychar)
+ {
#if YYDEBUG
- if ( yydebug && yytmp )
- {
- register int yy_i;
-
- (void)printf( " *** Received token " );
- if ( yychar == 0 )
- (void)printf( "end-of-file\n" );
- else if ( yychar < 0 )
- (void)printf( "-none-\n" );
- else
- {
- for ( yy_i = 0; yytoks[yy_i].t_val >= 0;
- yy_i++ )
- {
- if ( yytoks[yy_i].t_val == yychar )
- break;
- }
- (void)printf( "%s\n", yytoks[yy_i].t_name );
- }
- }
-#endif /* YYDEBUG */
- if ( ( ( yy_n += yychar ) < 0 ) || ( yy_n >= YYLAST ) )
- goto yydefault;
- if ( yychk[ yy_n = yyact[ yy_n ] ] == yychar ) /*valid shift*/
- {
- yychar = -1;
- yyval = yylval;
- yy_state = yy_n;
- if ( yyerrflag > 0 )
- yyerrflag--;
- goto yy_stack;
- }
+ if (yydebug)
+ PerlIO_printf(Perl_debug_log, "yydebug: state %d, shifting to state %d\n",
+ yystate, yytable[yyn]);
+#endif
+ if (yyssp >= yyss + yystacksize - 1)
+ {
+ /*
+ ** reallocate and recover. Note that pointers
+ ** have to be reset, or bad things will happen
+ */
+ int yyps_index = (yyssp - yyss);
+ int yypv_index = (yyvsp - yyvs);
+ yystacksize += YYSTACKSIZE;
+ ysave->yyvs = Renew(yyvs, yystacksize, YYSTYPE);
+ ysave->yyss = Renew(yyss, yystacksize, short);
+ if (!yyvs || !yyss)
+ goto yyoverflow;
+ yyssp = yyss + yyps_index;
+ yyvsp = yyvs + yypv_index;
+ }
+ *++yyssp = yystate = yytable[yyn];
+ *++yyvsp = yylval;
+ yychar = (-1);
+ if (yyerrflag > 0) --yyerrflag;
+ goto yyloop;
+ }
+ if ((yyn = yyrindex[yystate]) && (yyn += yychar) >= 0 &&
+ yyn <= YYTABLESIZE && yycheck[yyn] == yychar)
+ {
+ yyn = yytable[yyn];
+ goto yyreduce;
+ }
+ if (yyerrflag) goto yyinrecovery;
+#ifdef lint
- yydefault:
- if ( ( yy_n = yydef[ yy_state ] ) == -2 )
- {
-#if YYDEBUG
- yytmp = yychar < 0;
#endif
- if ( ( yychar < 0 ) && ( ( yychar = yylex() ) < 0 ) )
- yychar = 0; /* reached EOF */
-#if YYDEBUG
- if ( yydebug && yytmp )
- {
- register int yy_i;
- (void)printf( " *** Received token " );
- if ( yychar == 0 )
- (void)printf( "end-of-file\n" );
- else if ( yychar < 0 )
- (void)printf( "-none-\n" );
- else
- {
- for ( yy_i = 0;
- yytoks[yy_i].t_val >= 0;
- yy_i++ )
- {
- if ( yytoks[yy_i].t_val
- == yychar )
- {
- break;
- }
- }
- (void)printf( "%s\n", yytoks[yy_i].t_name );
- }
- }
-#endif /* YYDEBUG */
- /*
- ** look through exception table
- */
- {
- register int *yyxi = yyexca;
+ yyerror("syntax error");
+#ifdef lint
- while ( ( *yyxi != -1 ) ||
- ( yyxi[1] != yy_state ) )
- {
- yyxi += 2;
- }
- while ( ( *(yyxi += 2) >= 0 ) &&
- ( *yyxi != yychar ) )
- ;
- if ( ( yy_n = yyxi[1] ) < 0 )
- YYACCEPT;
- }
- }
+#endif
- /*
- ** check for syntax error
- */
- if ( yy_n == 0 ) /* have an error */
- {
- /* no worry about speed here! */
- switch ( yyerrflag )
- {
- case 0: /* new error */
- yyerror( "syntax error" );
- goto skip_init;
- yyerrlab:
- /*
- ** get globals into registers.
- ** we have a user generated syntax type error
- */
- yy_pv = yypv;
- yy_ps = yyps;
- yy_state = yystate;
- yynerrs++;
- skip_init:
- case 1:
- case 2: /* incompletely recovered error */
- /* try again... */
- yyerrflag = 3;
- /*
- ** find state where "error" is a legal
- ** shift action
- */
- while ( yy_ps >= yys )
- {
- yy_n = yypact[ *yy_ps ] + YYERRCODE;
- if ( yy_n >= 0 && yy_n < YYLAST &&
- yychk[yyact[yy_n]] == YYERRCODE) {
- /*
- ** simulate shift of "error"
- */
- yy_state = yyact[ yy_n ];
- goto yy_stack;
- }
- /*
- ** current state has no shift on
- ** "error", pop stack
- */
+ ++yynerrs;
+yyinrecovery:
+ if (yyerrflag < 3)
+ {
+ yyerrflag = 3;
+ for (;;)
+ {
+ if ((yyn = yysindex[*yyssp]) && (yyn += YYERRCODE) >= 0 &&
+ yyn <= YYTABLESIZE && yycheck[yyn] == YYERRCODE)
+ {
#if YYDEBUG
-# define _POP_ "Error recovery pops state %d, uncovers state %d\n"
- if ( yydebug )
- (void)printf( _POP_, *yy_ps,
- yy_ps[-1] );
-# undef _POP_
+ if (yydebug)
+ PerlIO_printf(Perl_debug_log, "yydebug: state %d, error recovery shifting\
+ to state %d\n", *yyssp, yytable[yyn]);
#endif
- yy_ps--;
- yy_pv--;
- }
- /*
- ** there is no state on stack with "error" as
- ** a valid shift. give up.
- */
- YYABORT;
- case 3: /* no shift yet; eat a token */
+ if (yyssp >= yyss + yystacksize - 1)
+ {
+ /*
+ ** reallocate and recover. Note that pointers
+ ** have to be reset, or bad things will happen
+ */
+ int yyps_index = (yyssp - yyss);
+ int yypv_index = (yyvsp - yyvs);
+ yystacksize += YYSTACKSIZE;
+ ysave->yyvs = Renew(yyvs, yystacksize, YYSTYPE);
+ ysave->yyss = Renew(yyss, yystacksize, short);
+ if (!yyvs || !yyss)
+ goto yyoverflow;
+ yyssp = yyss + yyps_index;
+ yyvsp = yyvs + yypv_index;
+ }
+ *++yyssp = yystate = yytable[yyn];
+ *++yyvsp = yylval;
+ goto yyloop;
+ }
+ else
+ {
#if YYDEBUG
- /*
- ** if debugging, look up token in list of
- ** pairs. 0 and negative shouldn't occur,
- ** but since timing doesn't matter when
- ** debugging, it doesn't hurt to leave the
- ** tests here.
- */
- if ( yydebug )
- {
- register int yy_i;
-
- (void)printf( "Error recovery discards " );
- if ( yychar == 0 )
- (void)printf( "token end-of-file\n" );
- else if ( yychar < 0 )
- (void)printf( "token -none-\n" );
- else
- {
- for ( yy_i = 0;
- yytoks[yy_i].t_val >= 0;
- yy_i++ )
- {
- if ( yytoks[yy_i].t_val
- == yychar )
- {
- break;
- }
- }
- (void)printf( "token %s\n",
- yytoks[yy_i].t_name );
- }
- }
-#endif /* YYDEBUG */
- if ( yychar == 0 ) /* reached EOF. quit */
- YYABORT;
- yychar = -1;
- goto yy_newstate;
- }
- }/* end if ( yy_n == 0 ) */
- /*
- ** reduction by production yy_n
- ** put stack tops, etc. so things right after switch
- */
+ if (yydebug)
+ PerlIO_printf(Perl_debug_log, "yydebug: error recovery discarding state %d\n",
+ *yyssp);
+#endif
+ if (yyssp <= yyss) goto yyabort;
+ --yyssp;
+ --yyvsp;
+ }
+ }
+ }
+ else
+ {
+ if (yychar == 0) goto yyabort;
#if YYDEBUG
- /*
- ** if debugging, print the string that is the user's
- ** specification of the reduction which is just about
- ** to be done.
- */
- if ( yydebug )
- (void)printf( "Reduce by (%d) \"%s\"\n",
- yy_n, yyreds[ yy_n ] );
+ if (yydebug)
+ {
+ yys = 0;
+ if (yychar <= YYMAXTOKEN) yys = yyname[yychar];
+ if (!yys) yys = "illegal-symbol";
+ PerlIO_printf(Perl_debug_log, "yydebug: state %d, error recovery discards token %d (%s)\n",
+ yystate, yychar, yys);
+ }
#endif
- yytmp = yy_n; /* value to switch over */
- yypvt = yy_pv; /* $vars top of value stack */
- /*
- ** Look in goto table for next state
- ** Sorry about using yy_state here as temporary
- ** register variable, but why not, if it works...
- ** If yyr2[ yy_n ] doesn't have the low order bit
- ** set, then there is no action to be done for
- ** this reduction. So, no saving & unsaving of
- ** registers done. The only difference between the
- ** code just after the if and the body of the if is
- ** the goto yy_stack in the body. This way the test
- ** can be made before the choice of what to do is needed.
- */
- {
- /* length of production doubled with extra bit */
- register int yy_len = yyr2[ yy_n ];
-
- if ( !( yy_len & 01 ) )
- {
- yy_len >>= 1;
- yyval = ( yy_pv -= yy_len )[1]; /* $$ = $1 */
- yy_state = yypgo[ yy_n = yyr1[ yy_n ] ] +
- *( yy_ps -= yy_len ) + 1;
- if ( yy_state >= YYLAST ||
- yychk[ yy_state =
- yyact[ yy_state ] ] != -yy_n )
- {
- yy_state = yyact[ yypgo[ yy_n ] ];
- }
- goto yy_stack;
- }
- yy_len >>= 1;
- yyval = ( yy_pv -= yy_len )[1]; /* $$ = $1 */
- yy_state = yypgo[ yy_n = yyr1[ yy_n ] ] +
- *( yy_ps -= yy_len ) + 1;
- if ( yy_state >= YYLAST ||
- yychk[ yy_state = yyact[ yy_state ] ] != -yy_n )
- {
- yy_state = yyact[ yypgo[ yy_n ] ];
- }
- }
- /* save until reenter driver code */
- yystate = yy_state;
- yyps = yy_ps;
- yypv = yy_pv;
- }
- /*
- ** code supplied by user is placed in this switch
- */
- switch( yytmp )
- {
-
+ yychar = (-1);
+ goto yyloop;
+ }
+yyreduce:
+#if YYDEBUG
+ if (yydebug)
+ PerlIO_printf(Perl_debug_log, "yydebug: state %d, reducing by rule %d (%s)\n",
+ yystate, yyn, yyrule[yyn]);
+#endif
+ yym = yylen[yyn];
+ yyval = yyvsp[1-yym];
+ switch (yyn)
+ {
case 1:
-# line 100 "perly.y"
+#line 130 "perly.y"
{
#if defined(YYDEBUG) && defined(DEBUGGING)
- yydebug = (debug & 1);
+ yydebug = (DEBUG_p_TEST);
#endif
- expect = XBLOCK;
- } break;
+ PL_expect = XSTATE; yyval.ival = block_start(TRUE);
+ }
+break;
case 2:
-# line 107 "perly.y"
-{ if (in_eval) {
- eval_root = newUNOP(OP_LEAVEEVAL, 0, yypvt[-0].opval);
- eval_start = linklist(eval_root);
- eval_root->op_next = 0;
- peep(eval_start);
- }
- else
- main_root = block_head(scalar(yypvt[-0].opval), &main_start);
- } break;
+#line 137 "perly.y"
+{ newPROG(block_end(yyvsp[-1].ival,yyvsp[0].opval)); }
+break;
case 3:
-# line 119 "perly.y"
-{ yyval.opval = scalarseq(yypvt[-1].opval);
- if (copline > (line_t)yypvt[-3].ival)
- copline = yypvt[-3].ival;
- if (savestack_ix > yypvt[-2].ival)
- leave_scope(yypvt[-2].ival);
- expect = XBLOCK; } break;
+#line 142 "perly.y"
+{ if (PL_copline > (line_t)yyvsp[-3].ival)
+ PL_copline = yyvsp[-3].ival;
+ yyval.opval = block_end(yyvsp[-2].ival, yyvsp[-1].opval); }
+break;
case 4:
-# line 128 "perly.y"
-{ yyval.ival = savestack_ix; } break;
+#line 148 "perly.y"
+{ yyval.ival = block_start(TRUE); }
+break;
case 5:
-# line 132 "perly.y"
-{ yyval.opval = Nullop; } break;
+#line 152 "perly.y"
+{ if (PL_copline > (line_t)yyvsp[-3].ival)
+ PL_copline = yyvsp[-3].ival;
+ yyval.opval = block_end(yyvsp[-2].ival, yyvsp[-1].opval); }
+break;
case 6:
-# line 134 "perly.y"
-{ yyval.opval = yypvt[-1].opval; } break;
+#line 158 "perly.y"
+{ yyval.ival = block_start(FALSE); }
+break;
case 7:
-# line 136 "perly.y"
-{ yyval.opval = append_list(OP_LINESEQ, yypvt[-1].opval, yypvt[-0].opval); pad_reset(); } break;
+#line 163 "perly.y"
+{ yyval.opval = Nullop; }
+break;
case 8:
-# line 140 "perly.y"
-{ yyval.opval = newSTATEOP(0, yypvt[-1].pval, yypvt[-0].opval); } break;
+#line 165 "perly.y"
+{ yyval.opval = yyvsp[-1].opval; }
+break;
+case 9:
+#line 167 "perly.y"
+{ yyval.opval = append_list(OP_LINESEQ,
+ (LISTOP*)yyvsp[-1].opval, (LISTOP*)yyvsp[0].opval);
+ PL_pad_reset_pending = TRUE;
+ if (yyvsp[-1].opval && yyvsp[0].opval) PL_hints |= HINT_BLOCK_SCOPE; }
+break;
case 10:
-# line 143 "perly.y"
-{ if (yypvt[-1].pval != Nullch) {
- yyval.opval = newSTATEOP(0, yypvt[-1].pval, newOP(OP_NULL, 0));
+#line 175 "perly.y"
+{ yyval.opval = newSTATEOP(0, yyvsp[-1].pval, yyvsp[0].opval); }
+break;
+case 12:
+#line 178 "perly.y"
+{ if (yyvsp[-1].pval != Nullch) {
+ yyval.opval = newSTATEOP(0, yyvsp[-1].pval, newOP(OP_NULL, 0));
}
else {
yyval.opval = Nullop;
- copline = NOLINE;
+ PL_copline = NOLINE;
}
- expect = XBLOCK; } break;
-case 11:
-# line 152 "perly.y"
-{ yyval.opval = newSTATEOP(0, yypvt[-2].pval, yypvt[-1].opval);
- expect = XBLOCK; } break;
-case 12:
-# line 157 "perly.y"
-{ yyval.opval = Nullop; } break;
+ PL_expect = XSTATE; }
+break;
case 13:
-# line 159 "perly.y"
-{ yyval.opval = yypvt[-0].opval; } break;
+#line 187 "perly.y"
+{ yyval.opval = newSTATEOP(0, yyvsp[-2].pval, yyvsp[-1].opval);
+ PL_expect = XSTATE; }
+break;
case 14:
-# line 161 "perly.y"
-{ yyval.opval = newLOGOP(OP_AND, 0, yypvt[-0].opval, yypvt[-2].opval); } break;
+#line 193 "perly.y"
+{ yyval.opval = Nullop; }
+break;
case 15:
-# line 163 "perly.y"
-{ yyval.opval = newLOGOP(OP_OR, 0, yypvt[-0].opval, yypvt[-2].opval); } break;
+#line 195 "perly.y"
+{ yyval.opval = yyvsp[0].opval; }
+break;
case 16:
-# line 165 "perly.y"
-{ yyval.opval = newLOOPOP(0, 1, scalar(yypvt[-0].opval), yypvt[-2].opval, Nullop); } break;
+#line 197 "perly.y"
+{ yyval.opval = newLOGOP(OP_AND, 0, yyvsp[0].opval, yyvsp[-2].opval); }
+break;
case 17:
-# line 167 "perly.y"
-{ yyval.opval = newLOOPOP(0, 1, invert(scalar(yypvt[-0].opval)), yypvt[-2].opval, Nullop);} break;
+#line 199 "perly.y"
+{ yyval.opval = newLOGOP(OP_OR, 0, yyvsp[0].opval, yyvsp[-2].opval); }
+break;
case 18:
-# line 171 "perly.y"
-{ yyval.opval = Nullop; } break;
+#line 201 "perly.y"
+{ yyval.opval = newLOOPOP(OPf_PARENS, 1, scalar(yyvsp[0].opval), yyvsp[-2].opval); }
+break;
case 19:
-# line 173 "perly.y"
-{ yyval.opval = scope(yypvt[-0].opval); } break;
+#line 203 "perly.y"
+{ yyval.opval = newLOOPOP(OPf_PARENS, 1, yyvsp[0].opval, yyvsp[-2].opval);}
+break;
case 20:
-# line 175 "perly.y"
-{ copline = yypvt[-5].ival;
- yyval.opval = newCONDOP(0, yypvt[-3].opval, scope(yypvt[-1].opval), yypvt[-0].opval); } break;
+#line 205 "perly.y"
+{ yyval.opval = newFOROP(0, Nullch, yyvsp[-1].ival,
+ Nullop, yyvsp[0].opval, yyvsp[-2].opval, Nullop); }
+break;
case 21:
-# line 180 "perly.y"
-{ copline = yypvt[-5].ival;
- yyval.opval = newCONDOP(0, yypvt[-3].opval, scope(yypvt[-1].opval), yypvt[-0].opval); } break;
+#line 211 "perly.y"
+{ yyval.opval = Nullop; }
+break;
case 22:
-# line 183 "perly.y"
-{ copline = yypvt[-5].ival;
- yyval.opval = newCONDOP(0,
- invert(scalar(yypvt[-3].opval)), scope(yypvt[-1].opval), yypvt[-0].opval); } break;
+#line 213 "perly.y"
+{ (yyvsp[0].opval)->op_flags |= OPf_PARENS; yyval.opval = scope(yyvsp[0].opval); }
+break;
case 23:
-# line 187 "perly.y"
-{ copline = yypvt[-3].ival;
- yyval.opval = newCONDOP(0, scope(yypvt[-2].opval), scope(yypvt[-1].opval), yypvt[-0].opval); } break;
+#line 215 "perly.y"
+{ PL_copline = yyvsp[-5].ival;
+ yyval.opval = newCONDOP(0, yyvsp[-3].opval, scope(yyvsp[-1].opval), yyvsp[0].opval);
+ PL_hints |= HINT_BLOCK_SCOPE; }
+break;
case 24:
-# line 190 "perly.y"
-{ copline = yypvt[-3].ival;
- yyval.opval = newCONDOP(0, invert(scalar(scope(yypvt[-2].opval))),
- scope(yypvt[-1].opval), yypvt[-0].opval); } break;
+#line 222 "perly.y"
+{ PL_copline = yyvsp[-6].ival;
+ yyval.opval = block_end(yyvsp[-4].ival,
+ newCONDOP(0, yyvsp[-3].opval, scope(yyvsp[-1].opval), yyvsp[0].opval)); }
+break;
case 25:
-# line 196 "perly.y"
-{ yyval.opval = Nullop; } break;
+#line 226 "perly.y"
+{ PL_copline = yyvsp[-6].ival;
+ yyval.opval = block_end(yyvsp[-4].ival,
+ newCONDOP(0, yyvsp[-3].opval, scope(yyvsp[-1].opval), yyvsp[0].opval)); }
+break;
case 26:
-# line 198 "perly.y"
-{ yyval.opval = scope(yypvt[-0].opval); } break;
+#line 233 "perly.y"
+{ yyval.opval = Nullop; }
+break;
case 27:
-# line 202 "perly.y"
-{ copline = yypvt[-5].ival;
- yyval.opval = newSTATEOP(0, yypvt[-6].pval,
- newWHILEOP(0, 1, Nullop, yypvt[-3].opval, yypvt[-1].opval, yypvt[-0].opval) ); } break;
+#line 235 "perly.y"
+{ yyval.opval = scope(yyvsp[0].opval); }
+break;
case 28:
-# line 206 "perly.y"
-{ copline = yypvt[-5].ival;
- yyval.opval = newSTATEOP(0, yypvt[-6].pval,
- newWHILEOP(0, 1, Nullop,
- invert(scalar(yypvt[-3].opval)), yypvt[-1].opval, yypvt[-0].opval) ); } break;
+#line 240 "perly.y"
+{ PL_copline = yyvsp[-6].ival;
+ yyval.opval = block_end(yyvsp[-4].ival,
+ newSTATEOP(0, yyvsp[-7].pval,
+ newWHILEOP(0, 1, (LOOP*)Nullop,
+ yyvsp[-6].ival, yyvsp[-3].opval, yyvsp[-1].opval, yyvsp[0].opval))); }
+break;
case 29:
-# line 211 "perly.y"
-{ copline = yypvt[-3].ival;
- yyval.opval = newSTATEOP(0, yypvt[-4].pval,
- newWHILEOP(0, 1, Nullop,
- scope(yypvt[-2].opval), yypvt[-1].opval, yypvt[-0].opval) ); } break;
+#line 246 "perly.y"
+{ PL_copline = yyvsp[-6].ival;
+ yyval.opval = block_end(yyvsp[-4].ival,
+ newSTATEOP(0, yyvsp[-7].pval,
+ newWHILEOP(0, 1, (LOOP*)Nullop,
+ yyvsp[-6].ival, yyvsp[-3].opval, yyvsp[-1].opval, yyvsp[0].opval))); }
+break;
case 30:
-# line 216 "perly.y"
-{ copline = yypvt[-3].ival;
- yyval.opval = newSTATEOP(0, yypvt[-4].pval,
- newWHILEOP(0, 1, Nullop,
- invert(scalar(scope(yypvt[-2].opval))), yypvt[-1].opval, yypvt[-0].opval)); } break;
+#line 252 "perly.y"
+{ yyval.opval = block_end(yyvsp[-6].ival,
+ newFOROP(0, yyvsp[-9].pval, yyvsp[-8].ival, yyvsp[-5].opval, yyvsp[-3].opval, yyvsp[-1].opval, yyvsp[0].opval)); }
+break;
case 31:
-# line 221 "perly.y"
-{ yyval.opval = newFOROP(0, yypvt[-7].pval, yypvt[-6].ival, ref(yypvt[-5].opval, OP_ENTERLOOP),
- yypvt[-3].opval, yypvt[-1].opval, yypvt[-0].opval); } break;
+#line 255 "perly.y"
+{ yyval.opval = block_end(yyvsp[-4].ival,
+ newFOROP(0, yyvsp[-8].pval, yyvsp[-7].ival, mod(yyvsp[-6].opval, OP_ENTERLOOP),
+ yyvsp[-3].opval, yyvsp[-1].opval, yyvsp[0].opval)); }
+break;
case 32:
-# line 224 "perly.y"
-{ yyval.opval = newFOROP(0, yypvt[-6].pval, yypvt[-5].ival, Nullop, yypvt[-3].opval, yypvt[-1].opval, yypvt[-0].opval); } break;
+#line 259 "perly.y"
+{ yyval.opval = block_end(yyvsp[-4].ival,
+ newFOROP(0, yyvsp[-7].pval, yyvsp[-6].ival, Nullop, yyvsp[-3].opval, yyvsp[-1].opval, yyvsp[0].opval)); }
+break;
case 33:
-# line 227 "perly.y"
-{ copline = yypvt[-8].ival;
- yyval.opval = append_elem(OP_LINESEQ,
- newSTATEOP(0, yypvt[-9].pval, scalar(yypvt[-6].opval)),
- newSTATEOP(0, yypvt[-9].pval,
- newWHILEOP(0, 1, Nullop,
- scalar(yypvt[-4].opval), yypvt[-0].opval, scalar(yypvt[-2].opval)) )); } break;
+#line 263 "perly.y"
+{ OP *forop;
+ PL_copline = yyvsp[-9].ival;
+ forop = newSTATEOP(0, yyvsp[-10].pval,
+ newWHILEOP(0, 1, (LOOP*)Nullop,
+ yyvsp[-9].ival, scalar(yyvsp[-4].opval),
+ yyvsp[0].opval, yyvsp[-2].opval));
+ if (yyvsp[-6].opval) {
+ forop = append_elem(OP_LINESEQ,
+ newSTATEOP(0, (yyvsp[-10].pval?savepv(yyvsp[-10].pval):Nullch),
+ yyvsp[-6].opval),
+ forop);
+ }
+
+ yyval.opval = block_end(yyvsp[-7].ival, forop); }
+break;
case 34:
-# line 234 "perly.y"
-{ yyval.opval = newSTATEOP(0,
- yypvt[-2].pval, newWHILEOP(0, 1, Nullop, Nullop, yypvt[-1].opval, yypvt[-0].opval)); } break;
+#line 278 "perly.y"
+{ yyval.opval = newSTATEOP(0, yyvsp[-2].pval,
+ newWHILEOP(0, 1, (LOOP*)Nullop,
+ NOLINE, Nullop, yyvsp[-1].opval, yyvsp[0].opval)); }
+break;
case 35:
-# line 239 "perly.y"
-{ yyval.opval = Nullop; } break;
+#line 285 "perly.y"
+{ yyval.opval = Nullop; }
+break;
case 37:
-# line 244 "perly.y"
-{ (void)scan_num("1"); yyval.opval = yylval.opval; } break;
+#line 291 "perly.y"
+{ (void)scan_num("1", &yylval); yyval.opval = yylval.opval; }
+break;
case 39:
-# line 249 "perly.y"
-{ yyval.pval = Nullch; } break;
+#line 297 "perly.y"
+{ yyval.opval = invert(scalar(yyvsp[0].opval)); }
+break;
+case 40:
+#line 302 "perly.y"
+{ yyval.opval = yyvsp[0].opval; intro_my(); }
+break;
case 41:
-# line 254 "perly.y"
-{ yyval.ival = 0; } break;
+#line 306 "perly.y"
+{ yyval.opval = yyvsp[0].opval; intro_my(); }
+break;
case 42:
-# line 256 "perly.y"
-{ yyval.ival = 0; } break;
+#line 310 "perly.y"
+{ yyval.opval = yyvsp[0].opval; intro_my(); }
+break;
case 43:
-# line 258 "perly.y"
-{ yyval.ival = 0; } break;
+#line 314 "perly.y"
+{ yyval.opval = yyvsp[0].opval; intro_my(); }
+break;
case 44:
-# line 262 "perly.y"
-{ newFORM(yypvt[-2].ival, yypvt[-1].opval, yypvt[-0].opval); } break;
-case 45:
-# line 264 "perly.y"
-{ newFORM(yypvt[-1].ival, Nullop, yypvt[-0].opval); } break;
+#line 319 "perly.y"
+{ yyval.pval = Nullch; }
+break;
case 46:
-# line 268 "perly.y"
-{ newSUB(yypvt[-2].ival, yypvt[-1].opval, yypvt[-0].opval); } break;
+#line 325 "perly.y"
+{ yyval.ival = 0; }
+break;
case 47:
-# line 272 "perly.y"
-{ package(yypvt[-1].opval); } break;
+#line 327 "perly.y"
+{ yyval.ival = 0; }
+break;
case 48:
-# line 276 "perly.y"
-{ yyval.opval = append_elem(OP_LIST, yypvt[-2].opval, yypvt[-0].opval); } break;
+#line 329 "perly.y"
+{ yyval.ival = 0; }
+break;
+case 49:
+#line 331 "perly.y"
+{ yyval.ival = 0; }
+break;
case 50:
-# line 281 "perly.y"
-{ yyval.opval = convert(yypvt[-2].ival, OPf_STACKED,
- prepend_elem(OP_LIST, newGVREF(yypvt[-1].opval), yypvt[-0].opval) ); } break;
+#line 333 "perly.y"
+{ yyval.ival = 0; }
+break;
case 51:
-# line 284 "perly.y"
-{ yyval.opval = convert(yypvt[-4].ival, OPf_STACKED,
- prepend_elem(OP_LIST, newGVREF(yypvt[-2].opval), yypvt[-1].opval) ); } break;
+#line 337 "perly.y"
+{ newFORM(yyvsp[-2].ival, yyvsp[-1].opval, yyvsp[0].opval); }
+break;
case 52:
-# line 287 "perly.y"
-{ yyval.opval = convert(yypvt[-1].ival, OPf_STACKED,
- prepend_elem(OP_LIST, newGVREF(yypvt[-3].opval), yypvt[-0].opval) ); } break;
+#line 340 "perly.y"
+{ yyval.opval = yyvsp[0].opval; }
+break;
case 53:
-# line 290 "perly.y"
-{ yyval.opval = convert(yypvt[-3].ival, OPf_STACKED,
- prepend_elem(OP_LIST, newGVREF(yypvt[-5].opval), yypvt[-1].opval) ); } break;
+#line 341 "perly.y"
+{ yyval.opval = Nullop; }
+break;
case 54:
-# line 293 "perly.y"
-{ yyval.opval = convert(OP_ENTERSUBR, OPf_STACKED|OPf_SPECIAL,
- prepend_elem(OP_LIST, newMETHOD(yypvt[-5].opval,yypvt[-3].opval), yypvt[-1].opval)); } break;
+#line 346 "perly.y"
+{ newMYSUB(yyvsp[-4].ival, yyvsp[-3].opval, yyvsp[-2].opval, yyvsp[-1].opval, yyvsp[0].opval); }
+break;
case 55:
-# line 296 "perly.y"
-{ yyval.opval = convert(OP_ENTERSUBR, OPf_STACKED|OPf_SPECIAL,
- prepend_elem(OP_LIST, newMETHOD(yypvt[-1].opval,yypvt[-2].opval), yypvt[-0].opval)); } break;
+#line 351 "perly.y"
+{ newATTRSUB(yyvsp[-4].ival, yyvsp[-3].opval, yyvsp[-2].opval, yyvsp[-1].opval, yyvsp[0].opval); }
+break;
case 56:
-# line 299 "perly.y"
-{ yyval.opval = convert(yypvt[-1].ival, 0, yypvt[-0].opval); } break;
+#line 355 "perly.y"
+{ yyval.ival = start_subparse(FALSE, 0); }
+break;
case 57:
-# line 301 "perly.y"
-{ yyval.opval = convert(yypvt[-3].ival, 0, yypvt[-1].opval); } break;
+#line 359 "perly.y"
+{ yyval.ival = start_subparse(FALSE, CVf_ANON); }
+break;
case 58:
-# line 305 "perly.y"
-{ yyval.opval = newASSIGNOP(OPf_STACKED, yypvt[-2].opval, yypvt[-0].opval); } break;
+#line 363 "perly.y"
+{ yyval.ival = start_subparse(TRUE, 0); }
+break;
case 59:
-# line 307 "perly.y"
-{ yyval.opval = newBINOP(yypvt[-2].ival, OPf_STACKED,
- ref(scalar(yypvt[-3].opval), yypvt[-2].ival), scalar(yypvt[-0].opval)); } break;
+#line 367 "perly.y"
+{ STRLEN n_a; char *name = SvPV(((SVOP*)yyvsp[0].opval)->op_sv,n_a);
+ if (strEQ(name, "BEGIN") || strEQ(name, "END")
+ || strEQ(name, "INIT") || strEQ(name, "CHECK"))
+ CvSPECIAL_on(PL_compcv);
+ yyval.opval = yyvsp[0].opval; }
+break;
case 60:
-# line 310 "perly.y"
-{ yyval.opval = newBINOP(yypvt[-2].ival, OPf_STACKED,
- ref(scalar(yypvt[-3].opval), yypvt[-2].ival), scalar(yypvt[-0].opval)); } break;
-case 61:
-# line 313 "perly.y"
-{ yyval.opval = newBINOP(yypvt[-2].ival, OPf_STACKED,
- ref(scalar(yypvt[-3].opval), yypvt[-2].ival), scalar(yypvt[-0].opval));} break;
+#line 376 "perly.y"
+{ yyval.opval = Nullop; }
+break;
case 62:
-# line 316 "perly.y"
-{ yyval.opval = newBINOP(yypvt[-2].ival, OPf_STACKED,
- ref(scalar(yypvt[-3].opval), yypvt[-2].ival), scalar(yypvt[-0].opval)); } break;
+#line 382 "perly.y"
+{ yyval.opval = Nullop; }
+break;
case 63:
-# line 319 "perly.y"
-{ yyval.opval = newBINOP(yypvt[-2].ival, OPf_STACKED,
- ref(scalar(yypvt[-3].opval), yypvt[-2].ival), scalar(yypvt[-0].opval)); } break;
+#line 384 "perly.y"
+{ yyval.opval = yyvsp[0].opval; }
+break;
case 64:
-# line 322 "perly.y"
-{ yyval.opval = newBINOP(yypvt[-2].ival, OPf_STACKED,
- ref(scalar(yypvt[-3].opval), yypvt[-2].ival), scalar(yypvt[-0].opval)); } break;
+#line 386 "perly.y"
+{ yyval.opval = Nullop; }
+break;
case 65:
-# line 325 "perly.y"
-{ yyval.opval = newLOGOP(OP_ANDASSIGN, 0,
- ref(scalar(yypvt[-3].opval), OP_ANDASSIGN),
- newUNOP(OP_SASSIGN, 0, scalar(yypvt[-0].opval))); } break;
+#line 391 "perly.y"
+{ yyval.opval = yyvsp[0].opval; }
+break;
case 66:
-# line 329 "perly.y"
-{ yyval.opval = newLOGOP(OP_ORASSIGN, 0,
- ref(scalar(yypvt[-3].opval), OP_ORASSIGN),
- newUNOP(OP_SASSIGN, 0, scalar(yypvt[-0].opval))); } break;
+#line 393 "perly.y"
+{ yyval.opval = Nullop; }
+break;
case 67:
-# line 335 "perly.y"
-{ yyval.opval = newBINOP(yypvt[-1].ival, 0, scalar(yypvt[-2].opval), scalar(yypvt[-0].opval)); } break;
+#line 397 "perly.y"
+{ yyval.opval = yyvsp[0].opval; }
+break;
case 68:
-# line 337 "perly.y"
-{ if (yypvt[-1].ival != OP_REPEAT)
- scalar(yypvt[-2].opval);
- yyval.opval = newBINOP(yypvt[-1].ival, 0, yypvt[-2].opval, scalar(yypvt[-0].opval)); } break;
+#line 398 "perly.y"
+{ yyval.opval = Nullop; PL_expect = XSTATE; }
+break;
case 69:
-# line 341 "perly.y"
-{ yyval.opval = newBINOP(yypvt[-1].ival, 0, scalar(yypvt[-2].opval), scalar(yypvt[-0].opval)); } break;
+#line 402 "perly.y"
+{ package(yyvsp[-1].opval); }
+break;
case 70:
-# line 343 "perly.y"
-{ yyval.opval = newBINOP(yypvt[-1].ival, 0, scalar(yypvt[-2].opval), scalar(yypvt[-0].opval)); } break;
+#line 404 "perly.y"
+{ package(Nullop); }
+break;
case 71:
-# line 345 "perly.y"
-{ yyval.opval = newBINOP(yypvt[-1].ival, 0, scalar(yypvt[-2].opval), scalar(yypvt[-0].opval)); } break;
+#line 408 "perly.y"
+{ CvSPECIAL_on(PL_compcv); /* It's a BEGIN {} */ }
+break;
case 72:
-# line 347 "perly.y"
-{ yyval.opval = newBINOP(yypvt[-1].ival, 0, scalar(yypvt[-2].opval), scalar(yypvt[-0].opval)); } break;
+#line 410 "perly.y"
+{ utilize(yyvsp[-6].ival, yyvsp[-5].ival, yyvsp[-3].opval, yyvsp[-2].opval, yyvsp[-1].opval); }
+break;
case 73:
-# line 349 "perly.y"
-{ yyval.opval = newBINOP(yypvt[-1].ival, 0, scalar(yypvt[-2].opval), scalar(yypvt[-0].opval)); } break;
+#line 415 "perly.y"
+{ yyval.opval = newLOGOP(OP_AND, 0, yyvsp[-2].opval, yyvsp[0].opval); }
+break;
case 74:
-# line 351 "perly.y"
-{ yyval.opval = newBINOP(yypvt[-1].ival, 0, scalar(yypvt[-2].opval), scalar(yypvt[-0].opval)); } break;
-case 75:
-# line 353 "perly.y"
-{ yyval.opval = newRANGE(yypvt[-1].ival, scalar(yypvt[-2].opval), scalar(yypvt[-0].opval));} break;
+#line 417 "perly.y"
+{ yyval.opval = newLOGOP(yyvsp[-1].ival, 0, yyvsp[-2].opval, yyvsp[0].opval); }
+break;
case 76:
-# line 355 "perly.y"
-{ yyval.opval = newLOGOP(OP_AND, 0, yypvt[-2].opval, yypvt[-0].opval); } break;
+#line 423 "perly.y"
+{ yyval.opval = yyvsp[-1].opval; }
+break;
case 77:
-# line 357 "perly.y"
-{ yyval.opval = newLOGOP(OP_OR, 0, yypvt[-2].opval, yypvt[-0].opval); } break;
-case 78:
-# line 359 "perly.y"
-{ yyval.opval = newCONDOP(0, yypvt[-4].opval, yypvt[-2].opval, yypvt[-0].opval); } break;
+#line 425 "perly.y"
+{ yyval.opval = append_elem(OP_LIST, yyvsp[-2].opval, yyvsp[0].opval); }
+break;
case 79:
-# line 361 "perly.y"
-{ yyval.opval = bind_match(yypvt[-1].ival, yypvt[-2].opval, yypvt[-0].opval); } break;
+#line 431 "perly.y"
+{ yyval.opval = convert(yyvsp[-2].ival, OPf_STACKED,
+ prepend_elem(OP_LIST, newGVREF(yyvsp[-2].ival,yyvsp[-1].opval), yyvsp[0].opval) ); }
+break;
case 80:
-# line 363 "perly.y"
-{ yyval.opval = yypvt[-0].opval; } break;
+#line 434 "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 81:
-# line 367 "perly.y"
-{ yyval.opval = newUNOP(OP_NEGATE, 0, scalar(yypvt[-0].opval)); } break;
+#line 437 "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 82:
-# line 369 "perly.y"
-{ yyval.opval = yypvt[-0].opval; } break;
+#line 442 "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 83:
-# line 371 "perly.y"
-{ yyval.opval = newUNOP(OP_NOT, 0, scalar(yypvt[-0].opval)); } break;
+#line 446 "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 84:
-# line 373 "perly.y"
-{ yyval.opval = newUNOP(OP_COMPLEMENT, 0, scalar(yypvt[-0].opval));} break;
+#line 451 "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 85:
-# line 375 "perly.y"
-{ yyval.opval = newUNOP(OP_REFGEN, 0, ref(yypvt[-0].opval, OP_REFGEN)); } break;
+#line 456 "perly.y"
+{ yyval.opval = convert(yyvsp[-1].ival, 0, yyvsp[0].opval); }
+break;
case 86:
-# line 377 "perly.y"
-{ yyval.opval = newUNOP(OP_POSTINC, 0,
- ref(scalar(yypvt[-1].opval), OP_POSTINC)); } break;
+#line 458 "perly.y"
+{ yyval.opval = convert(yyvsp[-3].ival, 0, yyvsp[-1].opval); }
+break;
case 87:
-# line 380 "perly.y"
-{ yyval.opval = newUNOP(OP_POSTDEC, 0,
- ref(scalar(yypvt[-1].opval), OP_POSTDEC)); } break;
+#line 460 "perly.y"
+{ yyvsp[0].opval = newANONATTRSUB(yyvsp[-1].ival, 0, Nullop, yyvsp[0].opval); }
+break;
case 88:
-# line 383 "perly.y"
-{ yyval.opval = newUNOP(OP_PREINC, 0,
- ref(scalar(yypvt[-0].opval), OP_PREINC)); } break;
-case 89:
-# line 386 "perly.y"
-{ yyval.opval = newUNOP(OP_PREDEC, 0,
- ref(scalar(yypvt[-0].opval), OP_PREDEC)); } break;
-case 90:
-# line 389 "perly.y"
-{ yyval.opval = localize(yypvt[-0].opval); } break;
+#line 462 "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 91:
-# line 391 "perly.y"
-{ yyval.opval = sawparens(yypvt[-1].opval); } break;
+#line 476 "perly.y"
+{ yyval.opval = newBINOP(OP_GELEM, 0, yyvsp[-4].opval, scalar(yyvsp[-2].opval)); }
+break;
case 92:
-# line 393 "perly.y"
-{ yyval.opval = newNULLLIST(); } break;
+#line 478 "perly.y"
+{ yyval.opval = newBINOP(OP_AELEM, 0, oopsAV(yyvsp[-3].opval), scalar(yyvsp[-1].opval)); }
+break;
case 93:
-# line 395 "perly.y"
-{ yyval.opval = newANONLIST(yypvt[-1].opval); } break;
+#line 480 "perly.y"
+{ yyval.opval = newBINOP(OP_AELEM, 0,
+ ref(newAVREF(yyvsp[-4].opval),OP_RV2AV),
+ scalar(yyvsp[-1].opval));}
+break;
case 94:
-# line 397 "perly.y"
-{ yyval.opval = newANONLIST(Nullop); } break;
+#line 484 "perly.y"
+{ yyval.opval = newBINOP(OP_AELEM, 0,
+ ref(newAVREF(yyvsp[-3].opval),OP_RV2AV),
+ scalar(yyvsp[-1].opval));}
+break;
case 95:
-# line 399 "perly.y"
-{ yyval.opval = newANONHASH(yypvt[-1].opval); } break;
+#line 488 "perly.y"
+{ yyval.opval = newBINOP(OP_HELEM, 0, oopsHV(yyvsp[-4].opval), jmaybe(yyvsp[-2].opval));
+ PL_expect = XOPERATOR; }
+break;
case 96:
-# line 401 "perly.y"
-{ yyval.opval = newANONHASH(Nullop); } break;
+#line 491 "perly.y"
+{ yyval.opval = newBINOP(OP_HELEM, 0,
+ ref(newHVREF(yyvsp[-5].opval),OP_RV2HV),
+ jmaybe(yyvsp[-2].opval));
+ PL_expect = XOPERATOR; }
+break;
case 97:
-# line 403 "perly.y"
-{ yyval.opval = yypvt[-0].opval; } break;
+#line 496 "perly.y"
+{ yyval.opval = newBINOP(OP_HELEM, 0,
+ ref(newHVREF(yyvsp[-4].opval),OP_RV2HV),
+ jmaybe(yyvsp[-2].opval));
+ PL_expect = XOPERATOR; }
+break;
case 98:
-# line 405 "perly.y"
-{ yyval.opval = yypvt[-0].opval; } break;
+#line 501 "perly.y"
+{ yyval.opval = newUNOP(OP_ENTERSUB, OPf_STACKED,
+ newCVREF(0, scalar(yyvsp[-3].opval))); }
+break;
case 99:
-# line 407 "perly.y"
-{ yyval.opval = newBINOP(OP_AELEM, 0, oopsAV(yypvt[-3].opval), scalar(yypvt[-1].opval)); } break;
+#line 504 "perly.y"
+{ yyval.opval = newUNOP(OP_ENTERSUB, OPf_STACKED,
+ append_elem(OP_LIST, yyvsp[-1].opval,
+ newCVREF(0, scalar(yyvsp[-4].opval)))); }
+break;
case 100:
-# line 409 "perly.y"
-{ yyval.opval = newBINOP(OP_AELEM, 0,
- scalar(ref(newAVREF(yypvt[-4].opval),OP_RV2AV)),
- scalar(yypvt[-1].opval));} break;
+#line 509 "perly.y"
+{ yyval.opval = newUNOP(OP_ENTERSUB, OPf_STACKED,
+ append_elem(OP_LIST, yyvsp[-1].opval,
+ newCVREF(0, scalar(yyvsp[-3].opval)))); }
+break;
case 101:
-# line 413 "perly.y"
-{ yyval.opval = yypvt[-0].opval; } break;
+#line 513 "perly.y"
+{ yyval.opval = newUNOP(OP_ENTERSUB, OPf_STACKED,
+ newCVREF(0, scalar(yyvsp[-2].opval))); }
+break;
case 102:
-# line 415 "perly.y"
-{ yyval.opval = yypvt[-0].opval; } break;
+#line 519 "perly.y"
+{ yyval.opval = newASSIGNOP(OPf_STACKED, yyvsp[-2].opval, yyvsp[-1].ival, yyvsp[0].opval); }
+break;
case 103:
-# line 417 "perly.y"
-{ yyval.opval = newUNOP(OP_AV2ARYLEN, 0, ref(yypvt[-0].opval, OP_AV2ARYLEN));} break;
+#line 521 "perly.y"
+{ yyval.opval = newBINOP(yyvsp[-1].ival, 0, scalar(yyvsp[-2].opval), scalar(yyvsp[0].opval)); }
+break;
case 104:
-# line 419 "perly.y"
-{ yyval.opval = newBINOP(OP_HELEM, 0, oopsHV(yypvt[-4].opval), jmaybe(yypvt[-2].opval));
- expect = XOPERATOR; } break;
+#line 523 "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 105:
-# line 422 "perly.y"
-{ yyval.opval = newBINOP(OP_HELEM, 0,
- scalar(ref(newHVREF(yypvt[-5].opval),OP_RV2HV)),
- jmaybe(yypvt[-2].opval));
- expect = XOPERATOR; } break;
+#line 527 "perly.y"
+{ yyval.opval = newBINOP(yyvsp[-1].ival, 0, scalar(yyvsp[-2].opval), scalar(yyvsp[0].opval)); }
+break;
case 106:
-# line 427 "perly.y"
-{ yyval.opval = newSLICEOP(0, yypvt[-1].opval, yypvt[-4].opval); } break;
+#line 529 "perly.y"
+{ yyval.opval = newBINOP(yyvsp[-1].ival, 0, scalar(yyvsp[-2].opval), scalar(yyvsp[0].opval)); }
+break;
case 107:
-# line 429 "perly.y"
-{ yyval.opval = newSLICEOP(0, yypvt[-1].opval, Nullop); } break;
+#line 531 "perly.y"
+{ yyval.opval = newBINOP(yyvsp[-1].ival, 0, scalar(yyvsp[-2].opval), scalar(yyvsp[0].opval)); }
+break;
case 108:
-# line 431 "perly.y"
-{ yyval.opval = prepend_elem(OP_ASLICE,
- newOP(OP_PUSHMARK, 0),
- list(
- newLISTOP(OP_ASLICE, 0,
- list(yypvt[-1].opval),
- ref(yypvt[-3].opval, OP_ASLICE)))); } break;
+#line 533 "perly.y"
+{ yyval.opval = newBINOP(yyvsp[-1].ival, 0, scalar(yyvsp[-2].opval), scalar(yyvsp[0].opval)); }
+break;
case 109:
-# line 438 "perly.y"
-{ yyval.opval = prepend_elem(OP_HSLICE,
- newOP(OP_PUSHMARK, 0),
- list(
- newLISTOP(OP_HSLICE, 0,
- list(yypvt[-2].opval),
- ref(oopsHV(yypvt[-4].opval), OP_HSLICE))));
- expect = XOPERATOR; } break;
+#line 535 "perly.y"
+{ yyval.opval = newBINOP(yyvsp[-1].ival, 0, scalar(yyvsp[-2].opval), scalar(yyvsp[0].opval)); }
+break;
case 110:
-# line 446 "perly.y"
-{ yyval.opval = newBINOP(OP_DELETE, 0, oopsHV(yypvt[-4].opval), jmaybe(yypvt[-2].opval));
- expect = XOPERATOR; } break;
+#line 537 "perly.y"
+{ yyval.opval = newBINOP(yyvsp[-1].ival, 0, scalar(yyvsp[-2].opval), scalar(yyvsp[0].opval)); }
+break;
case 111:
-# line 449 "perly.y"
-{ yyval.opval = newBINOP(OP_DELETE, 0, oopsHV(yypvt[-5].opval), jmaybe(yypvt[-3].opval));
- expect = XOPERATOR; } break;
+#line 539 "perly.y"
+{ yyval.opval = newRANGE(yyvsp[-1].ival, scalar(yyvsp[-2].opval), scalar(yyvsp[0].opval));}
+break;
case 112:
-# line 452 "perly.y"
-{ yyval.opval = yypvt[-0].opval; } break;
+#line 541 "perly.y"
+{ yyval.opval = newLOGOP(OP_AND, 0, yyvsp[-2].opval, yyvsp[0].opval); }
+break;
case 113:
-# line 454 "perly.y"
-{ yyval.opval = newUNOP(OP_ENTERSUBR, 0,
- scalar(yypvt[-0].opval)); } break;
+#line 543 "perly.y"
+{ yyval.opval = newLOGOP(OP_OR, 0, yyvsp[-2].opval, yyvsp[0].opval); }
+break;
case 114:
-# line 457 "perly.y"
-{ yyval.opval = newUNOP(OP_ENTERSUBR, OPf_STACKED, scalar(yypvt[-2].opval)); } break;
+#line 545 "perly.y"
+{ yyval.opval = bind_match(yyvsp[-1].ival, yyvsp[-2].opval, yyvsp[0].opval); }
+break;
case 115:
-# line 459 "perly.y"
-{ yyval.opval = newUNOP(OP_ENTERSUBR, OPf_STACKED,
- list(prepend_elem(OP_LIST, scalar(yypvt[-3].opval), yypvt[-1].opval))); } break;
+#line 550 "perly.y"
+{ yyval.opval = newUNOP(OP_NEGATE, 0, scalar(yyvsp[0].opval)); }
+break;
case 116:
-# line 462 "perly.y"
-{ yyval.opval = newUNOP(OP_DOFILE, 0, scalar(yypvt[-0].opval));
- allgvs = TRUE;} break;
+#line 552 "perly.y"
+{ yyval.opval = yyvsp[0].opval; }
+break;
case 117:
-# line 465 "perly.y"
-{ yyval.opval = newUNOP(OP_NULL, OPf_SPECIAL, scope(yypvt[-0].opval)); } break;
+#line 554 "perly.y"
+{ yyval.opval = newUNOP(OP_NOT, 0, scalar(yyvsp[0].opval)); }
+break;
case 118:
-# line 467 "perly.y"
-{ yyval.opval = newUNOP(OP_ENTERSUBR, OPf_SPECIAL|OPf_STACKED,
- list(prepend_elem(OP_LIST,
- scalar(newCVREF(scalar(yypvt[-2].opval))), newNULLLIST()))); } break;
+#line 556 "perly.y"
+{ yyval.opval = newUNOP(OP_COMPLEMENT, 0, scalar(yyvsp[0].opval));}
+break;
case 119:
-# line 471 "perly.y"
-{ yyval.opval = newUNOP(OP_ENTERSUBR, OPf_SPECIAL|OPf_STACKED,
- list(prepend_elem(OP_LIST,
- scalar(newCVREF(scalar(yypvt[-3].opval))),
- yypvt[-1].opval))); } break;
+#line 558 "perly.y"
+{ yyval.opval = newUNOP(OP_POSTINC, 0,
+ mod(scalar(yyvsp[-1].opval), OP_POSTINC)); }
+break;
case 120:
-# line 476 "perly.y"
-{ yyval.opval = newUNOP(OP_ENTERSUBR, OPf_SPECIAL|OPf_STACKED,
- list(prepend_elem(OP_LIST,
- scalar(newCVREF(scalar(yypvt[-2].opval))), newNULLLIST())));} break;
+#line 561 "perly.y"
+{ yyval.opval = newUNOP(OP_POSTDEC, 0,
+ mod(scalar(yyvsp[-1].opval), OP_POSTDEC)); }
+break;
case 121:
-# line 480 "perly.y"
-{ yyval.opval = newUNOP(OP_ENTERSUBR, OPf_SPECIAL|OPf_STACKED,
- list(prepend_elem(OP_LIST,
- scalar(newCVREF(scalar(yypvt[-3].opval))),
- yypvt[-1].opval))); } break;
+#line 564 "perly.y"
+{ yyval.opval = newUNOP(OP_PREINC, 0,
+ mod(scalar(yyvsp[0].opval), OP_PREINC)); }
+break;
case 122:
-# line 485 "perly.y"
-{ yyval.opval = newOP(yypvt[-0].ival, OPf_SPECIAL); } break;
+#line 567 "perly.y"
+{ yyval.opval = newUNOP(OP_PREDEC, 0,
+ mod(scalar(yyvsp[0].opval), OP_PREDEC)); }
+break;
case 123:
-# line 487 "perly.y"
-{ yyval.opval = newPVOP(yypvt[-1].ival, 0,
- savestr(SvPVnx(((SVOP*)yypvt[-0].opval)->op_sv)));
- op_free(yypvt[-0].opval); } break;
+#line 574 "perly.y"
+{ yyval.opval = newANONLIST(yyvsp[-1].opval); }
+break;
case 124:
-# line 491 "perly.y"
-{ yyval.opval = newOP(yypvt[-0].ival, 0); } break;
+#line 576 "perly.y"
+{ yyval.opval = newANONLIST(Nullop); }
+break;
case 125:
-# line 493 "perly.y"
-{ yyval.opval = newUNOP(yypvt[-1].ival, 0, yypvt[-0].opval); } break;
+#line 578 "perly.y"
+{ yyval.opval = newANONHASH(yyvsp[-2].opval); }
+break;
case 126:
-# line 495 "perly.y"
-{ yyval.opval = newUNOP(yypvt[-1].ival, 0, yypvt[-0].opval); } break;
+#line 580 "perly.y"
+{ yyval.opval = newANONHASH(Nullop); }
+break;
case 127:
-# line 497 "perly.y"
-{ yyval.opval = newOP(yypvt[-0].ival, 0); } break;
+#line 582 "perly.y"
+{ yyval.opval = newANONATTRSUB(yyvsp[-3].ival, yyvsp[-2].opval, yyvsp[-1].opval, yyvsp[0].opval); }
+break;
case 128:
-# line 499 "perly.y"
-{ yyval.opval = newOP(yypvt[-2].ival, 0); } break;
+#line 588 "perly.y"
+{ yyval.opval = dofile(yyvsp[0].opval); }
+break;
case 129:
-# line 501 "perly.y"
-{ yyval.opval = newOP(yypvt[-2].ival, OPf_SPECIAL); } break;
+#line 590 "perly.y"
+{ yyval.opval = newUNOP(OP_NULL, OPf_SPECIAL, scope(yyvsp[0].opval)); }
+break;
case 130:
-# line 503 "perly.y"
-{ yyval.opval = newUNOP(yypvt[-3].ival, 0, yypvt[-1].opval); } break;
+#line 592 "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 131:
-# line 505 "perly.y"
-{ yyval.opval = pmruntime(yypvt[-3].opval, yypvt[-1].opval, Nullop); } break;
+#line 600 "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 132:
-# line 507 "perly.y"
-{ yyval.opval = pmruntime(yypvt[-5].opval, yypvt[-3].opval, yypvt[-1].opval); } break;
-case 135:
-# line 513 "perly.y"
-{ yyval.opval = newNULLLIST(); } break;
-case 136:
-# line 515 "perly.y"
-{ yyval.opval = yypvt[-0].opval; } break;
-case 137:
-# line 519 "perly.y"
-{ yyval.opval = newCVREF(yypvt[-0].opval); } break;
+#line 609 "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 133:
+#line 613 "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 138:
-# line 523 "perly.y"
-{ yyval.opval = newSVREF(yypvt[-0].opval); } break;
+#line 625 "perly.y"
+{ yyval.opval = newCONDOP(0, yyvsp[-4].opval, yyvsp[-2].opval, yyvsp[0].opval); }
+break;
case 139:
-# line 527 "perly.y"
-{ yyval.opval = newAVREF(yypvt[-0].opval); } break;
+#line 627 "perly.y"
+{ yyval.opval = newUNOP(OP_REFGEN, 0, mod(yyvsp[0].opval,OP_REFGEN)); }
+break;
case 140:
-# line 531 "perly.y"
-{ yyval.opval = newHVREF(yypvt[-0].opval); } break;
+#line 629 "perly.y"
+{ yyval.opval = yyvsp[0].opval; }
+break;
case 141:
-# line 535 "perly.y"
-{ yyval.opval = newAVREF(yypvt[-0].opval); } break;
+#line 631 "perly.y"
+{ yyval.opval = localize(yyvsp[0].opval,yyvsp[-1].ival); }
+break;
case 142:
-# line 539 "perly.y"
-{ yyval.opval = newGVREF(yypvt[-0].opval); } break;
+#line 633 "perly.y"
+{ yyval.opval = sawparens(yyvsp[-1].opval); }
+break;
case 143:
-# line 543 "perly.y"
-{ yyval.opval = scalar(yypvt[-0].opval); } break;
+#line 635 "perly.y"
+{ yyval.opval = sawparens(newNULLLIST()); }
+break;
case 144:
-# line 545 "perly.y"
-{ yyval.opval = scalar(yypvt[-0].opval); } break;
+#line 637 "perly.y"
+{ yyval.opval = yyvsp[0].opval; }
+break;
case 145:
-# line 547 "perly.y"
-{ yyval.opval = scalar(scope(yypvt[-0].opval)); } break;
+#line 639 "perly.y"
+{ yyval.opval = yyvsp[0].opval; }
+break;
case 146:
-# line 552 "perly.y"
-{ yyval.ival = 1; } break;
+#line 641 "perly.y"
+{ yyval.opval = yyvsp[0].opval; }
+break;
case 147:
-# line 554 "perly.y"
-{ yyval.ival = 0; } break;
+#line 643 "perly.y"
+{ yyval.opval = yyvsp[0].opval; }
+break;
case 148:
-# line 558 "perly.y"
-{ yyval.ival = 1; } break;
+#line 645 "perly.y"
+{ yyval.opval = newUNOP(OP_AV2ARYLEN, 0, ref(yyvsp[0].opval, OP_AV2ARYLEN));}
+break;
case 149:
-# line 560 "perly.y"
-{ yyval.ival = 0; } break;
+#line 647 "perly.y"
+{ yyval.opval = yyvsp[0].opval; }
+break;
case 150:
-# line 564 "perly.y"
-{ yyval.ival = 1; } break;
+#line 649 "perly.y"
+{ yyval.opval = newSLICEOP(0, yyvsp[-1].opval, yyvsp[-4].opval); }
+break;
case 151:
-# line 566 "perly.y"
-{ yyval.ival = 0; } break;
- }
- goto yystack; /* reset registers in driver code */
+#line 651 "perly.y"
+{ yyval.opval = newSLICEOP(0, yyvsp[-1].opval, Nullop); }
+break;
+case 152:
+#line 653 "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 153:
+#line 659 "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 154:
+#line 666 "perly.y"
+{ yyval.opval = yyvsp[0].opval; }
+break;
+case 155:
+#line 668 "perly.y"
+{ yyval.opval = newUNOP(OP_ENTERSUB, 0, scalar(yyvsp[0].opval)); }
+break;
+case 156:
+#line 670 "perly.y"
+{ yyval.opval = newUNOP(OP_ENTERSUB, OPf_STACKED, scalar(yyvsp[-2].opval)); }
+break;
+case 157:
+#line 672 "perly.y"
+{ yyval.opval = newUNOP(OP_ENTERSUB, OPf_STACKED,
+ append_elem(OP_LIST, yyvsp[-1].opval, scalar(yyvsp[-3].opval))); }
+break;
+case 158:
+#line 675 "perly.y"
+{ yyval.opval = newUNOP(OP_ENTERSUB, OPf_STACKED,
+ append_elem(OP_LIST, yyvsp[0].opval, scalar(yyvsp[-1].opval))); }
+break;
+case 159:
+#line 678 "perly.y"
+{ yyval.opval = newOP(yyvsp[0].ival, OPf_SPECIAL);
+ PL_hints |= HINT_BLOCK_SCOPE; }
+break;
+case 160:
+#line 681 "perly.y"
+{ yyval.opval = newLOOPEX(yyvsp[-1].ival,yyvsp[0].opval); }
+break;
+case 161:
+#line 683 "perly.y"
+{ yyval.opval = newUNOP(OP_NOT, 0, scalar(yyvsp[0].opval)); }
+break;
+case 162:
+#line 685 "perly.y"
+{ yyval.opval = newOP(yyvsp[0].ival, 0); }
+break;
+case 163:
+#line 687 "perly.y"
+{ yyval.opval = newUNOP(yyvsp[-1].ival, 0, yyvsp[0].opval); }
+break;
+case 164:
+#line 689 "perly.y"
+{ yyval.opval = newUNOP(yyvsp[-1].ival, 0, yyvsp[0].opval); }
+break;
+case 165:
+#line 691 "perly.y"
+{ yyval.opval = newUNOP(OP_ENTERSUB, OPf_STACKED,
+ append_elem(OP_LIST, yyvsp[0].opval, scalar(yyvsp[-1].opval))); }
+break;
+case 166:
+#line 694 "perly.y"
+{ yyval.opval = newOP(yyvsp[0].ival, 0); }
+break;
+case 167:
+#line 696 "perly.y"
+{ yyval.opval = newOP(yyvsp[-2].ival, 0); }
+break;
+case 168:
+#line 698 "perly.y"
+{ yyval.opval = newUNOP(OP_ENTERSUB, OPf_STACKED,
+ scalar(yyvsp[0].opval)); }
+break;
+case 169:
+#line 701 "perly.y"
+{ yyval.opval = newOP(yyvsp[-2].ival, OPf_SPECIAL); }
+break;
+case 170:
+#line 703 "perly.y"
+{ yyval.opval = newUNOP(yyvsp[-3].ival, 0, yyvsp[-1].opval); }
+break;
+case 171:
+#line 705 "perly.y"
+{ yyval.opval = pmruntime(yyvsp[-3].opval, yyvsp[-1].opval, Nullop); }
+break;
+case 172:
+#line 707 "perly.y"
+{ yyval.opval = pmruntime(yyvsp[-5].opval, yyvsp[-3].opval, yyvsp[-1].opval); }
+break;
+case 175:
+#line 714 "perly.y"
+{ yyval.opval = my_attrs(yyvsp[-1].opval,yyvsp[0].opval); }
+break;
+case 176:
+#line 716 "perly.y"
+{ yyval.opval = localize(yyvsp[0].opval,yyvsp[-1].ival); }
+break;
+case 177:
+#line 721 "perly.y"
+{ yyval.opval = sawparens(yyvsp[-1].opval); }
+break;
+case 178:
+#line 723 "perly.y"
+{ yyval.opval = sawparens(newNULLLIST()); }
+break;
+case 179:
+#line 725 "perly.y"
+{ yyval.opval = yyvsp[0].opval; }
+break;
+case 180:
+#line 727 "perly.y"
+{ yyval.opval = yyvsp[0].opval; }
+break;
+case 181:
+#line 729 "perly.y"
+{ yyval.opval = yyvsp[0].opval; }
+break;
+case 182:
+#line 734 "perly.y"
+{ yyval.opval = Nullop; }
+break;
+case 183:
+#line 736 "perly.y"
+{ yyval.opval = yyvsp[0].opval; }
+break;
+case 184:
+#line 740 "perly.y"
+{ yyval.opval = Nullop; }
+break;
+case 185:
+#line 742 "perly.y"
+{ yyval.opval = yyvsp[0].opval; }
+break;
+case 186:
+#line 744 "perly.y"
+{ yyval.opval = yyvsp[-1].opval; }
+break;
+case 187:
+#line 750 "perly.y"
+{ PL_in_my = 0; yyval.opval = my(yyvsp[0].opval); }
+break;
+case 188:
+#line 754 "perly.y"
+{ yyval.opval = newCVREF(yyvsp[-1].ival,yyvsp[0].opval); }
+break;
+case 189:
+#line 758 "perly.y"
+{ yyval.opval = newSVREF(yyvsp[0].opval); }
+break;
+case 190:
+#line 762 "perly.y"
+{ yyval.opval = newAVREF(yyvsp[0].opval); }
+break;
+case 191:
+#line 766 "perly.y"
+{ yyval.opval = newHVREF(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 = newGVREF(0,yyvsp[0].opval); }
+break;
+case 194:
+#line 779 "perly.y"
+{ yyval.opval = scalar(yyvsp[0].opval); }
+break;
+case 195:
+#line 781 "perly.y"
+{ yyval.opval = scalar(yyvsp[0].opval); }
+break;
+case 196:
+#line 783 "perly.y"
+{ yyval.opval = scope(yyvsp[0].opval); }
+break;
+case 197:
+#line 786 "perly.y"
+{ yyval.opval = yyvsp[0].opval; }
+break;
+#line 2459 "perly.c"
+ }
+ yyssp -= yym;
+ yystate = *yyssp;
+ yyvsp -= yym;
+ yym = yylhs[yyn];
+ if (yystate == 0 && yym == 0)
+ {
+#if YYDEBUG
+ if (yydebug)
+ PerlIO_printf(Perl_debug_log, "yydebug: after reduction, shifting from state 0 to\
+ state %d\n", YYFINAL);
+#endif
+ yystate = YYFINAL;
+ *++yyssp = YYFINAL;
+ *++yyvsp = yyval;
+ if (yychar < 0)
+ {
+ if ((yychar = yylex()) < 0) yychar = 0;
+#if YYDEBUG
+ if (yydebug)
+ {
+ yys = 0;
+ if (yychar <= YYMAXTOKEN) yys = yyname[yychar];
+ if (!yys) yys = "illegal-symbol";
+ PerlIO_printf(Perl_debug_log, "yydebug: state %d, reading %d (%s)\n",
+ YYFINAL, yychar, yys);
+ }
+#endif
+ }
+ if (yychar == 0) goto yyaccept;
+ goto yyloop;
+ }
+ if ((yyn = yygindex[yym]) && (yyn += yystate) >= 0 &&
+ yyn <= YYTABLESIZE && yycheck[yyn] == yystate)
+ yystate = yytable[yyn];
+ else
+ yystate = yydgoto[yym];
+#if YYDEBUG
+ if (yydebug)
+ PerlIO_printf(Perl_debug_log, "yydebug: after reduction, shifting from state %d \
+to state %d\n", *yyssp, yystate);
+#endif
+ if (yyssp >= yyss + yystacksize - 1)
+ {
+ /*
+ ** reallocate and recover. Note that pointers
+ ** have to be reset, or bad things will happen
+ */
+ int yyps_index = (yyssp - yyss);
+ int yypv_index = (yyvsp - yyvs);
+ yystacksize += YYSTACKSIZE;
+ ysave->yyvs = Renew(yyvs, yystacksize, YYSTYPE);
+ ysave->yyss = Renew(yyss, yystacksize, short);
+ if (!yyvs || !yyss)
+ goto yyoverflow;
+ yyssp = yyss + yyps_index;
+ yyvsp = yyvs + yypv_index;
+ }
+ *++yyssp = yystate;
+ *++yyvsp = yyval;
+ goto yyloop;
+yyoverflow:
+ yyerror("Out of memory for yacc stack");
+yyabort:
+ retval = 1;
+yyaccept:
+#ifdef USE_ITHREADS
+ LEAVE; /* force yydestruct() before we return */
+#endif
+ return retval;
+}
+
+#ifdef PERL_OBJECT
+#include "XSUB.h"
+#endif
+
+static void
+yydestruct(pTHXo_ 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);
}
projects / p5sagit/p5-mst-13.2.git / blobdiff