diff options
| author | Dave Mitchell <davem@fdisolutions.com> | 2004-02-14 02:06:53 +0000 |
|---|---|---|
| committer | Dave Mitchell <davem@fdisolutions.com> | 2004-02-14 02:06:53 +0000 |
| commit | 0de566d74fdaf0a49123989fe8d4ad06603c6608 (patch) | |
| tree | a7e6f359c44eb372067a0f7567f1e4ef9953ae22 /vms | |
| parent | 21d1ba01f501963c6f61499860ffc70a78ab21c0 (diff) | |
| download | perl-0de566d74fdaf0a49123989fe8d4ad06603c6608.tar.gz | |
Switch from byacc to bison and simplify the perly.* regeneration
process
p4raw-id: //depot/perl@22302
Diffstat (limited to 'vms')
| -rw-r--r-- | vms/descrip_mms.template | 6 | ||||
| -rw-r--r-- | vms/perly_c.vms | 2658 | ||||
| -rw-r--r-- | vms/perly_h.vms | 78 | ||||
| -rw-r--r-- | vms/vms_yfix.pl | 70 |
4 files changed, 0 insertions, 2812 deletions
diff --git a/vms/descrip_mms.template b/vms/descrip_mms.template index 047e30a31c..63f9476ab2 100644 --- a/vms/descrip_mms.template +++ b/vms/descrip_mms.template @@ -1224,12 +1224,6 @@ regen_headers : $(INSTPERL) regcomp.pl $(INSTPERL) warnings.pl -# VMS uses modified perly.[ch] with tags for globaldefs if using DEC compiler -perly.c : [.vms]perly_c.vms - Copy/NoConfirm/Log $(MMS$SOURCE) $(MMS$TARGET) -perly.h : [.vms]perly_h.vms - Copy/NoConfirm/Log $(MMS$SOURCE) $(MMS$TARGET) - .ifdef LINK_ONLY .else perly$(O) : perly.c, perly.h, $(h) diff --git a/vms/perly_c.vms b/vms/perly_c.vms deleted file mode 100644 index 70a8583578..0000000000 --- a/vms/perly_c.vms +++ /dev/null @@ -1,2658 +0,0 @@ -/* Postprocessed by vms_yfix.pl 1.11 to add VMS declarations of globals */ -#ifndef lint -/* static char yysccsid[] = "@(#)yaccpar 1.8 (Berkeley) 01/20/91"; */ -#endif -#define YYBYACC 1 -#line 16 "perly.y" -#include "EXTERN.h" -#define PERL_IN_PERLY_C -#include "perl.h" -#ifdef EBCDIC -#undef YYDEBUG -#endif -#define dep() deprecate_old("\"do\" to call subroutines") - -/* stuff included here to make perly_c.diff apply better */ - -#define yydebug PL_yydebug -#define yynerrs PL_yynerrs -#define yyerrflag PL_yyerrflag -#define yychar PL_yychar -#define yyval PL_yyval -#define yylval PL_yylval - -struct ysv { - short* yyss; - YYSTYPE* yyvs; - int oldyydebug; - int oldyynerrs; - int oldyyerrflag; - int oldyychar; - YYSTYPE oldyyval; - YYSTYPE oldyylval; -}; - -static void yydestruct(pTHX_ void *ptr); - -#line 51 "perly.y" -#if 0 /* get this from perly.h instead */ -#line 54 "perly.y" -typedef union { - I32 ival; - char *pval; - OP *opval; - GV *gvval; -} YYSTYPE; -#line 62 "perly.y" -#endif /* 0 */ - -#ifdef USE_PURE_BISON -#define YYLEX_PARAM (&yychar) -#define yylex yylex_r -#endif - -#line 54 "perly.c" -#define YYERRCODE 256 -static short yylhs[] = { -1, - 0, 9, 7, 6, 10, 8, 11, 11, 11, 12, - 12, 12, 12, 25, 25, 25, 25, 25, 25, 25, - 15, 15, 15, 14, 14, 43, 43, 13, 13, 13, - 13, 13, 13, 13, 27, 27, 28, 28, 29, 30, - 31, 32, 33, 54, 54, 1, 1, 1, 1, 1, - 2, 39, 39, 47, 55, 3, 4, 5, 40, 41, - 41, 45, 45, 45, 46, 46, 42, 42, 56, 58, - 57, 16, 16, 16, 16, 26, 26, 26, 37, 37, - 37, 37, 37, 37, 37, 37, 59, 37, 38, 38, - 18, 18, 18, 18, 18, 18, 18, 18, 18, 18, - 18, 50, 50, 50, 50, 50, 50, 50, 50, 50, - 50, 50, 50, 50, 50, 51, 51, 51, 51, 51, - 51, 51, 51, 52, 52, 52, 52, 52, 53, 53, - 53, 53, 53, 53, 17, 17, 17, 17, 17, 17, - 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, - 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, - 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, - 17, 17, 17, 17, 17, 48, 48, 49, 49, 49, - 49, 49, 34, 34, 35, 35, 35, 44, 24, 19, - 20, 21, 22, 23, 36, 36, 36, 36, -}; -static short yylen[] = { 2, - 2, 4, 0, 0, 4, 0, 0, 2, 2, 2, - 1, 2, 3, 1, 1, 3, 3, 3, 3, 3, - 0, 2, 6, 7, 7, 0, 2, 8, 8, 10, - 9, 8, 11, 3, 0, 1, 0, 1, 1, 1, - 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, - 4, 1, 0, 6, 6, 0, 0, 0, 1, 0, - 1, 0, 2, 1, 2, 1, 1, 1, 3, 0, - 7, 3, 3, 3, 1, 2, 3, 1, 3, 5, - 6, 3, 3, 5, 2, 4, 0, 5, 1, 1, - 5, 4, 5, 4, 5, 6, 5, 4, 5, 4, - 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, - 3, 3, 3, 3, 3, 2, 2, 2, 2, 2, - 2, 2, 2, 3, 2, 4, 3, 5, 2, 2, - 4, 5, 4, 5, 1, 1, 1, 1, 5, 2, - 1, 2, 3, 2, 1, 1, 1, 1, 1, 1, - 6, 5, 4, 5, 1, 1, 3, 4, 3, 1, - 2, 2, 1, 2, 2, 2, 1, 3, 1, 3, - 4, 4, 6, 1, 1, 3, 2, 3, 2, 1, - 1, 1, 0, 1, 0, 1, 2, 1, 2, 2, - 2, 2, 2, 2, 1, 1, 1, 1, -}; -static short yydefred[] = { 4, - 0, 7, 0, 45, 58, 56, 0, 56, 56, 8, - 46, 9, 11, 48, 0, 47, 49, 50, 0, 0, - 0, 70, 0, 14, 3, 174, 0, 0, 155, 0, - 169, 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, 147, 149, 0, 0, 0, 0, - 175, 141, 135, 136, 137, 138, 52, 0, 59, 0, - 69, 0, 0, 7, 195, 198, 197, 196, 0, 0, - 0, 0, 0, 0, 3, 3, 3, 3, 3, 3, - 0, 0, 0, 0, 0, 164, 0, 0, 0, 0, - 85, 0, 193, 0, 130, 0, 0, 0, 0, 0, - 0, 0, 180, 182, 181, 0, 189, 0, 0, 0, - 0, 0, 0, 0, 0, 125, 0, 0, 0, 190, - 191, 192, 194, 0, 34, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 120, 121, - 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, 3, - 168, 170, 0, 0, 0, 0, 0, 0, 0, 127, - 0, 159, 179, 0, 0, 176, 0, 0, 124, 27, - 0, 0, 19, 0, 0, 0, 0, 0, 72, 0, - 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, 157, - 0, 0, 0, 0, 0, 0, 2, 0, 0, 172, - 0, 0, 0, 42, 0, 43, 0, 0, 0, 0, - 188, 0, 0, 36, 41, 0, 0, 0, 171, 187, - 86, 0, 131, 0, 133, 0, 126, 178, 65, 0, - 0, 0, 0, 98, 0, 0, 0, 0, 100, 94, - 0, 92, 0, 153, 0, 158, 63, 68, 67, 55, - 0, 54, 84, 0, 88, 128, 0, 0, 0, 0, - 0, 0, 0, 0, 80, 132, 134, 152, 0, 0, - 0, 99, 93, 0, 97, 95, 154, 91, 71, 173, - 6, 0, 0, 0, 0, 0, 0, 0, 0, 151, - 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, 103, 19, 2, 94, 373, 97, 362, - 3, 12, 13, 69, 378, 288, 71, 72, 73, 74, - 75, 76, 77, 78, 294, 80, 295, 284, 286, 289, - 297, 285, 287, 121, 215, 99, 81, 260, 88, 90, - 195, 330, 155, 292, 274, 226, 14, 82, 136, 83, - 84, 85, 86, 15, 16, 17, 18, 92, 281, -}; -static short yysindex[] = { 0, - 0, 0, -236, 0, 0, 0, -231, 0, 0, 0, - 0, 0, 0, 0, 819, 0, 0, 0, -211, -209, - 3, 0, -209, 0, 0, 0, -32, -32, 0, 23, - 0, 2213, 0, 0, 28, 30, 32, 33, -18, 2213, - 42, 52, 64, 1004, 940, -32, 1149, 1268, -168, 2213, - 174, -32, 2213, 2213, 2213, 2213, 2213, 2213, 1328, 1413, - 0, 2213, 2213, -32, -32, -32, -32, -173, 0, 607, - 404, -27, -71, -67, 0, 0, -12, 68, 66, 94, - 0, 0, 0, 0, 0, 0, 0, 27, 0, -108, - 0, -100, -108, 0, 0, 0, 0, 0, 2213, 122, - 2213, 743, 27, -108, 0, 0, 0, 0, 0, 0, - 125, 404, 135, 1454, 940, 0, 743, 0, -71, 94, - 0, 2213, 0, 140, 0, 743, -25, 38, -8, 2213, - 743, 1562, 0, 0, 0, -114, 0, 94, 245, 245, - 245, -123, -123, 106, -34, 0, -53, 245, 245, 0, - 0, 0, 0, 27, 0, 2213, 2213, 2213, 2213, 2213, - 2213, 2213, 2213, 2213, 2213, 2213, 2213, 2213, 2213, 2213, - 2213, 2213, 2213, 2213, 2213, 2213, 2213, 2213, 0, 0, - -26, 2213, 1723, 2213, 2213, 2213, 2213, 2213, 2213, 1796, - 0, 2213, 0, 0, -90, -48, -90, 285, 0, 2213, - -35, 0, -90, 2213, 2213, 2213, 2213, 182, 1859, 0, - 0, 0, -2, -42, 180, 2213, 94, 1932, 2004, 0, - 102, 0, 0, 13, -21, 0, 2213, 142, 0, 0, - 184, 184, 0, 184, 184, 184, -51, -51, 0, 296, - 743, 386, 683, -158, 404, 643, 1034, 1034, 1067, 1345, - 960, -112, 245, 245, 2213, 0, 2140, 2213, 0, 216, - 120, 0, 40, 127, 123, 214, 132, 217, 136, 0, - 77, 404, -3, -47, 2213, -47, 0, 220, 2213, 0, - 2213, 27, 184, 0, 224, 0, 240, 184, 244, 246, - 0, 261, 607, 0, 0, 267, 227, 2213, 0, 0, - 0, 88, 0, 95, 0, 98, 0, 0, 0, 236, - 2213, 2213, 139, 0, 117, 239, 2213, 194, 0, 0, - 206, 0, 213, 0, 218, 0, 0, 0, 0, 0, - 293, 0, 0, 585, 0, 0, 221, 221, 221, 221, - 2213, 221, 2213, 325, 0, 0, 0, 0, 243, 703, - 255, 0, 0, 327, 0, 0, 0, 0, 0, 0, - 0, -173, -173, -240, -240, 351, -173, 332, 221, 0, - 0, 0, 0, 0, 0, 221, 354, 0, 0, 221, - 0, 1859, -173, 350, 0, 2213, -173, 360, 0, 0, - 361, 0, 221, 221, 0, -240, 0, -}; -static short yyrindex[] = { 0, - 0, 0, 371, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 289, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 16, - 2282, 0, 0, 2401, 2566, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 90, 0, -16, - 1607, 2620, 2673, 2721, 0, 0, 2769, 2856, 0, -38, - 0, 0, 0, 0, 0, 0, 0, 0, 0, -54, - 0, 0, -54, 0, 0, 0, 0, 0, 2566, 0, - 0, 4274, 0, -115, 0, 0, 0, 0, 0, 0, - 0, 1886, 0, 0, 374, 0, 4339, 467, 532, 3224, - 0, 0, 0, 3005, 0, 4394, 2673, 0, 0, 2566, - 4404, 0, 0, 0, 0, 3055, 0, 3459, 3695, 3746, - 3801, 3582, 3630, 3127, 0, 0, 0, 3866, 3914, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 3175, 0, 0, -43, 0, -43, 880, 0, 374, - 0, 0, 303, 390, 0, 0, 0, 0, 389, 0, - 0, 0, 0, 422, 0, 0, 3510, 0, 0, 0, - 0, 0, 0, 0, 3291, 0, 0, 3346, 0, 0, - 8, 12, 0, 61, 62, 65, 1479, 1642, 0, 2274, - 4445, 4493, 4120, 4168, 2421, 0, 4697, 4745, 4630, 4591, - 4543, 4219, 4000, 4055, 0, 0, 0, 0, 0, 3411, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 2474, -30, 0, 405, 0, 0, 0, 0, 0, - 2566, 0, 78, 0, 0, 0, 0, 432, 0, 0, - 0, 0, 81, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 374, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 415, 0, 0, 0, 0, 0, 0, 1201, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 90, 90, 186, 186, 0, 90, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 435, 90, 880, 0, 0, 90, 0, 0, 0, - 0, 0, 0, 0, 0, 186, 0, -}; -static short yygindex[] = { 0, - 0, 0, 50, 453, 0, 0, -22, 0, 63, 153, - -93, 0, 0, 0, -346, -15, 2480, 0, 1744, 437, - 439, 0, 0, 0, 481, 755, 0, 0, 341, -186, - 124, 170, 313, -88, -183, 49, 0, 0, 0, 498, - -66, 247, 225, 0, -156, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, -}; -#define YYTABLESIZE 5051 -static short yytable[] = { 70, - 198, 300, 75, 64, 60, 280, 228, 60, 279, 64, - 199, 328, 183, 257, 219, 62, 278, 64, 379, 186, - 75, 110, 296, 188, 15, 21, 197, 170, 64, 4, - 5, 6, 129, 7, 8, 376, 377, 203, 299, 229, - 276, 222, 15, 145, 147, 87, 282, 89, 18, 397, - 221, 185, 39, 308, 75, 187, 160, 22, 23, 160, - 9, 91, 101, 184, 258, 186, 18, 105, 60, 106, - 39, 107, 108, 160, 160, 25, 100, 68, 160, 62, - 319, 113, 204, 205, 206, 207, 208, 209, 130, 26, - 25, 114, 64, 122, 123, 182, 255, 185, 213, 214, - 137, 16, 17, 115, 154, 20, 116, 190, 160, 125, - 189, 344, 150, 151, 152, 153, 224, 326, 38, 16, - 17, 40, 26, 20, 191, 26, 26, 26, 345, 26, - 167, 26, 26, 354, 26, 346, 38, 192, 347, 15, - 231, 232, 234, 235, 236, 237, 238, 239, 26, 25, - 193, 194, 177, 26, 366, 178, 196, 352, 179, 180, - 181, 200, 220, 216, 210, 202, 261, 263, 264, 265, - 266, 267, 268, 269, 271, 211, 167, 168, 318, 218, - 26, 321, 60, 225, 214, 21, 331, 298, 283, 232, - 323, 232, 335, 293, 325, 181, 227, 351, 177, 391, - 302, 178, 304, 306, 179, 180, 181, 273, 275, 64, - 66, 310, 26, 132, 26, 26, 230, 64, 21, 320, - 301, 21, 21, 21, 95, 21, 307, 21, 21, 96, - 21, 256, 311, 75, 75, 75, 75, 65, 309, 313, - 75, 315, 316, 60, 21, 164, 161, 162, 163, 21, - 163, 165, 166, 167, 168, 317, 327, 161, 162, 163, - 333, 75, 75, 75, 337, 161, 162, 163, 169, 171, - 172, 173, 174, 175, 176, 177, 21, 109, 178, 384, - 338, 179, 180, 181, 339, 343, 340, 160, 160, 160, - 160, 161, 162, 163, 160, 349, 160, 161, 162, 163, - 341, 214, 160, 160, 160, 160, 322, 342, 21, 324, - 21, 21, 161, 162, 163, 160, 160, 160, 355, 160, - 160, 160, 160, 160, 160, 160, 160, 283, 348, 160, - 356, 353, 160, 160, 160, 370, 329, 357, 329, 161, - 162, 163, 358, 361, 336, 26, 26, 26, 26, 26, - 26, 359, 26, 26, 26, 26, 26, 26, 26, 26, - 26, 26, 26, 26, 26, 369, 70, 372, 26, 26, - 1, 26, 26, 26, 26, 26, 161, 162, 163, 371, - 26, 26, 26, 26, 26, 26, 26, 161, 162, 163, - 382, 380, 26, 386, 161, 162, 163, 161, 162, 163, - 393, 394, 26, 44, 26, 26, 44, 44, 44, 277, - 44, 53, 44, 44, 185, 44, 161, 162, 163, 161, - 162, 163, 161, 162, 163, 62, 161, 162, 163, 44, - 37, 161, 162, 163, 44, 161, 162, 163, 161, 162, - 163, 21, 21, 21, 21, 21, 21, 35, 21, 21, - 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, - 21, 44, 186, 183, 21, 21, 170, 21, 21, 21, - 21, 21, 40, 37, 390, 35, 21, 21, 21, 21, - 21, 21, 21, 161, 162, 163, 104, 134, 21, 135, - 363, 364, 365, 44, 367, 79, 44, 233, 21, 195, - 21, 21, 195, 195, 195, 388, 195, 174, 195, 195, - 174, 195, 368, 161, 162, 163, 161, 162, 163, 290, - 93, 383, 332, 0, 174, 174, 0, 0, 385, 174, - 195, 0, 387, 0, 0, 161, 162, 163, 161, 162, - 163, 0, 161, 162, 163, 395, 396, 0, 0, 0, - 4, 5, 6, 0, 7, 8, 0, 195, 178, 174, - 0, 179, 180, 181, 196, 0, 0, 196, 196, 196, - 0, 196, 145, 196, 196, 145, 196, 0, 0, 0, - 0, 9, 165, 166, 167, 168, 374, 375, 0, 145, - 145, 381, 195, 0, 145, 196, 0, 0, 0, 0, - 171, 172, 173, 174, 175, 176, 177, 389, 0, 178, - 0, 392, 179, 180, 181, 4, 5, 6, 0, 7, - 8, 0, 0, 0, 145, 360, 44, 44, 44, 44, - 44, 44, 0, 44, 44, 44, 0, 0, 0, 44, - 0, 0, 44, 44, 44, 44, 9, 170, 0, 44, - 44, 0, 44, 44, 44, 44, 44, 196, 0, 0, - 0, 44, 44, 44, 44, 44, 44, 0, 0, 0, - 0, 0, 165, 44, 167, 168, 0, 0, 0, 0, - 0, 0, 0, 44, 164, 44, 44, 0, 0, 0, - 165, 166, 167, 168, 0, 176, 177, 0, 0, 178, - 312, 0, 179, 180, 181, 170, 0, 169, 171, 172, - 173, 174, 175, 176, 177, 0, 0, 178, 0, 0, - 179, 180, 181, 195, 195, 195, 195, 195, 0, 195, - 195, 195, 0, 0, 0, 195, 0, 0, 174, 174, - 174, 174, 0, 0, 0, 174, 195, 174, 195, 195, - 195, 195, 195, 174, 174, 174, 174, 195, 195, 195, - 195, 195, 195, 0, 0, 170, 174, 174, 174, 195, - 174, 174, 174, 174, 174, 174, 174, 174, 0, 195, - 174, 195, 195, 174, 174, 174, 0, 0, 196, 196, - 196, 196, 196, 0, 196, 196, 196, 0, 0, 120, - 196, 0, 0, 145, 145, 145, 145, 138, 0, 0, - 145, 196, 145, 196, 196, 196, 196, 196, 145, 145, - 145, 145, 196, 196, 196, 196, 196, 196, 0, 0, - 0, 145, 145, 145, 196, 145, 145, 145, 145, 145, - 145, 145, 145, 0, 196, 145, 196, 196, 145, 145, - 145, 54, 0, 120, 64, 66, 52, 0, 59, 0, - 67, 63, 0, 62, 0, 164, 0, 0, 0, 0, - 0, 165, 166, 167, 168, 0, 217, 61, 156, 157, - 158, 159, 65, 0, 120, 160, 0, 0, 169, 171, - 172, 173, 174, 175, 176, 177, 0, 0, 178, 0, - 0, 179, 180, 181, 0, 0, 161, 162, 163, 60, - 0, 0, 44, 0, 0, 44, 44, 44, 0, 44, - 0, 44, 44, 164, 44, 0, 0, 0, 0, 165, - 166, 167, 168, 0, 0, 0, 0, 0, 44, 0, - 0, 25, 0, 44, 55, 0, 169, 171, 172, 173, - 174, 175, 176, 177, 0, 0, 178, 0, 0, 179, - 180, 181, 0, 0, 0, 0, 0, 0, 0, 0, - 44, 0, 54, 0, 0, 64, 66, 52, 0, 59, - 0, 67, 63, 164, 62, 0, 0, 0, 0, 165, - 166, 167, 168, 177, 0, 0, 178, 0, 0, 179, - 180, 181, 44, 65, 0, 44, 0, 171, 172, 173, - 174, 175, 176, 177, 0, 0, 178, 0, 0, 179, - 180, 181, 0, 0, 0, 0, 0, 0, 0, 120, - 60, 167, 168, 0, 0, 120, 54, 0, 0, 64, - 66, 52, 0, 59, 0, 67, 63, 0, 62, 0, - 0, 0, 176, 177, 0, 0, 178, 0, 0, 179, - 180, 181, 25, 0, 0, 55, 0, 65, 0, 0, - 0, 0, 0, 0, 24, 26, 27, 28, 29, 30, - 0, 31, 32, 33, 0, 0, 0, 34, 0, 0, - 35, 36, 37, 38, 60, 0, 0, 39, 40, 0, - 41, 42, 43, 44, 45, 0, 0, 0, 0, 46, - 47, 48, 49, 50, 51, 0, 0, 0, 0, 0, - 0, 53, 0, 0, 0, 0, 25, 0, 0, 55, - 0, 56, 0, 57, 58, 44, 44, 44, 44, 44, - 44, 0, 44, 44, 44, 0, 0, 0, 44, 0, - 0, 44, 44, 44, 44, 0, 0, 0, 44, 44, - 0, 44, 44, 44, 44, 44, 0, 0, 0, 0, - 44, 44, 44, 44, 44, 44, 0, 0, 0, 0, - 0, 54, 44, 0, 64, 66, 52, 0, 59, 0, - 67, 63, 44, 62, 44, 44, 118, 27, 28, 29, - 30, 96, 31, 32, 33, 0, 0, 0, 34, 0, - 0, 0, 65, 0, 0, 0, 0, 0, 0, 40, - 0, 41, 42, 43, 44, 45, 0, 0, 0, 0, - 46, 47, 48, 49, 50, 51, 0, 0, 0, 60, - 0, 139, 53, 0, 139, 0, 165, 166, 167, 168, - 0, 0, 56, 0, 57, 58, 0, 0, 139, 139, - 26, 27, 28, 29, 30, 0, 31, 32, 33, 176, - 177, 25, 34, 178, 55, 0, 179, 180, 181, 0, - 0, 0, 0, 40, 0, 41, 42, 43, 44, 45, - 0, 0, 0, 139, 46, 47, 48, 49, 50, 51, - 54, 0, 0, 64, 66, 52, 53, 59, 0, 67, - 63, 0, 62, 0, 0, 0, 56, 0, 57, 58, - 165, 166, 167, 168, 0, 0, 128, 0, 0, 0, - 0, 65, 0, 0, 0, 0, 0, 0, 0, 0, - 173, 174, 175, 176, 177, 0, 0, 178, 0, 0, - 179, 180, 181, 165, 166, 167, 168, 0, 60, 0, - 54, 0, 0, 64, 66, 52, 0, 59, 144, 67, - 63, 0, 62, 0, 174, 175, 176, 177, 0, 0, - 178, 0, 0, 179, 180, 181, 0, 0, 0, 0, - 0, 65, 0, 55, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 124, 27, 28, 29, 30, - 0, 31, 32, 33, 0, 0, 0, 34, 60, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 40, 0, - 41, 42, 43, 44, 45, 0, 0, 0, 0, 46, - 47, 48, 49, 50, 51, 54, 0, 0, 64, 66, - 52, 53, 59, 55, 67, 63, 0, 62, 0, 0, - 0, 56, 0, 57, 58, 0, 0, 0, 0, 0, - 0, 0, 139, 139, 139, 139, 65, 0, 0, 139, - 0, 0, 0, 0, 0, 0, 54, 0, 0, 64, - 66, 52, 0, 59, 212, 67, 63, 0, 62, 0, - 139, 139, 139, 60, 139, 146, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 65, 0, 73, - 0, 0, 73, 0, 26, 27, 28, 29, 30, 0, - 31, 32, 33, 0, 0, 0, 34, 73, 55, 0, - 0, 0, 0, 0, 60, 0, 0, 40, 0, 41, - 42, 43, 44, 45, 0, 0, 0, 0, 46, 47, - 48, 49, 50, 51, 0, 0, 0, 0, 0, 0, - 53, 73, 0, 0, 0, 0, 0, 0, 0, 55, - 56, 0, 57, 58, 26, 27, 28, 29, 30, 0, - 31, 32, 33, 0, 54, 0, 34, 64, 66, 52, - 0, 59, 223, 67, 63, 0, 62, 40, 0, 41, - 42, 43, 44, 45, 0, 0, 0, 0, 46, 47, - 48, 49, 50, 51, 0, 65, 0, 0, 0, 0, - 53, 165, 166, 167, 168, 0, 0, 0, 0, 0, - 56, 0, 57, 58, 0, 0, 0, 78, 0, 0, - 78, 0, 60, 175, 176, 177, 0, 0, 178, 0, - 0, 179, 180, 181, 78, 78, 0, 0, 0, 26, - 27, 28, 29, 30, 0, 31, 32, 33, 0, 0, - 0, 34, 74, 0, 0, 74, 0, 55, 0, 0, - 0, 0, 40, 0, 41, 42, 43, 44, 45, 78, - 74, 0, 0, 46, 47, 48, 49, 50, 51, 0, - 26, 27, 28, 29, 30, 53, 31, 32, 33, 0, - 0, 0, 34, 0, 0, 56, 0, 57, 58, 0, - 0, 0, 0, 40, 74, 41, 42, 43, 44, 45, - 0, 0, 0, 0, 46, 47, 48, 49, 50, 51, - 73, 73, 73, 73, 0, 54, 53, 73, 64, 66, - 52, 0, 59, 262, 67, 63, 56, 62, 57, 58, - 98, 98, 0, 0, 0, 0, 0, 0, 73, 73, - 0, 0, 111, 0, 0, 0, 65, 0, 119, 98, - 127, 0, 0, 0, 133, 98, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 98, 98, 98, - 98, 0, 0, 60, 0, 0, 0, 0, 26, 27, - 28, 29, 30, 0, 31, 32, 33, 0, 54, 0, - 34, 64, 66, 52, 0, 59, 270, 67, 63, 0, - 62, 40, 0, 41, 42, 43, 44, 45, 55, 0, - 0, 0, 46, 47, 48, 49, 50, 51, 119, 65, - 0, 0, 0, 0, 53, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 56, 0, 57, 58, 78, 78, - 78, 78, 0, 0, 0, 78, 60, 0, 0, 0, - 0, 54, 0, 0, 64, 66, 52, 0, 59, 0, - 67, 63, 0, 62, 0, 0, 78, 78, 78, 0, - 0, 0, 0, 74, 74, 74, 74, 0, 0, 0, - 74, 55, 65, 0, 259, 0, 161, 0, 0, 161, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 74, 74, 161, 161, 0, 0, 0, 0, 60, - 0, 291, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 54, 0, 0, 64, 66, 52, - 0, 59, 303, 67, 63, 0, 62, 0, 161, 26, - 27, 28, 29, 30, 55, 31, 32, 33, 0, 0, - 0, 34, 0, 0, 0, 65, 0, 0, 0, 0, - 0, 0, 40, 0, 41, 42, 43, 44, 45, 0, - 0, 0, 0, 46, 47, 48, 49, 50, 51, 0, - 0, 0, 60, 0, 0, 53, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 56, 54, 57, 58, 64, - 66, 52, 0, 59, 305, 67, 63, 0, 62, 0, - 0, 0, 26, 27, 28, 29, 30, 55, 31, 32, - 33, 0, 0, 0, 34, 0, 0, 65, 0, 0, - 0, 0, 0, 0, 0, 40, 0, 41, 42, 43, - 44, 45, 0, 0, 0, 0, 46, 47, 48, 49, - 50, 51, 0, 0, 60, 0, 0, 0, 53, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 56, 0, - 57, 58, 0, 0, 24, 26, 27, 28, 29, 30, - 0, 31, 32, 33, 0, 0, 0, 34, 0, 55, - 0, 0, 0, 0, 0, 0, 0, 0, 40, 0, - 41, 42, 43, 44, 45, 0, 0, 0, 0, 46, - 47, 48, 49, 50, 51, 0, 0, 161, 161, 161, - 161, 53, 0, 0, 161, 0, 0, 0, 0, 0, - 0, 56, 54, 57, 58, 64, 66, 52, 0, 59, - 314, 67, 63, 0, 62, 161, 161, 161, 26, 27, - 28, 29, 30, 0, 31, 32, 33, 0, 0, 0, - 34, 0, 0, 65, 0, 0, 0, 0, 0, 0, - 0, 40, 0, 41, 42, 43, 44, 45, 0, 0, - 0, 0, 46, 47, 48, 49, 50, 51, 0, 0, - 60, 0, 0, 0, 53, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 56, 54, 57, 58, 64, 66, - 52, 0, 59, 0, 67, 63, 0, 62, 0, 0, - 26, 27, 28, 29, 30, 55, 31, 32, 33, 0, - 0, 0, 34, 0, 0, 0, 65, 0, 0, 0, - 0, 0, 0, 40, 0, 41, 42, 43, 44, 45, - 0, 0, 0, 0, 46, 47, 48, 49, 50, 51, - 0, 0, 0, 60, 0, 0, 53, 0, 0, 0, - 0, 0, 0, 0, 111, 0, 56, 111, 57, 58, - 0, 0, 167, 0, 0, 167, 0, 0, 0, 0, - 0, 111, 111, 0, 0, 0, 111, 0, 55, 167, - 167, 0, 0, 0, 167, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 111, 0, 0, 0, - 0, 0, 0, 0, 167, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 26, 27, 28, 29, - 30, 0, 31, 32, 33, 0, 0, 0, 34, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 40, - 0, 41, 42, 43, 44, 45, 0, 0, 0, 0, - 46, 47, 48, 49, 50, 51, 0, 0, 0, 0, - 0, 163, 53, 0, 163, 0, 0, 0, 0, 0, - 0, 0, 56, 0, 57, 58, 0, 0, 163, 163, - 0, 102, 0, 163, 102, 0, 0, 0, 0, 26, - 27, 28, 29, 30, 0, 31, 32, 33, 102, 102, - 0, 34, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 40, 163, 41, 42, 43, 44, 45, 0, - 0, 0, 0, 46, 47, 48, 49, 50, 51, 0, - 0, 102, 0, 102, 77, 53, 0, 77, 0, 112, - 0, 0, 0, 117, 0, 56, 126, 57, 58, 131, - 0, 77, 77, 139, 140, 141, 142, 143, 0, 0, - 0, 148, 149, 0, 0, 111, 111, 111, 111, 0, - 0, 0, 111, 167, 167, 167, 167, 0, 0, 0, - 167, 0, 167, 0, 0, 0, 77, 0, 167, 167, - 167, 167, 0, 111, 111, 111, 0, 111, 0, 0, - 201, 167, 167, 167, 0, 167, 167, 167, 167, 167, - 167, 167, 167, 0, 0, 167, 0, 0, 167, 167, - 167, 0, 0, 0, 0, 0, 183, 0, 0, 183, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 183, 183, 0, 0, 0, 183, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 240, 241, 242, 243, 244, 245, 246, - 247, 248, 249, 250, 251, 252, 253, 254, 183, 0, - 150, 0, 0, 150, 0, 0, 0, 0, 0, 0, - 0, 272, 163, 163, 163, 163, 0, 150, 150, 163, - 0, 163, 150, 0, 0, 0, 0, 163, 163, 163, - 163, 0, 102, 102, 102, 102, 0, 0, 0, 102, - 163, 163, 163, 0, 163, 163, 163, 163, 163, 163, - 163, 163, 150, 145, 163, 0, 145, 163, 163, 163, - 102, 102, 102, 0, 0, 0, 0, 0, 0, 0, - 145, 145, 0, 0, 0, 145, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 77, 77, 77, 77, 0, - 0, 0, 77, 0, 0, 0, 0, 0, 334, 0, - 0, 148, 0, 0, 148, 145, 0, 0, 0, 0, - 0, 0, 0, 77, 77, 77, 0, 0, 148, 148, - 0, 0, 0, 148, 0, 0, 0, 0, 0, 0, - 0, 350, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 146, - 0, 0, 146, 148, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 146, 146, 0, 0, - 0, 146, 0, 0, 0, 0, 0, 183, 183, 183, - 183, 0, 0, 0, 183, 0, 183, 0, 0, 0, - 0, 0, 183, 183, 183, 183, 0, 0, 0, 0, - 0, 146, 0, 0, 0, 183, 183, 183, 0, 183, - 183, 183, 183, 183, 183, 183, 183, 0, 0, 183, - 0, 0, 183, 183, 183, 0, 0, 0, 0, 0, - 0, 150, 150, 150, 150, 0, 156, 0, 150, 156, - 150, 0, 0, 0, 0, 0, 150, 150, 150, 150, - 0, 0, 0, 156, 156, 0, 0, 0, 156, 150, - 150, 150, 0, 150, 150, 150, 150, 150, 150, 150, - 150, 0, 0, 150, 0, 0, 150, 150, 150, 0, - 0, 0, 0, 0, 145, 145, 145, 145, 156, 0, - 0, 145, 0, 145, 0, 0, 0, 0, 0, 145, - 145, 145, 145, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 145, 145, 145, 0, 145, 145, 145, 145, - 145, 145, 145, 145, 0, 0, 145, 0, 0, 145, - 145, 145, 148, 148, 148, 148, 0, 0, 0, 148, - 0, 148, 0, 0, 0, 0, 0, 148, 148, 148, - 148, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 148, 148, 148, 0, 148, 148, 148, 148, 148, 148, - 148, 148, 0, 0, 148, 0, 0, 148, 148, 148, - 146, 146, 146, 146, 0, 174, 0, 146, 174, 146, - 0, 0, 0, 0, 0, 146, 146, 146, 146, 0, - 0, 0, 174, 174, 0, 0, 0, 174, 146, 146, - 146, 0, 146, 146, 146, 146, 146, 146, 146, 146, - 0, 0, 146, 0, 0, 146, 146, 146, 0, 0, - 0, 0, 0, 0, 0, 177, 0, 174, 177, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 177, 177, 0, 0, 0, 177, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 156, 156, 156, - 156, 0, 0, 0, 156, 0, 156, 0, 0, 0, - 0, 0, 156, 156, 156, 156, 0, 177, 0, 0, - 0, 0, 0, 0, 0, 156, 156, 156, 0, 156, - 156, 156, 156, 156, 156, 156, 156, 144, 0, 156, - 144, 0, 156, 156, 156, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 144, 144, 0, 0, 0, 144, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 76, 0, 0, 76, 144, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 76, 76, 0, 0, 0, 76, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 184, 0, 0, 76, 0, 0, - 0, 0, 0, 0, 0, 0, 174, 174, 174, 174, - 0, 184, 184, 174, 0, 174, 184, 0, 0, 0, - 0, 174, 174, 174, 174, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 174, 174, 174, 0, 174, 174, - 174, 174, 174, 174, 174, 174, 184, 0, 174, 0, - 0, 174, 174, 174, 0, 0, 177, 177, 177, 177, - 0, 66, 0, 177, 66, 177, 0, 0, 0, 0, - 0, 177, 177, 177, 177, 0, 0, 0, 66, 66, - 0, 0, 0, 66, 177, 177, 177, 0, 177, 177, - 177, 177, 177, 177, 177, 177, 0, 0, 177, 0, - 0, 177, 177, 177, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 66, 0, 0, 143, 0, 0, 143, - 0, 0, 0, 0, 0, 0, 0, 0, 144, 144, - 144, 144, 0, 143, 143, 144, 0, 144, 143, 0, - 0, 0, 0, 144, 144, 144, 144, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 144, 144, 144, 0, - 144, 144, 144, 144, 144, 144, 144, 144, 143, 0, - 144, 0, 0, 144, 144, 144, 76, 76, 76, 76, - 0, 82, 0, 76, 82, 76, 0, 0, 0, 0, - 0, 76, 76, 76, 76, 0, 0, 0, 82, 82, - 0, 0, 0, 82, 76, 76, 76, 0, 76, 76, - 76, 76, 76, 76, 76, 76, 0, 0, 76, 0, - 0, 76, 76, 76, 0, 184, 184, 184, 184, 162, - 0, 0, 184, 82, 184, 0, 0, 0, 0, 0, - 184, 184, 184, 184, 0, 0, 162, 162, 0, 0, - 0, 162, 0, 184, 184, 184, 0, 184, 184, 184, - 184, 184, 184, 184, 184, 0, 0, 184, 0, 0, - 184, 184, 184, 0, 0, 0, 0, 0, 0, 0, - 79, 162, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 66, 66, 66, 66, 0, 79, 79, 66, - 0, 66, 79, 0, 0, 0, 0, 66, 66, 66, - 66, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 66, 66, 66, 0, 66, 66, 66, 66, 66, 66, - 66, 66, 79, 0, 66, 0, 0, 66, 66, 66, - 0, 0, 0, 0, 0, 0, 0, 143, 143, 143, - 143, 0, 122, 0, 143, 122, 143, 0, 0, 0, - 0, 0, 143, 143, 143, 143, 0, 0, 0, 122, - 122, 0, 0, 0, 122, 143, 143, 143, 0, 143, - 143, 143, 143, 143, 143, 143, 143, 0, 0, 143, - 0, 0, 143, 143, 143, 0, 0, 0, 0, 0, - 123, 0, 0, 123, 122, 0, 0, 0, 0, 0, - 0, 0, 82, 82, 82, 82, 0, 123, 123, 82, - 0, 82, 123, 0, 0, 0, 0, 82, 82, 82, - 82, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 82, 82, 82, 0, 82, 82, 82, 82, 82, 82, - 82, 82, 123, 0, 82, 0, 0, 82, 82, 82, - 162, 162, 162, 162, 0, 118, 0, 162, 118, 162, - 0, 0, 0, 0, 0, 162, 162, 162, 162, 0, - 0, 0, 118, 118, 0, 0, 0, 118, 162, 162, - 162, 0, 162, 162, 162, 162, 162, 162, 162, 162, - 0, 0, 162, 0, 0, 162, 162, 162, 0, 0, - 0, 79, 79, 79, 79, 0, 119, 118, 79, 119, - 79, 0, 0, 0, 0, 0, 79, 79, 79, 79, - 0, 0, 0, 119, 119, 0, 0, 0, 119, 79, - 79, 79, 0, 79, 79, 79, 79, 79, 79, 79, - 79, 0, 0, 79, 0, 0, 79, 79, 79, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 119, 0, - 0, 140, 0, 0, 140, 0, 0, 0, 0, 0, - 0, 0, 0, 122, 122, 122, 122, 0, 140, 140, - 122, 0, 122, 140, 0, 0, 0, 0, 122, 122, - 122, 122, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 122, 122, 122, 0, 122, 122, 122, 122, 122, - 122, 122, 122, 140, 0, 122, 0, 0, 0, 0, - 0, 123, 123, 123, 123, 0, 116, 0, 123, 116, - 123, 0, 0, 0, 0, 0, 123, 123, 123, 123, - 0, 0, 0, 116, 116, 0, 0, 0, 116, 123, - 123, 123, 0, 123, 123, 123, 123, 123, 123, 123, - 123, 0, 0, 123, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 117, 0, 0, 117, 116, 0, - 0, 0, 0, 0, 0, 0, 118, 118, 118, 118, - 0, 117, 117, 118, 0, 118, 117, 0, 0, 0, - 0, 118, 118, 118, 118, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 118, 118, 118, 0, 118, 118, - 118, 118, 118, 118, 118, 118, 117, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 119, 119, 119, - 119, 0, 0, 0, 119, 0, 119, 0, 0, 0, - 0, 0, 119, 119, 119, 119, 0, 0, 0, 0, - 115, 0, 0, 115, 0, 119, 119, 119, 0, 119, - 119, 119, 119, 119, 119, 119, 119, 115, 115, 0, - 0, 0, 115, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 140, 140, 140, 140, 0, 0, 0, 140, - 0, 140, 0, 0, 0, 0, 0, 140, 140, 140, - 140, 0, 115, 0, 0, 103, 0, 0, 103, 0, - 140, 140, 140, 0, 140, 140, 140, 140, 140, 140, - 140, 140, 103, 103, 0, 0, 0, 103, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 116, 116, 116, - 116, 0, 0, 0, 116, 0, 116, 103, 0, 0, - 0, 0, 116, 116, 116, 116, 0, 0, 0, 0, - 104, 0, 0, 104, 0, 116, 116, 116, 0, 116, - 116, 116, 116, 116, 116, 116, 116, 104, 104, 0, - 0, 0, 104, 0, 0, 117, 117, 117, 117, 0, - 0, 0, 117, 0, 117, 0, 0, 0, 0, 0, - 117, 117, 117, 117, 0, 0, 0, 0, 105, 0, - 0, 105, 104, 117, 117, 117, 0, 117, 117, 117, - 117, 117, 117, 117, 117, 105, 105, 0, 0, 0, - 105, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 106, - 105, 0, 106, 0, 0, 0, 0, 0, 0, 0, - 0, 115, 115, 115, 115, 0, 106, 106, 115, 0, - 115, 106, 0, 0, 0, 0, 115, 115, 115, 115, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 115, - 115, 115, 0, 115, 115, 115, 115, 115, 115, 115, - 115, 106, 0, 0, 166, 0, 0, 166, 0, 0, - 0, 0, 0, 0, 0, 0, 103, 103, 103, 103, - 0, 166, 166, 103, 0, 103, 166, 0, 0, 0, - 0, 103, 103, 103, 103, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 103, 103, 103, 0, 103, 103, - 103, 103, 103, 103, 103, 103, 166, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 165, - 0, 0, 165, 0, 0, 0, 0, 0, 0, 0, - 0, 104, 104, 104, 104, 0, 165, 165, 104, 0, - 104, 165, 0, 0, 0, 0, 104, 104, 104, 104, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 104, - 104, 104, 0, 104, 104, 104, 104, 104, 104, 104, - 0, 165, 0, 0, 129, 0, 0, 129, 0, 105, - 105, 105, 105, 0, 142, 0, 105, 142, 105, 0, - 0, 129, 129, 0, 105, 105, 129, 105, 0, 0, - 0, 142, 142, 0, 0, 0, 142, 105, 105, 105, - 0, 105, 105, 105, 105, 105, 105, 105, 0, 0, - 0, 0, 0, 0, 0, 107, 129, 0, 107, 0, - 106, 106, 106, 106, 0, 0, 142, 106, 0, 106, - 0, 0, 107, 107, 0, 106, 106, 107, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 106, 106, - 106, 0, 106, 106, 106, 106, 106, 106, 106, 0, - 0, 0, 0, 108, 0, 0, 108, 107, 0, 0, - 0, 0, 0, 0, 0, 166, 166, 166, 166, 0, - 108, 108, 166, 0, 166, 108, 0, 0, 0, 0, - 166, 166, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 166, 166, 166, 0, 166, 166, 166, - 166, 166, 166, 109, 0, 108, 109, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 109, 109, 0, 0, 0, 109, 0, 0, 0, 0, - 165, 165, 165, 165, 0, 0, 0, 165, 0, 165, - 0, 0, 0, 0, 0, 165, 165, 0, 0, 0, - 0, 110, 0, 0, 110, 109, 0, 0, 165, 165, - 165, 0, 165, 165, 165, 165, 165, 165, 110, 110, - 0, 0, 0, 110, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 129, 129, 129, 129, 0, - 112, 0, 129, 112, 129, 142, 142, 142, 142, 0, - 129, 129, 142, 110, 142, 0, 0, 112, 112, 0, - 142, 142, 112, 129, 129, 129, 0, 129, 129, 129, - 129, 129, 129, 142, 142, 142, 0, 142, 142, 142, - 142, 142, 142, 0, 0, 0, 107, 107, 107, 107, - 0, 0, 112, 107, 0, 107, 0, 0, 0, 0, - 0, 0, 107, 0, 0, 0, 0, 113, 0, 0, - 113, 0, 0, 0, 107, 107, 107, 0, 107, 107, - 107, 107, 107, 107, 113, 113, 0, 0, 0, 113, - 0, 0, 0, 0, 108, 108, 108, 108, 0, 0, - 0, 108, 0, 108, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 114, 0, 0, 114, 113, - 0, 0, 108, 108, 108, 0, 108, 108, 108, 108, - 108, 108, 114, 114, 0, 0, 0, 114, 0, 0, - 0, 0, 0, 0, 109, 109, 109, 109, 0, 0, - 0, 109, 0, 109, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 114, 0, 0, - 0, 0, 109, 109, 109, 0, 109, 109, 109, 109, - 109, 109, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 110, 110, 110, 110, 0, 0, 0, 110, - 0, 110, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 110, 110, 110, 0, 110, 110, 110, 110, 110, 0, - 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, 112, 0, 112, 112, 112, 112, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 113, 113, - 113, 113, 0, 0, 0, 113, 0, 113, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 113, 113, 113, 0, - 113, 113, 113, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 114, 114, 114, 114, - 0, 0, 0, 114, 0, 114, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 114, 114, 114, 0, 114, 114, - 114, -}; -static short yycheck[] = { 15, - 94, 44, 41, 36, 59, 41, 41, 123, 44, 36, - 99, 59, 40, 40, 40, 59, 200, 36, 365, 91, - 59, 40, 209, 91, 41, 257, 93, 63, 59, 266, - 267, 268, 48, 270, 271, 276, 277, 104, 41, 93, - 197, 130, 59, 59, 60, 257, 203, 257, 41, 396, - 59, 123, 41, 41, 93, 123, 41, 8, 9, 44, - 297, 59, 40, 91, 91, 91, 59, 40, 123, 40, - 59, 40, 40, 58, 59, 123, 28, 15, 63, 123, - 41, 40, 105, 106, 107, 108, 109, 110, 257, 0, - 123, 40, 123, 45, 46, 123, 123, 123, 114, 115, - 52, 41, 41, 40, 278, 41, 44, 40, 93, 47, - 123, 298, 64, 65, 66, 67, 132, 41, 41, 59, - 59, 41, 33, 59, 59, 36, 37, 38, 41, 40, - 289, 42, 43, 317, 45, 41, 59, 44, 41, 59, - 156, 157, 158, 159, 160, 161, 162, 163, 59, 123, - 88, 260, 311, 64, 341, 314, 257, 41, 317, 318, - 319, 40, 125, 115, 40, 103, 182, 183, 184, 185, - 186, 187, 188, 189, 190, 41, 289, 290, 59, 40, - 91, 59, 298, 298, 200, 0, 275, 210, 204, 205, - 59, 207, 281, 209, 59, 319, 91, 59, 311, 386, - 216, 314, 218, 219, 317, 318, 319, 298, 257, 36, - 37, 227, 123, 40, 125, 126, 154, 36, 33, 93, - 41, 36, 37, 38, 257, 40, 125, 42, 43, 262, - 45, 258, 91, 272, 273, 274, 275, 64, 260, 255, - 279, 257, 258, 298, 59, 281, 300, 301, 302, 64, - 302, 287, 288, 289, 290, 40, 260, 300, 301, 302, - 41, 300, 301, 302, 41, 300, 301, 302, 304, 305, - 306, 307, 308, 309, 310, 311, 91, 296, 314, 373, - 41, 317, 318, 319, 41, 59, 41, 272, 273, 274, - 275, 300, 301, 302, 279, 311, 281, 300, 301, 302, - 40, 317, 287, 288, 289, 290, 93, 41, 123, 93, - 125, 126, 300, 301, 302, 300, 301, 302, 125, 304, - 305, 306, 307, 308, 309, 310, 311, 343, 93, 314, - 125, 93, 317, 318, 319, 93, 274, 125, 276, 300, - 301, 302, 125, 123, 282, 256, 257, 258, 259, 260, - 261, 59, 263, 264, 265, 266, 267, 268, 269, 270, - 271, 272, 273, 274, 275, 41, 382, 41, 279, 280, - 0, 282, 283, 284, 285, 286, 300, 301, 302, 125, - 291, 292, 293, 294, 295, 296, 297, 300, 301, 302, - 59, 41, 303, 40, 300, 301, 302, 300, 301, 302, - 41, 41, 313, 33, 315, 316, 36, 37, 38, 125, - 40, 123, 42, 43, 41, 45, 300, 301, 302, 300, - 301, 302, 300, 301, 302, 123, 300, 301, 302, 59, - 41, 300, 301, 302, 64, 300, 301, 302, 300, 301, - 302, 256, 257, 258, 259, 260, 261, 59, 263, 264, - 265, 266, 267, 268, 269, 270, 271, 272, 273, 274, - 275, 91, 41, 59, 279, 280, 63, 282, 283, 284, - 285, 286, 41, 59, 125, 41, 291, 292, 293, 294, - 295, 296, 297, 300, 301, 302, 34, 51, 303, 51, - 338, 339, 340, 123, 342, 15, 126, 157, 313, 33, - 315, 316, 36, 37, 38, 382, 40, 41, 42, 43, - 44, 45, 343, 300, 301, 302, 300, 301, 302, 207, - 23, 369, 276, -1, 58, 59, -1, -1, 376, 63, - 64, -1, 380, -1, -1, 300, 301, 302, 300, 301, - 302, -1, 300, 301, 302, 393, 394, -1, -1, -1, - 266, 267, 268, -1, 270, 271, -1, 91, 314, 93, - -1, 317, 318, 319, 33, -1, -1, 36, 37, 38, - -1, 40, 41, 42, 43, 44, 45, -1, -1, -1, - -1, 297, 287, 288, 289, 290, 362, 363, -1, 58, - 59, 367, 126, -1, 63, 64, -1, -1, -1, -1, - 305, 306, 307, 308, 309, 310, 311, 383, -1, 314, - -1, 387, 317, 318, 319, 266, 267, 268, -1, 270, - 271, -1, -1, -1, 93, 41, 256, 257, 258, 259, - 260, 261, -1, 263, 264, 265, -1, -1, -1, 269, - -1, -1, 272, 273, 274, 275, 297, 63, -1, 279, - 280, -1, 282, 283, 284, 285, 286, 126, -1, -1, - -1, 291, 292, 293, 294, 295, 296, -1, -1, -1, - -1, -1, 287, 303, 289, 290, -1, -1, -1, -1, - -1, -1, -1, 313, 281, 315, 316, -1, -1, -1, - 287, 288, 289, 290, -1, 310, 311, -1, -1, 314, - 58, -1, 317, 318, 319, 63, -1, 304, 305, 306, - 307, 308, 309, 310, 311, -1, -1, 314, -1, -1, - 317, 318, 319, 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, 63, 300, 301, 302, 303, - 304, 305, 306, 307, 308, 309, 310, 311, -1, 313, - 314, 315, 316, 317, 318, 319, -1, -1, 257, 258, - 259, 260, 261, -1, 263, 264, 265, -1, -1, 45, - 269, -1, -1, 272, 273, 274, 275, 53, -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, 310, 311, -1, 313, 314, 315, 316, 317, 318, - 319, 33, -1, 99, 36, 37, 38, -1, 40, -1, - 42, 43, -1, 45, -1, 281, -1, -1, -1, -1, - -1, 287, 288, 289, 290, -1, 122, 59, 272, 273, - 274, 275, 64, -1, 130, 279, -1, -1, 304, 305, - 306, 307, 308, 309, 310, 311, -1, -1, 314, -1, - -1, 317, 318, 319, -1, -1, 300, 301, 302, 91, - -1, -1, 33, -1, -1, 36, 37, 38, -1, 40, - -1, 42, 43, 281, 45, -1, -1, -1, -1, 287, - 288, 289, 290, -1, -1, -1, -1, -1, 59, -1, - -1, 123, -1, 64, 126, -1, 304, 305, 306, 307, - 308, 309, 310, 311, -1, -1, 314, -1, -1, 317, - 318, 319, -1, -1, -1, -1, -1, -1, -1, -1, - 91, -1, 33, -1, -1, 36, 37, 38, -1, 40, - -1, 42, 43, 281, 45, -1, -1, -1, -1, 287, - 288, 289, 290, 311, -1, -1, 314, -1, -1, 317, - 318, 319, 123, 64, -1, 126, -1, 305, 306, 307, - 308, 309, 310, 311, -1, -1, 314, -1, -1, 317, - 318, 319, -1, -1, -1, -1, -1, -1, -1, 275, - 91, 289, 290, -1, -1, 281, 33, -1, -1, 36, - 37, 38, -1, 40, -1, 42, 43, -1, 45, -1, - -1, -1, 310, 311, -1, -1, 314, -1, -1, 317, - 318, 319, 123, -1, -1, 126, -1, 64, -1, -1, - -1, -1, -1, -1, 256, 257, 258, 259, 260, 261, - -1, 263, 264, 265, -1, -1, -1, 269, -1, -1, - 272, 273, 274, 275, 91, -1, -1, 279, 280, -1, - 282, 283, 284, 285, 286, -1, -1, -1, -1, 291, - 292, 293, 294, 295, 296, -1, -1, -1, -1, -1, - -1, 303, -1, -1, -1, -1, 123, -1, -1, 126, - -1, 313, -1, 315, 316, 256, 257, 258, 259, 260, - 261, -1, 263, 264, 265, -1, -1, -1, 269, -1, - -1, 272, 273, 274, 275, -1, -1, -1, 279, 280, - -1, 282, 283, 284, 285, 286, -1, -1, -1, -1, - 291, 292, 293, 294, 295, 296, -1, -1, -1, -1, - -1, 33, 303, -1, 36, 37, 38, -1, 40, -1, - 42, 43, 313, 45, 315, 316, 257, 258, 259, 260, - 261, 262, 263, 264, 265, -1, -1, -1, 269, -1, - -1, -1, 64, -1, -1, -1, -1, -1, -1, 280, - -1, 282, 283, 284, 285, 286, -1, -1, -1, -1, - 291, 292, 293, 294, 295, 296, -1, -1, -1, 91, - -1, 41, 303, -1, 44, -1, 287, 288, 289, 290, - -1, -1, 313, -1, 315, 316, -1, -1, 58, 59, - 257, 258, 259, 260, 261, -1, 263, 264, 265, 310, - 311, 123, 269, 314, 126, -1, 317, 318, 319, -1, - -1, -1, -1, 280, -1, 282, 283, 284, 285, 286, - -1, -1, -1, 93, 291, 292, 293, 294, 295, 296, - 33, -1, -1, 36, 37, 38, 303, 40, -1, 42, - 43, -1, 45, -1, -1, -1, 313, -1, 315, 316, - 287, 288, 289, 290, -1, -1, 59, -1, -1, -1, - -1, 64, -1, -1, -1, -1, -1, -1, -1, -1, - 307, 308, 309, 310, 311, -1, -1, 314, -1, -1, - 317, 318, 319, 287, 288, 289, 290, -1, 91, -1, - 33, -1, -1, 36, 37, 38, -1, 40, 41, 42, - 43, -1, 45, -1, 308, 309, 310, 311, -1, -1, - 314, -1, -1, 317, 318, 319, -1, -1, -1, -1, - -1, 64, -1, 126, -1, -1, -1, -1, -1, -1, - -1, -1, -1, -1, -1, 257, 258, 259, 260, 261, - -1, 263, 264, 265, -1, -1, -1, 269, 91, -1, - -1, -1, -1, -1, -1, -1, -1, -1, 280, -1, - 282, 283, 284, 285, 286, -1, -1, -1, -1, 291, - 292, 293, 294, 295, 296, 33, -1, -1, 36, 37, - 38, 303, 40, 126, 42, 43, -1, 45, -1, -1, - -1, 313, -1, 315, 316, -1, -1, -1, -1, -1, - -1, -1, 272, 273, 274, 275, 64, -1, -1, 279, - -1, -1, -1, -1, -1, -1, 33, -1, -1, 36, - 37, 38, -1, 40, 41, 42, 43, -1, 45, -1, - 300, 301, 302, 91, 304, 93, -1, -1, -1, -1, - -1, -1, -1, -1, -1, -1, -1, 64, -1, 41, - -1, -1, 44, -1, 257, 258, 259, 260, 261, -1, - 263, 264, 265, -1, -1, -1, 269, 59, 126, -1, - -1, -1, -1, -1, 91, -1, -1, 280, -1, 282, - 283, 284, 285, 286, -1, -1, -1, -1, 291, 292, - 293, 294, 295, 296, -1, -1, -1, -1, -1, -1, - 303, 93, -1, -1, -1, -1, -1, -1, -1, 126, - 313, -1, 315, 316, 257, 258, 259, 260, 261, -1, - 263, 264, 265, -1, 33, -1, 269, 36, 37, 38, - -1, 40, 41, 42, 43, -1, 45, 280, -1, 282, - 283, 284, 285, 286, -1, -1, -1, -1, 291, 292, - 293, 294, 295, 296, -1, 64, -1, -1, -1, -1, - 303, 287, 288, 289, 290, -1, -1, -1, -1, -1, - 313, -1, 315, 316, -1, -1, -1, 41, -1, -1, - 44, -1, 91, 309, 310, 311, -1, -1, 314, -1, - -1, 317, 318, 319, 58, 59, -1, -1, -1, 257, - 258, 259, 260, 261, -1, 263, 264, 265, -1, -1, - -1, 269, 41, -1, -1, 44, -1, 126, -1, -1, - -1, -1, 280, -1, 282, 283, 284, 285, 286, 93, - 59, -1, -1, 291, 292, 293, 294, 295, 296, -1, - 257, 258, 259, 260, 261, 303, 263, 264, 265, -1, - -1, -1, 269, -1, -1, 313, -1, 315, 316, -1, - -1, -1, -1, 280, 93, 282, 283, 284, 285, 286, - -1, -1, -1, -1, 291, 292, 293, 294, 295, 296, - 272, 273, 274, 275, -1, 33, 303, 279, 36, 37, - 38, -1, 40, 41, 42, 43, 313, 45, 315, 316, - 27, 28, -1, -1, -1, -1, -1, -1, 300, 301, - -1, -1, 39, -1, -1, -1, 64, -1, 45, 46, - 47, -1, -1, -1, 51, 52, -1, -1, -1, -1, - -1, -1, -1, -1, -1, -1, -1, 64, 65, 66, - 67, -1, -1, 91, -1, -1, -1, -1, 257, 258, - 259, 260, 261, -1, 263, 264, 265, -1, 33, -1, - 269, 36, 37, 38, -1, 40, 41, 42, 43, -1, - 45, 280, -1, 282, 283, 284, 285, 286, 126, -1, - -1, -1, 291, 292, 293, 294, 295, 296, 115, 64, - -1, -1, -1, -1, 303, -1, -1, -1, -1, -1, - -1, -1, -1, -1, 313, -1, 315, 316, 272, 273, - 274, 275, -1, -1, -1, 279, 91, -1, -1, -1, - -1, 33, -1, -1, 36, 37, 38, -1, 40, -1, - 42, 43, -1, 45, -1, -1, 300, 301, 302, -1, - -1, -1, -1, 272, 273, 274, 275, -1, -1, -1, - 279, 126, 64, -1, 181, -1, 41, -1, -1, 44, - -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, - -1, 300, 301, 58, 59, -1, -1, -1, -1, 91, - -1, 208, -1, -1, -1, -1, -1, -1, -1, -1, - -1, -1, -1, -1, 33, -1, -1, 36, 37, 38, - -1, 40, 41, 42, 43, -1, 45, -1, 93, 257, - 258, 259, 260, 261, 126, 263, 264, 265, -1, -1, - -1, 269, -1, -1, -1, 64, -1, -1, -1, -1, - -1, -1, 280, -1, 282, 283, 284, 285, 286, -1, - -1, -1, -1, 291, 292, 293, 294, 295, 296, -1, - -1, -1, 91, -1, -1, 303, -1, -1, -1, -1, - -1, -1, -1, -1, -1, 313, 33, 315, 316, 36, - 37, 38, -1, 40, 41, 42, 43, -1, 45, -1, - -1, -1, 257, 258, 259, 260, 261, 126, 263, 264, - 265, -1, -1, -1, 269, -1, -1, 64, -1, -1, - -1, -1, -1, -1, -1, 280, -1, 282, 283, 284, - 285, 286, -1, -1, -1, -1, 291, 292, 293, 294, - 295, 296, -1, -1, 91, -1, -1, -1, 303, -1, - -1, -1, -1, -1, -1, -1, -1, -1, 313, -1, - 315, 316, -1, -1, 256, 257, 258, 259, 260, 261, - -1, 263, 264, 265, -1, -1, -1, 269, -1, 126, - -1, -1, -1, -1, -1, -1, -1, -1, 280, -1, - 282, 283, 284, 285, 286, -1, -1, -1, -1, 291, - 292, 293, 294, 295, 296, -1, -1, 272, 273, 274, - 275, 303, -1, -1, 279, -1, -1, -1, -1, -1, - -1, 313, 33, 315, 316, 36, 37, 38, -1, 40, - 41, 42, 43, -1, 45, 300, 301, 302, 257, 258, - 259, 260, 261, -1, 263, 264, 265, -1, -1, -1, - 269, -1, -1, 64, -1, -1, -1, -1, -1, -1, - -1, 280, -1, 282, 283, 284, 285, 286, -1, -1, - -1, -1, 291, 292, 293, 294, 295, 296, -1, -1, - 91, -1, -1, -1, 303, -1, -1, -1, -1, -1, - -1, -1, -1, -1, 313, 33, 315, 316, 36, 37, - 38, -1, 40, -1, 42, 43, -1, 45, -1, -1, - 257, 258, 259, 260, 261, 126, 263, 264, 265, -1, - -1, -1, 269, -1, -1, -1, 64, -1, -1, -1, - -1, -1, -1, 280, -1, 282, 283, 284, 285, 286, - -1, -1, -1, -1, 291, 292, 293, 294, 295, 296, - -1, -1, -1, 91, -1, -1, 303, -1, -1, -1, - -1, -1, -1, -1, 41, -1, 313, 44, 315, 316, - -1, -1, 41, -1, -1, 44, -1, -1, -1, -1, - -1, 58, 59, -1, -1, -1, 63, -1, 126, 58, - 59, -1, -1, -1, 63, -1, -1, -1, -1, -1, - -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, - -1, -1, -1, -1, -1, -1, 93, -1, -1, -1, - -1, -1, -1, -1, 93, -1, -1, -1, -1, -1, - -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, - -1, -1, -1, -1, -1, -1, 257, 258, 259, 260, - 261, -1, 263, 264, 265, -1, -1, -1, 269, -1, - -1, -1, -1, -1, -1, -1, -1, -1, -1, 280, - -1, 282, 283, 284, 285, 286, -1, -1, -1, -1, - 291, 292, 293, 294, 295, 296, -1, -1, -1, -1, - -1, 41, 303, -1, 44, -1, -1, -1, -1, -1, - -1, -1, 313, -1, 315, 316, -1, -1, 58, 59, - -1, 41, -1, 63, 44, -1, -1, -1, -1, 257, - 258, 259, 260, 261, -1, 263, 264, 265, 58, 59, - -1, 269, -1, -1, -1, -1, -1, -1, -1, -1, - -1, -1, 280, 93, 282, 283, 284, 285, 286, -1, - -1, -1, -1, 291, 292, 293, 294, 295, 296, -1, - -1, 32, -1, 93, 41, 303, -1, 44, -1, 40, - -1, -1, -1, 44, -1, 313, 47, 315, 316, 50, - -1, 58, 59, 54, 55, 56, 57, 58, -1, -1, - -1, 62, 63, -1, -1, 272, 273, 274, 275, -1, - -1, -1, 279, 272, 273, 274, 275, -1, -1, -1, - 279, -1, 281, -1, -1, -1, 93, -1, 287, 288, - 289, 290, -1, 300, 301, 302, -1, 304, -1, -1, - 101, 300, 301, 302, -1, 304, 305, 306, 307, 308, - 309, 310, 311, -1, -1, 314, -1, -1, 317, 318, - 319, -1, -1, -1, -1, -1, 41, -1, -1, 44, - -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, - -1, -1, -1, 58, 59, -1, -1, -1, 63, -1, - -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, - -1, -1, -1, 164, 165, 166, 167, 168, 169, 170, - 171, 172, 173, 174, 175, 176, 177, 178, 93, -1, - 41, -1, -1, 44, -1, -1, -1, -1, -1, -1, - -1, 192, 272, 273, 274, 275, -1, 58, 59, 279, - -1, 281, 63, -1, -1, -1, -1, 287, 288, 289, - 290, -1, 272, 273, 274, 275, -1, -1, -1, 279, - 300, 301, 302, -1, 304, 305, 306, 307, 308, 309, - 310, 311, 93, 41, 314, -1, 44, 317, 318, 319, - 300, 301, 302, -1, -1, -1, -1, -1, -1, -1, - 58, 59, -1, -1, -1, 63, -1, -1, -1, -1, - -1, -1, -1, -1, -1, 272, 273, 274, 275, -1, - -1, -1, 279, -1, -1, -1, -1, -1, 279, -1, - -1, 41, -1, -1, 44, 93, -1, -1, -1, -1, - -1, -1, -1, 300, 301, 302, -1, -1, 58, 59, - -1, -1, -1, 63, -1, -1, -1, -1, -1, -1, - -1, 312, -1, -1, -1, -1, -1, -1, -1, -1, - -1, -1, -1, -1, -1, -1, -1, -1, -1, 41, - -1, -1, 44, 93, -1, -1, -1, -1, -1, -1, - -1, -1, -1, -1, -1, -1, 58, 59, -1, -1, - -1, 63, -1, -1, -1, -1, -1, 272, 273, 274, - 275, -1, -1, -1, 279, -1, 281, -1, -1, -1, - -1, -1, 287, 288, 289, 290, -1, -1, -1, -1, - -1, 93, -1, -1, -1, 300, 301, 302, -1, 304, - 305, 306, 307, 308, 309, 310, 311, -1, -1, 314, - -1, -1, 317, 318, 319, -1, -1, -1, -1, -1, - -1, 272, 273, 274, 275, -1, 41, -1, 279, 44, - 281, -1, -1, -1, -1, -1, 287, 288, 289, 290, - -1, -1, -1, 58, 59, -1, -1, -1, 63, 300, - 301, 302, -1, 304, 305, 306, 307, 308, 309, 310, - 311, -1, -1, 314, -1, -1, 317, 318, 319, -1, - -1, -1, -1, -1, 272, 273, 274, 275, 93, -1, - -1, 279, -1, 281, -1, -1, -1, -1, -1, 287, - 288, 289, 290, -1, -1, -1, -1, -1, -1, -1, - -1, -1, 300, 301, 302, -1, 304, 305, 306, 307, - 308, 309, 310, 311, -1, -1, 314, -1, -1, 317, - 318, 319, 272, 273, 274, 275, -1, -1, -1, 279, - -1, 281, -1, -1, -1, -1, -1, 287, 288, 289, - 290, -1, -1, -1, -1, -1, -1, -1, -1, -1, - 300, 301, 302, -1, 304, 305, 306, 307, 308, 309, - 310, 311, -1, -1, 314, -1, -1, 317, 318, 319, - 272, 273, 274, 275, -1, 41, -1, 279, 44, 281, - -1, -1, -1, -1, -1, 287, 288, 289, 290, -1, - -1, -1, 58, 59, -1, -1, -1, 63, 300, 301, - 302, -1, 304, 305, 306, 307, 308, 309, 310, 311, - -1, -1, 314, -1, -1, 317, 318, 319, -1, -1, - -1, -1, -1, -1, -1, 41, -1, 93, 44, -1, - -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, - -1, -1, 58, 59, -1, -1, -1, 63, -1, -1, - -1, -1, -1, -1, -1, -1, -1, 272, 273, 274, - 275, -1, -1, -1, 279, -1, 281, -1, -1, -1, - -1, -1, 287, 288, 289, 290, -1, 93, -1, -1, - -1, -1, -1, -1, -1, 300, 301, 302, -1, 304, - 305, 306, 307, 308, 309, 310, 311, 41, -1, 314, - 44, -1, 317, 318, 319, -1, -1, -1, -1, -1, - -1, -1, -1, -1, 58, 59, -1, -1, -1, 63, - -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, - -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, - -1, -1, -1, -1, -1, 41, -1, -1, 44, 93, - -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, - -1, -1, 58, 59, -1, -1, -1, 63, -1, -1, - -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, - -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, - -1, -1, -1, -1, 41, -1, -1, 93, -1, -1, - -1, -1, -1, -1, -1, -1, 272, 273, 274, 275, - -1, 58, 59, 279, -1, 281, 63, -1, -1, -1, - -1, 287, 288, 289, 290, -1, -1, -1, -1, -1, - -1, -1, -1, -1, 300, 301, 302, -1, 304, 305, - 306, 307, 308, 309, 310, 311, 93, -1, 314, -1, - -1, 317, 318, 319, -1, -1, 272, 273, 274, 275, - -1, 41, -1, 279, 44, 281, -1, -1, -1, -1, - -1, 287, 288, 289, 290, -1, -1, -1, 58, 59, - -1, -1, -1, 63, 300, 301, 302, -1, 304, 305, - 306, 307, 308, 309, 310, 311, -1, -1, 314, -1, - -1, 317, 318, 319, -1, -1, -1, -1, -1, -1, - -1, -1, -1, 93, -1, -1, 41, -1, -1, 44, - -1, -1, -1, -1, -1, -1, -1, -1, 272, 273, - 274, 275, -1, 58, 59, 279, -1, 281, 63, -1, - -1, -1, -1, 287, 288, 289, 290, -1, -1, -1, - -1, -1, -1, -1, -1, -1, 300, 301, 302, -1, - 304, 305, 306, 307, 308, 309, 310, 311, 93, -1, - 314, -1, -1, 317, 318, 319, 272, 273, 274, 275, - -1, 41, -1, 279, 44, 281, -1, -1, -1, -1, - -1, 287, 288, 289, 290, -1, -1, -1, 58, 59, - -1, -1, -1, 63, 300, 301, 302, -1, 304, 305, - 306, 307, 308, 309, 310, 311, -1, -1, 314, -1, - -1, 317, 318, 319, -1, 272, 273, 274, 275, 41, - -1, -1, 279, 93, 281, -1, -1, -1, -1, -1, - 287, 288, 289, 290, -1, -1, 58, 59, -1, -1, - -1, 63, -1, 300, 301, 302, -1, 304, 305, 306, - 307, 308, 309, 310, 311, -1, -1, 314, -1, -1, - 317, 318, 319, -1, -1, -1, -1, -1, -1, -1, - 41, 93, -1, -1, -1, -1, -1, -1, -1, -1, - -1, -1, 272, 273, 274, 275, -1, 58, 59, 279, - -1, 281, 63, -1, -1, -1, -1, 287, 288, 289, - 290, -1, -1, -1, -1, -1, -1, -1, -1, -1, - 300, 301, 302, -1, 304, 305, 306, 307, 308, 309, - 310, 311, 93, -1, 314, -1, -1, 317, 318, 319, - -1, -1, -1, -1, -1, -1, -1, 272, 273, 274, - 275, -1, 41, -1, 279, 44, 281, -1, -1, -1, - -1, -1, 287, 288, 289, 290, -1, -1, -1, 58, - 59, -1, -1, -1, 63, 300, 301, 302, -1, 304, - 305, 306, 307, 308, 309, 310, 311, -1, -1, 314, - -1, -1, 317, 318, 319, -1, -1, -1, -1, -1, - 41, -1, -1, 44, 93, -1, -1, -1, -1, -1, - -1, -1, 272, 273, 274, 275, -1, 58, 59, 279, - -1, 281, 63, -1, -1, -1, -1, 287, 288, 289, - 290, -1, -1, -1, -1, -1, -1, -1, -1, -1, - 300, 301, 302, -1, 304, 305, 306, 307, 308, 309, - 310, 311, 93, -1, 314, -1, -1, 317, 318, 319, - 272, 273, 274, 275, -1, 41, -1, 279, 44, 281, - -1, -1, -1, -1, -1, 287, 288, 289, 290, -1, - -1, -1, 58, 59, -1, -1, -1, 63, 300, 301, - 302, -1, 304, 305, 306, 307, 308, 309, 310, 311, - -1, -1, 314, -1, -1, 317, 318, 319, -1, -1, - -1, 272, 273, 274, 275, -1, 41, 93, 279, 44, - 281, -1, -1, -1, -1, -1, 287, 288, 289, 290, - -1, -1, -1, 58, 59, -1, -1, -1, 63, 300, - 301, 302, -1, 304, 305, 306, 307, 308, 309, 310, - 311, -1, -1, 314, -1, -1, 317, 318, 319, -1, - -1, -1, -1, -1, -1, -1, -1, -1, 93, -1, - -1, 41, -1, -1, 44, -1, -1, -1, -1, -1, - -1, -1, -1, 272, 273, 274, 275, -1, 58, 59, - 279, -1, 281, 63, -1, -1, -1, -1, 287, 288, - 289, 290, -1, -1, -1, -1, -1, -1, -1, -1, - -1, 300, 301, 302, -1, 304, 305, 306, 307, 308, - 309, 310, 311, 93, -1, 314, -1, -1, -1, -1, - -1, 272, 273, 274, 275, -1, 41, -1, 279, 44, - 281, -1, -1, -1, -1, -1, 287, 288, 289, 290, - -1, -1, -1, 58, 59, -1, -1, -1, 63, 300, - 301, 302, -1, 304, 305, 306, 307, 308, 309, 310, - 311, -1, -1, 314, -1, -1, -1, -1, -1, -1, - -1, -1, -1, -1, 41, -1, -1, 44, 93, -1, - -1, -1, -1, -1, -1, -1, 272, 273, 274, 275, - -1, 58, 59, 279, -1, 281, 63, -1, -1, -1, - -1, 287, 288, 289, 290, -1, -1, -1, -1, -1, - -1, -1, -1, -1, 300, 301, 302, -1, 304, 305, - 306, 307, 308, 309, 310, 311, 93, -1, -1, -1, - -1, -1, -1, -1, -1, -1, -1, 272, 273, 274, - 275, -1, -1, -1, 279, -1, 281, -1, -1, -1, - -1, -1, 287, 288, 289, 290, -1, -1, -1, -1, - 41, -1, -1, 44, -1, 300, 301, 302, -1, 304, - 305, 306, 307, 308, 309, 310, 311, 58, 59, -1, - -1, -1, 63, -1, -1, -1, -1, -1, -1, -1, - -1, -1, 272, 273, 274, 275, -1, -1, -1, 279, - -1, 281, -1, -1, -1, -1, -1, 287, 288, 289, - 290, -1, 93, -1, -1, 41, -1, -1, 44, -1, - 300, 301, 302, -1, 304, 305, 306, 307, 308, 309, - 310, 311, 58, 59, -1, -1, -1, 63, -1, -1, - -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, - -1, -1, -1, -1, -1, -1, -1, 272, 273, 274, - 275, -1, -1, -1, 279, -1, 281, 93, -1, -1, - -1, -1, 287, 288, 289, 290, -1, -1, -1, -1, - 41, -1, -1, 44, -1, 300, 301, 302, -1, 304, - 305, 306, 307, 308, 309, 310, 311, 58, 59, -1, - -1, -1, 63, -1, -1, 272, 273, 274, 275, -1, - -1, -1, 279, -1, 281, -1, -1, -1, -1, -1, - 287, 288, 289, 290, -1, -1, -1, -1, 41, -1, - -1, 44, 93, 300, 301, 302, -1, 304, 305, 306, - 307, 308, 309, 310, 311, 58, 59, -1, -1, -1, - 63, -1, -1, -1, -1, -1, -1, -1, -1, -1, - -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, - -1, -1, -1, -1, -1, -1, -1, -1, -1, 41, - 93, -1, 44, -1, -1, -1, -1, -1, -1, -1, - -1, 272, 273, 274, 275, -1, 58, 59, 279, -1, - 281, 63, -1, -1, -1, -1, 287, 288, 289, 290, - -1, -1, -1, -1, -1, -1, -1, -1, -1, 300, - 301, 302, -1, 304, 305, 306, 307, 308, 309, 310, - 311, 93, -1, -1, 41, -1, -1, 44, -1, -1, - -1, -1, -1, -1, -1, -1, 272, 273, 274, 275, - -1, 58, 59, 279, -1, 281, 63, -1, -1, -1, - -1, 287, 288, 289, 290, -1, -1, -1, -1, -1, - -1, -1, -1, -1, 300, 301, 302, -1, 304, 305, - 306, 307, 308, 309, 310, 311, 93, -1, -1, -1, - -1, -1, -1, -1, -1, -1, -1, -1, -1, 41, - -1, -1, 44, -1, -1, -1, -1, -1, -1, -1, - -1, 272, 273, 274, 275, -1, 58, 59, 279, -1, - 281, 63, -1, -1, -1, -1, 287, 288, 289, 290, - -1, -1, -1, -1, -1, -1, -1, -1, -1, 300, - 301, 302, -1, 304, 305, 306, 307, 308, 309, 310, - -1, 93, -1, -1, 41, -1, -1, 44, -1, 272, - 273, 274, 275, -1, 41, -1, 279, 44, 281, -1, - -1, 58, 59, -1, 287, 288, 63, 290, -1, -1, - -1, 58, 59, -1, -1, -1, 63, 300, 301, 302, - -1, 304, 305, 306, 307, 308, 309, 310, -1, -1, - -1, -1, -1, -1, -1, 41, 93, -1, 44, -1, - 272, 273, 274, 275, -1, -1, 93, 279, -1, 281, - -1, -1, 58, 59, -1, 287, 288, 63, -1, -1, - -1, -1, -1, -1, -1, -1, -1, -1, 300, 301, - 302, -1, 304, 305, 306, 307, 308, 309, 310, -1, - -1, -1, -1, 41, -1, -1, 44, 93, -1, -1, - -1, -1, -1, -1, -1, 272, 273, 274, 275, -1, - 58, 59, 279, -1, 281, 63, -1, -1, -1, -1, - 287, 288, -1, -1, -1, -1, -1, -1, -1, -1, - -1, -1, -1, 300, 301, 302, -1, 304, 305, 306, - 307, 308, 309, 41, -1, 93, 44, -1, -1, -1, - -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, - 58, 59, -1, -1, -1, 63, -1, -1, -1, -1, - 272, 273, 274, 275, -1, -1, -1, 279, -1, 281, - -1, -1, -1, -1, -1, 287, 288, -1, -1, -1, - -1, 41, -1, -1, 44, 93, -1, -1, 300, 301, - 302, -1, 304, 305, 306, 307, 308, 309, 58, 59, - -1, -1, -1, 63, -1, -1, -1, -1, -1, -1, - -1, -1, -1, -1, -1, 272, 273, 274, 275, -1, - 41, -1, 279, 44, 281, 272, 273, 274, 275, -1, - 287, 288, 279, 93, 281, -1, -1, 58, 59, -1, - 287, 288, 63, 300, 301, 302, -1, 304, 305, 306, - 307, 308, 309, 300, 301, 302, -1, 304, 305, 306, - 307, 308, 309, -1, -1, -1, 272, 273, 274, 275, - -1, -1, 93, 279, -1, 281, -1, -1, -1, -1, - -1, -1, 288, -1, -1, -1, -1, 41, -1, -1, - 44, -1, -1, -1, 300, 301, 302, -1, 304, 305, - 306, 307, 308, 309, 58, 59, -1, -1, -1, 63, - -1, -1, -1, -1, 272, 273, 274, 275, -1, -1, - -1, 279, -1, 281, -1, -1, -1, -1, -1, -1, - -1, -1, -1, -1, -1, 41, -1, -1, 44, 93, - -1, -1, 300, 301, 302, -1, 304, 305, 306, 307, - 308, 309, 58, 59, -1, -1, -1, 63, -1, -1, - -1, -1, -1, -1, 272, 273, 274, 275, -1, -1, - -1, 279, -1, 281, -1, -1, -1, -1, -1, -1, - -1, -1, -1, -1, -1, -1, -1, 93, -1, -1, - -1, -1, 300, 301, 302, -1, 304, 305, 306, 307, - 308, 309, -1, -1, -1, -1, -1, -1, -1, -1, - -1, -1, 272, 273, 274, 275, -1, -1, -1, 279, - -1, 281, -1, -1, -1, -1, -1, -1, -1, -1, - -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, - 300, 301, 302, -1, 304, 305, 306, 307, 308, -1, - -1, 272, 273, 274, 275, -1, -1, -1, 279, -1, - 281, -1, -1, -1, -1, -1, -1, -1, -1, -1, - -1, -1, -1, -1, -1, -1, -1, -1, -1, 300, - 301, 302, -1, 304, 305, 306, 307, -1, -1, -1, - -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, - -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, - -1, -1, -1, -1, -1, -1, -1, -1, 272, 273, - 274, 275, -1, -1, -1, 279, -1, 281, -1, -1, - -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, - -1, -1, -1, -1, -1, -1, 300, 301, 302, -1, - 304, 305, 306, -1, -1, -1, -1, -1, -1, -1, - -1, -1, -1, -1, -1, -1, 272, 273, 274, 275, - -1, -1, -1, 279, -1, 281, -1, -1, -1, -1, - -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, - -1, -1, -1, -1, 300, 301, 302, -1, 304, 305, - 306, -}; -#define YYFINAL 1 -#ifndef YYDEBUG -#define YYDEBUG 0 -#endif -#define YYMAXTOKEN 319 -#if YYDEBUG -static char *yyname[] = { -"end-of-file",0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, -"'!'",0,0,"'$'","'%'","'&'",0,"'('","')'","'*'","'+'","','","'-'",0,0,0,0,0,0,0, -0,0,0,0,0,"':'","';'",0,0,0,"'?'","'@'",0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, -0,0,0,0,0,0,"'['",0,"']'",0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, -0,0,"'{'",0,"'}'","'~'",0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, -0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, -0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, -0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"WORD","METHOD","FUNCMETH","THING", -"PMFUNC","PRIVATEREF","FUNC0SUB","UNIOPSUB","LSTOPSUB","LABEL","FORMAT","SUB", -"ANONSUB","PACKAGE","USE","WHILE","UNTIL","IF","UNLESS","ELSE","ELSIF", -"CONTINUE","FOR","LOOPEX","DOTDOT","FUNC0","FUNC1","FUNC","UNIOP","LSTOP", -"RELOP","EQOP","MULOP","ADDOP","DOLSHARP","DO","HASHBRACK","NOAMP","LOCAL","MY", -"MYSUB","COLONATTR","PREC_LOW","OROP","DOROP","ANDOP","NOTOP","ASSIGNOP","OROR", -"DORDOR","ANDAND","BITOROP","BITANDOP","SHIFTOP","MATCHOP","UMINUS","REFGEN", -"POWOP","PREINC","PREDEC","POSTINC","POSTDEC","ARROW", -}; -static char *yyrule[] = { -"$accept : prog", -"prog : progstart lineseq", -"block : '{' remember lineseq '}'", -"remember :", -"progstart :", -"mblock : '{' mremember lineseq '}'", -"mremember :", -"lineseq :", -"lineseq : lineseq decl", -"lineseq : lineseq line", -"line : label cond", -"line : loop", -"line : label ';'", -"line : label sideff ';'", -"sideff : error", -"sideff : expr", -"sideff : expr IF expr", -"sideff : expr UNLESS expr", -"sideff : expr WHILE expr", -"sideff : expr UNTIL iexpr", -"sideff : expr FOR expr", -"else :", -"else : ELSE mblock", -"else : ELSIF '(' mexpr ')' mblock else", -"cond : IF '(' remember mexpr ')' mblock else", -"cond : UNLESS '(' remember miexpr ')' mblock else", -"cont :", -"cont : CONTINUE block", -"loop : label WHILE '(' remember mtexpr ')' mblock cont", -"loop : label UNTIL '(' remember miexpr ')' mblock cont", -"loop : label FOR MY remember my_scalar '(' mexpr ')' mblock cont", -"loop : label FOR scalar '(' remember mexpr ')' mblock cont", -"loop : label FOR '(' remember mexpr ')' mblock cont", -"loop : label FOR '(' remember mnexpr ';' mtexpr ';' mnexpr ')' mblock", -"loop : label block cont", -"nexpr :", -"nexpr : sideff", -"texpr :", -"texpr : expr", -"iexpr : expr", -"mexpr : expr", -"mnexpr : nexpr", -"mtexpr : texpr", -"miexpr : iexpr", -"label :", -"label : LABEL", -"decl : format", -"decl : subrout", -"decl : mysubrout", -"decl : package", -"decl : use", -"format : FORMAT startformsub formname block", -"formname : WORD", -"formname :", -"mysubrout : MYSUB startsub subname proto subattrlist subbody", -"subrout : SUB startsub subname proto subattrlist subbody", -"startsub :", -"startanonsub :", -"startformsub :", -"subname : WORD", -"proto :", -"proto : THING", -"subattrlist :", -"subattrlist : COLONATTR THING", -"subattrlist : COLONATTR", -"myattrlist : COLONATTR THING", -"myattrlist : COLONATTR", -"subbody : block", -"subbody : ';'", -"package : PACKAGE WORD ';'", -"$$1 :", -"use : USE startsub $$1 WORD WORD listexpr ';'", -"expr : expr ANDOP expr", -"expr : expr OROP expr", -"expr : expr DOROP expr", -"expr : argexpr", -"argexpr : argexpr ','", -"argexpr : argexpr ',' term", -"argexpr : term", -"listop : LSTOP indirob argexpr", -"listop : FUNC '(' indirob expr ')'", -"listop : term ARROW method '(' listexprcom ')'", -"listop : term ARROW method", -"listop : METHOD indirob listexpr", -"listop : FUNCMETH indirob '(' listexprcom ')'", -"listop : LSTOP listexpr", -"listop : FUNC '(' listexprcom ')'", -"$$2 :", -"listop : LSTOPSUB startanonsub block $$2 listexpr", -"method : METHOD", -"method : scalar", -"subscripted : star '{' expr ';' '}'", -"subscripted : scalar '[' expr ']'", -"subscripted : term ARROW '[' expr ']'", -"subscripted : subscripted '[' expr ']'", -"subscripted : scalar '{' expr ';' '}'", -"subscripted : term ARROW '{' expr ';' '}'", -"subscripted : subscripted '{' expr ';' '}'", -"subscripted : term ARROW '(' ')'", -"subscripted : term ARROW '(' expr ')'", -"subscripted : subscripted '(' expr ')'", -"subscripted : subscripted '(' ')'", -"termbinop : term ASSIGNOP term", -"termbinop : term POWOP term", -"termbinop : term MULOP term", -"termbinop : term ADDOP term", -"termbinop : term SHIFTOP term", -"termbinop : term RELOP term", -"termbinop : term EQOP term", -"termbinop : term BITANDOP term", -"termbinop : term BITOROP term", -"termbinop : term DOTDOT term", -"termbinop : term ANDAND term", -"termbinop : term OROR term", -"termbinop : term DORDOR term", -"termbinop : term MATCHOP term", -"termunop : '-' term", -"termunop : '+' term", -"termunop : '!' term", -"termunop : '~' term", -"termunop : term POSTINC", -"termunop : term POSTDEC", -"termunop : PREINC term", -"termunop : PREDEC term", -"anonymous : '[' expr ']'", -"anonymous : '[' ']'", -"anonymous : HASHBRACK expr ';' '}'", -"anonymous : HASHBRACK ';' '}'", -"anonymous : ANONSUB startanonsub proto subattrlist block", -"termdo : DO term", -"termdo : DO block", -"termdo : DO WORD '(' ')'", -"termdo : DO WORD '(' expr ')'", -"termdo : DO scalar '(' ')'", -"termdo : DO scalar '(' expr ')'", -"term : termbinop", -"term : termunop", -"term : anonymous", -"term : termdo", -"term : term '?' term ':' term", -"term : REFGEN term", -"term : myattrterm", -"term : LOCAL term", -"term : '(' expr ')'", -"term : '(' ')'", -"term : scalar", -"term : star", -"term : hsh", -"term : ary", -"term : arylen", -"term : subscripted", -"term : '(' expr ')' '[' expr ']'", -"term : '(' ')' '[' expr ']'", -"term : ary '[' expr ']'", -"term : ary '{' expr ';' '}'", -"term : THING", -"term : amper", -"term : amper '(' ')'", -"term : amper '(' expr ')'", -"term : NOAMP WORD listexpr", -"term : LOOPEX", -"term : LOOPEX term", -"term : NOTOP argexpr", -"term : UNIOP", -"term : UNIOP block", -"term : UNIOP term", -"term : UNIOPSUB term", -"term : FUNC0", -"term : FUNC0 '(' ')'", -"term : FUNC0SUB", -"term : FUNC1 '(' ')'", -"term : FUNC1 '(' expr ')'", -"term : PMFUNC '(' term ')'", -"term : PMFUNC '(' term ',' term ')'", -"term : WORD", -"term : listop", -"myattrterm : MY myterm myattrlist", -"myattrterm : MY myterm", -"myterm : '(' expr ')'", -"myterm : '(' ')'", -"myterm : scalar", -"myterm : hsh", -"myterm : ary", -"listexpr :", -"listexpr : argexpr", -"listexprcom :", -"listexprcom : expr", -"listexprcom : expr ','", -"my_scalar : scalar", -"amper : '&' indirob", -"scalar : '$' indirob", -"ary : '@' indirob", -"hsh : '%' indirob", -"arylen : DOLSHARP indirob", -"star : '*' indirob", -"indirob : WORD", -"indirob : scalar", -"indirob : block", -"indirob : PRIVATEREF", -}; -#endif -#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 796 "perly.y" - /* PROGRAM */ - -/* more stuff added to make perly_c.diff easier to apply */ - -#ifdef yyparse -#undef yyparse -#endif -#define yyparse() Perl_yyparse(pTHX) - -#line 1508 "perly.c" -#define YYABORT goto yyabort -#define YYACCEPT goto yyaccept -#define YYERROR goto yyerrlab -int -yyparse() -{ - register int yym, yyn, yystate; - register short *yyssp; - register YYSTYPE *yyvsp; - short* yyss; - YYSTYPE* yyvs; - unsigned yystacksize = YYSTACKSIZE; - int retval = 0; -#if YYDEBUG - register char *yys; -#endif - - 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 - { - register int saved_errno = errno; -#ifdef VMS - register int saved_vaxc_errno = vaxc$errno; -#else - register int saved_vaxc_errno = 0; -#endif - if ((yys = getenv("YYDEBUG"))) - { - yyn = *yys; - if (yyn >= '0' && yyn <= '9') - yydebug = yyn - '0'; - } - else SETERRNO(saved_errno,saved_vaxc_errno); - } -#endif - - yynerrs = 0; - yyerrflag = 0; - yychar = (-1); - - /* - ** Initialize private stacks (yyparse may be called from an action) - */ - New(73, yyss, yystacksize, short); - New(73, yyvs, yystacksize, YYSTYPE); - ysave->yyss = yyss; - ysave->yyvs = yyvs; - if (!yyvs || !yyss) - goto yyoverflow; - - yyssp = yyss; - yyvsp = yyvs; - *yyssp = yystate = 0; - -yyloop: - if ((yyn = yydefred[yystate])) goto yyreduce; - if (yychar < 0) - { - if ((yychar = yylex()) < 0) yychar = 0; -#if YYDEBUG - if (yydebug) - { - yys = 0; - if (yychar <= YYMAXTOKEN) yys = yyname[yychar]; - if (!yys) yys = "illegal-symbol"; - PerlIO_printf(Perl_debug_log, "yydebug: state %d, reading %d (%s)\n", yystate, - yychar, yys); - } -#endif - } - if ((yyn = yysindex[yystate]) && (yyn += yychar) >= 0 && - yyn <= YYTABLESIZE && yycheck[yyn] == yychar) - { -#if YYDEBUG - if (yydebug) - PerlIO_printf(Perl_debug_log, "yydebug: state %d, shifting to state %d\n", - yystate, yytable[yyn]); -#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 - -#endif - - yyerror("syntax error"); -#ifdef lint - -#endif - - ++yynerrs; -yyinrecovery: - if (yyerrflag < 3) - { - yyerrflag = 3; - for (;;) - { - if ((yyn = yysindex[*yyssp]) && (yyn += YYERRCODE) >= 0 && - yyn <= YYTABLESIZE && yycheck[yyn] == YYERRCODE) - { -#if YYDEBUG - if (yydebug) - PerlIO_printf(Perl_debug_log, "yydebug: state %d, error recovery shifting\ - to state %d\n", *yyssp, yytable[yyn]); -#endif - if (yyssp >= yyss + yystacksize - 1) - { - /* - ** reallocate and recover. Note that pointers - ** have to be reset, or bad things will happen - */ - int yyps_index = (yyssp - yyss); - int yypv_index = (yyvsp - yyvs); - yystacksize += YYSTACKSIZE; - ysave->yyvs = Renew(yyvs, yystacksize, YYSTYPE); - ysave->yyss = Renew(yyss, yystacksize, short); - if (!yyvs || !yyss) - goto yyoverflow; - yyssp = yyss + yyps_index; - yyvsp = yyvs + yypv_index; - } - *++yyssp = yystate = yytable[yyn]; - *++yyvsp = yylval; - goto yyloop; - } - else - { -#if YYDEBUG - if (yydebug) - PerlIO_printf(Perl_debug_log, "yydebug: error recovery discarding state %d\n", - *yyssp); -#endif - if (yyssp <= yyss) goto yyabort; - --yyssp; - --yyvsp; - } - } - } - else - { - if (yychar == 0) goto yyabort; -#if YYDEBUG - if (yydebug) - { - yys = 0; - if (yychar <= YYMAXTOKEN) yys = yyname[yychar]; - if (!yys) yys = "illegal-symbol"; - PerlIO_printf(Perl_debug_log, "yydebug: state %d, error recovery discards token %d (%s)\n", - yystate, yychar, yys); - } -#endif - 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 131 "perly.y" -{ yyval.ival = yyvsp[-1].ival; newPROG(block_end(yyvsp[-1].ival,yyvsp[0].opval)); } -break; -case 2: -#line 136 "perly.y" -{ if (PL_copline > (line_t)yyvsp[-3].ival) - PL_copline = (line_t)yyvsp[-3].ival; - yyval.opval = block_end(yyvsp[-2].ival, yyvsp[-1].opval); } -break; -case 3: -#line 142 "perly.y" -{ yyval.ival = block_start(TRUE); } -break; -case 4: -#line 146 "perly.y" -{ -#if defined(YYDEBUG) && defined(DEBUGGING) - yydebug = (DEBUG_p_TEST); -#endif - PL_expect = XSTATE; yyval.ival = block_start(TRUE); - } -break; -case 5: -#line 156 "perly.y" -{ if (PL_copline > (line_t)yyvsp[-3].ival) - PL_copline = (line_t)yyvsp[-3].ival; - yyval.opval = block_end(yyvsp[-2].ival, yyvsp[-1].opval); } -break; -case 6: -#line 162 "perly.y" -{ yyval.ival = block_start(FALSE); } -break; -case 7: -#line 167 "perly.y" -{ yyval.opval = Nullop; } -break; -case 8: -#line 169 "perly.y" -{ yyval.opval = yyvsp[-1].opval; } -break; -case 9: -#line 171 "perly.y" -{ yyval.opval = append_list(OP_LINESEQ, - (LISTOP*)yyvsp[-1].opval, (LISTOP*)yyvsp[0].opval); - PL_pad_reset_pending = TRUE; - if (yyvsp[-1].opval && yyvsp[0].opval) PL_hints |= HINT_BLOCK_SCOPE; } -break; -case 10: -#line 179 "perly.y" -{ yyval.opval = newSTATEOP(0, yyvsp[-1].pval, yyvsp[0].opval); } -break; -case 12: -#line 182 "perly.y" -{ if (yyvsp[-1].pval != Nullch) { - yyval.opval = newSTATEOP(0, yyvsp[-1].pval, newOP(OP_NULL, 0)); - } - else { - yyval.opval = Nullop; - PL_copline = NOLINE; - } - PL_expect = XSTATE; } -break; -case 13: -#line 191 "perly.y" -{ yyval.opval = newSTATEOP(0, yyvsp[-2].pval, yyvsp[-1].opval); - PL_expect = XSTATE; } -break; -case 14: -#line 197 "perly.y" -{ yyval.opval = Nullop; } -break; -case 15: -#line 199 "perly.y" -{ yyval.opval = yyvsp[0].opval; } -break; -case 16: -#line 201 "perly.y" -{ yyval.opval = newLOGOP(OP_AND, 0, yyvsp[0].opval, yyvsp[-2].opval); } -break; -case 17: -#line 203 "perly.y" -{ yyval.opval = newLOGOP(OP_OR, 0, yyvsp[0].opval, yyvsp[-2].opval); } -break; -case 18: -#line 205 "perly.y" -{ yyval.opval = newLOOPOP(OPf_PARENS, 1, scalar(yyvsp[0].opval), yyvsp[-2].opval); } -break; -case 19: -#line 207 "perly.y" -{ yyval.opval = newLOOPOP(OPf_PARENS, 1, yyvsp[0].opval, yyvsp[-2].opval);} -break; -case 20: -#line 209 "perly.y" -{ yyval.opval = newFOROP(0, Nullch, (line_t)yyvsp[-1].ival, - Nullop, yyvsp[0].opval, yyvsp[-2].opval, Nullop); } -break; -case 21: -#line 215 "perly.y" -{ yyval.opval = Nullop; } -break; -case 22: -#line 217 "perly.y" -{ (yyvsp[0].opval)->op_flags |= OPf_PARENS; yyval.opval = scope(yyvsp[0].opval); } -break; -case 23: -#line 219 "perly.y" -{ PL_copline = (line_t)yyvsp[-5].ival; - yyval.opval = newCONDOP(0, yyvsp[-3].opval, scope(yyvsp[-1].opval), yyvsp[0].opval); - PL_hints |= HINT_BLOCK_SCOPE; } -break; -case 24: -#line 226 "perly.y" -{ PL_copline = (line_t)yyvsp[-6].ival; - yyval.opval = block_end(yyvsp[-4].ival, - newCONDOP(0, yyvsp[-3].opval, scope(yyvsp[-1].opval), yyvsp[0].opval)); } -break; -case 25: -#line 230 "perly.y" -{ PL_copline = (line_t)yyvsp[-6].ival; - yyval.opval = block_end(yyvsp[-4].ival, - newCONDOP(0, yyvsp[-3].opval, scope(yyvsp[-1].opval), yyvsp[0].opval)); } -break; -case 26: -#line 237 "perly.y" -{ yyval.opval = Nullop; } -break; -case 27: -#line 239 "perly.y" -{ yyval.opval = scope(yyvsp[0].opval); } -break; -case 28: -#line 244 "perly.y" -{ PL_copline = (line_t)yyvsp[-6].ival; - yyval.opval = block_end(yyvsp[-4].ival, - newSTATEOP(0, yyvsp[-7].pval, - newWHILEOP(0, 1, (LOOP*)Nullop, - yyvsp[-6].ival, yyvsp[-3].opval, yyvsp[-1].opval, yyvsp[0].opval))); } -break; -case 29: -#line 250 "perly.y" -{ PL_copline = (line_t)yyvsp[-6].ival; - yyval.opval = block_end(yyvsp[-4].ival, - newSTATEOP(0, yyvsp[-7].pval, - newWHILEOP(0, 1, (LOOP*)Nullop, - yyvsp[-6].ival, yyvsp[-3].opval, yyvsp[-1].opval, yyvsp[0].opval))); } -break; -case 30: -#line 256 "perly.y" -{ yyval.opval = block_end(yyvsp[-6].ival, - newFOROP(0, yyvsp[-9].pval, (line_t)yyvsp[-8].ival, yyvsp[-5].opval, yyvsp[-3].opval, yyvsp[-1].opval, yyvsp[0].opval)); } -break; -case 31: -#line 259 "perly.y" -{ yyval.opval = block_end(yyvsp[-4].ival, - newFOROP(0, yyvsp[-8].pval, (line_t)yyvsp[-7].ival, mod(yyvsp[-6].opval, OP_ENTERLOOP), - yyvsp[-3].opval, yyvsp[-1].opval, yyvsp[0].opval)); } -break; -case 32: -#line 263 "perly.y" -{ yyval.opval = block_end(yyvsp[-4].ival, - newFOROP(0, yyvsp[-7].pval, (line_t)yyvsp[-6].ival, Nullop, yyvsp[-3].opval, yyvsp[-1].opval, yyvsp[0].opval)); } -break; -case 33: -#line 267 "perly.y" -{ OP *forop; - PL_copline = (line_t)yyvsp[-9].ival; - forop = newSTATEOP(0, yyvsp[-10].pval, - newWHILEOP(0, 1, (LOOP*)Nullop, - yyvsp[-9].ival, scalar(yyvsp[-4].opval), - yyvsp[0].opval, yyvsp[-2].opval)); - if (yyvsp[-6].opval) { - forop = append_elem(OP_LINESEQ, - newSTATEOP(0, (yyvsp[-10].pval?savepv(yyvsp[-10].pval):Nullch), - yyvsp[-6].opval), - forop); - } - - yyval.opval = block_end(yyvsp[-7].ival, forop); } -break; -case 34: -#line 282 "perly.y" -{ yyval.opval = newSTATEOP(0, yyvsp[-2].pval, - newWHILEOP(0, 1, (LOOP*)Nullop, - NOLINE, Nullop, yyvsp[-1].opval, yyvsp[0].opval)); } -break; -case 35: -#line 289 "perly.y" -{ yyval.opval = Nullop; } -break; -case 37: -#line 295 "perly.y" -{ (void)scan_num("1", &yylval); yyval.opval = yylval.opval; } -break; -case 39: -#line 301 "perly.y" -{ yyval.opval = invert(scalar(yyvsp[0].opval)); } -break; -case 40: -#line 306 "perly.y" -{ yyval.opval = yyvsp[0].opval; intro_my(); } -break; -case 41: -#line 310 "perly.y" -{ yyval.opval = yyvsp[0].opval; intro_my(); } -break; -case 42: -#line 314 "perly.y" -{ yyval.opval = yyvsp[0].opval; intro_my(); } -break; -case 43: -#line 318 "perly.y" -{ yyval.opval = yyvsp[0].opval; intro_my(); } -break; -case 44: -#line 323 "perly.y" -{ yyval.pval = Nullch; } -break; -case 46: -#line 329 "perly.y" -{ yyval.ival = 0; } -break; -case 47: -#line 331 "perly.y" -{ yyval.ival = 0; } -break; -case 48: -#line 333 "perly.y" -{ yyval.ival = 0; } -break; -case 49: -#line 335 "perly.y" -{ yyval.ival = 0; } -break; -case 50: -#line 337 "perly.y" -{ yyval.ival = 0; } -break; -case 51: -#line 341 "perly.y" -{ newFORM(yyvsp[-2].ival, yyvsp[-1].opval, yyvsp[0].opval); } -break; -case 52: -#line 344 "perly.y" -{ yyval.opval = yyvsp[0].opval; } -break; -case 53: -#line 345 "perly.y" -{ yyval.opval = Nullop; } -break; -case 54: -#line 350 "perly.y" -{ newMYSUB(yyvsp[-4].ival, yyvsp[-3].opval, yyvsp[-2].opval, yyvsp[-1].opval, yyvsp[0].opval); } -break; -case 55: -#line 355 "perly.y" -{ newATTRSUB(yyvsp[-4].ival, yyvsp[-3].opval, yyvsp[-2].opval, yyvsp[-1].opval, yyvsp[0].opval); } -break; -case 56: -#line 359 "perly.y" -{ yyval.ival = start_subparse(FALSE, 0); } -break; -case 57: -#line 363 "perly.y" -{ yyval.ival = start_subparse(FALSE, CVf_ANON); } -break; -case 58: -#line 367 "perly.y" -{ yyval.ival = start_subparse(TRUE, 0); } -break; -case 59: -#line 371 "perly.y" -{ STRLEN n_a; char *name = SvPV(((SVOP*)yyvsp[0].opval)->op_sv,n_a); - if (strEQ(name, "BEGIN") || strEQ(name, "END") - || strEQ(name, "INIT") || strEQ(name, "CHECK")) - CvSPECIAL_on(PL_compcv); - yyval.opval = yyvsp[0].opval; } -break; -case 60: -#line 380 "perly.y" -{ yyval.opval = Nullop; } -break; -case 62: -#line 386 "perly.y" -{ yyval.opval = Nullop; } -break; -case 63: -#line 388 "perly.y" -{ yyval.opval = yyvsp[0].opval; } -break; -case 64: -#line 390 "perly.y" -{ yyval.opval = Nullop; } -break; -case 65: -#line 395 "perly.y" -{ yyval.opval = yyvsp[0].opval; } -break; -case 66: -#line 397 "perly.y" -{ yyval.opval = Nullop; } -break; -case 67: -#line 401 "perly.y" -{ yyval.opval = yyvsp[0].opval; } -break; -case 68: -#line 402 "perly.y" -{ yyval.opval = Nullop; PL_expect = XSTATE; } -break; -case 69: -#line 406 "perly.y" -{ package(yyvsp[-1].opval); } -break; -case 70: -#line 410 "perly.y" -{ CvSPECIAL_on(PL_compcv); /* It's a BEGIN {} */ } -break; -case 71: -#line 412 "perly.y" -{ utilize(yyvsp[-6].ival, yyvsp[-5].ival, yyvsp[-3].opval, yyvsp[-2].opval, yyvsp[-1].opval); } -break; -case 72: -#line 417 "perly.y" -{ yyval.opval = newLOGOP(OP_AND, 0, yyvsp[-2].opval, yyvsp[0].opval); } -break; -case 73: -#line 419 "perly.y" -{ yyval.opval = newLOGOP(yyvsp[-1].ival, 0, yyvsp[-2].opval, yyvsp[0].opval); } -break; -case 74: -#line 421 "perly.y" -{ yyval.opval = newLOGOP(OP_DOR, 0, yyvsp[-2].opval, yyvsp[0].opval); } -break; -case 76: -#line 427 "perly.y" -{ yyval.opval = yyvsp[-1].opval; } -break; -case 77: -#line 429 "perly.y" -{ yyval.opval = append_elem(OP_LIST, yyvsp[-2].opval, yyvsp[0].opval); } -break; -case 79: -#line 435 "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 438 "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 441 "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 446 "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 450 "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 455 "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 460 "perly.y" -{ yyval.opval = convert(yyvsp[-1].ival, 0, yyvsp[0].opval); } -break; -case 86: -#line 462 "perly.y" -{ yyval.opval = convert(yyvsp[-3].ival, 0, yyvsp[-1].opval); } -break; -case 87: -#line 464 "perly.y" -{ yyvsp[0].opval = newANONATTRSUB(yyvsp[-1].ival, 0, Nullop, yyvsp[0].opval); } -break; -case 88: -#line 466 "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 480 "perly.y" -{ yyval.opval = newBINOP(OP_GELEM, 0, yyvsp[-4].opval, scalar(yyvsp[-2].opval)); - PL_expect = XOPERATOR; } -break; -case 92: -#line 483 "perly.y" -{ yyval.opval = newBINOP(OP_AELEM, 0, oopsAV(yyvsp[-3].opval), scalar(yyvsp[-1].opval)); } -break; -case 93: -#line 485 "perly.y" -{ yyval.opval = newBINOP(OP_AELEM, 0, - ref(newAVREF(yyvsp[-4].opval),OP_RV2AV), - scalar(yyvsp[-1].opval));} -break; -case 94: -#line 489 "perly.y" -{ yyval.opval = newBINOP(OP_AELEM, 0, - ref(newAVREF(yyvsp[-3].opval),OP_RV2AV), - scalar(yyvsp[-1].opval));} -break; -case 95: -#line 493 "perly.y" -{ yyval.opval = newBINOP(OP_HELEM, 0, oopsHV(yyvsp[-4].opval), jmaybe(yyvsp[-2].opval)); - PL_expect = XOPERATOR; } -break; -case 96: -#line 496 "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 501 "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 506 "perly.y" -{ yyval.opval = newUNOP(OP_ENTERSUB, OPf_STACKED, - newCVREF(0, scalar(yyvsp[-3].opval))); } -break; -case 99: -#line 509 "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 514 "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 518 "perly.y" -{ yyval.opval = newUNOP(OP_ENTERSUB, OPf_STACKED, - newCVREF(0, scalar(yyvsp[-2].opval))); } -break; -case 102: -#line 524 "perly.y" -{ yyval.opval = newASSIGNOP(OPf_STACKED, yyvsp[-2].opval, yyvsp[-1].ival, yyvsp[0].opval); } -break; -case 103: -#line 526 "perly.y" -{ yyval.opval = newBINOP(yyvsp[-1].ival, 0, scalar(yyvsp[-2].opval), scalar(yyvsp[0].opval)); } -break; -case 104: -#line 528 "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 532 "perly.y" -{ yyval.opval = newBINOP(yyvsp[-1].ival, 0, scalar(yyvsp[-2].opval), scalar(yyvsp[0].opval)); } -break; -case 106: -#line 534 "perly.y" -{ yyval.opval = newBINOP(yyvsp[-1].ival, 0, scalar(yyvsp[-2].opval), scalar(yyvsp[0].opval)); } -break; -case 107: -#line 536 "perly.y" -{ yyval.opval = newBINOP(yyvsp[-1].ival, 0, scalar(yyvsp[-2].opval), scalar(yyvsp[0].opval)); } -break; -case 108: -#line 538 "perly.y" -{ yyval.opval = newBINOP(yyvsp[-1].ival, 0, scalar(yyvsp[-2].opval), scalar(yyvsp[0].opval)); } -break; -case 109: -#line 540 "perly.y" -{ yyval.opval = newBINOP(yyvsp[-1].ival, 0, scalar(yyvsp[-2].opval), scalar(yyvsp[0].opval)); } -break; -case 110: -#line 542 "perly.y" -{ yyval.opval = newBINOP(yyvsp[-1].ival, 0, scalar(yyvsp[-2].opval), scalar(yyvsp[0].opval)); } -break; -case 111: -#line 544 "perly.y" -{ yyval.opval = newRANGE(yyvsp[-1].ival, scalar(yyvsp[-2].opval), scalar(yyvsp[0].opval));} -break; -case 112: -#line 546 "perly.y" -{ yyval.opval = newLOGOP(OP_AND, 0, yyvsp[-2].opval, yyvsp[0].opval); } -break; -case 113: -#line 548 "perly.y" -{ yyval.opval = newLOGOP(OP_OR, 0, yyvsp[-2].opval, yyvsp[0].opval); } -break; -case 114: -#line 550 "perly.y" -{ yyval.opval = newLOGOP(OP_DOR, 0, yyvsp[-2].opval, yyvsp[0].opval); } -break; -case 115: -#line 552 "perly.y" -{ yyval.opval = bind_match(yyvsp[-1].ival, yyvsp[-2].opval, yyvsp[0].opval); } -break; -case 116: -#line 557 "perly.y" -{ yyval.opval = newUNOP(OP_NEGATE, 0, scalar(yyvsp[0].opval)); } -break; -case 117: -#line 559 "perly.y" -{ yyval.opval = yyvsp[0].opval; } -break; -case 118: -#line 561 "perly.y" -{ yyval.opval = newUNOP(OP_NOT, 0, scalar(yyvsp[0].opval)); } -break; -case 119: -#line 563 "perly.y" -{ yyval.opval = newUNOP(OP_COMPLEMENT, 0, scalar(yyvsp[0].opval));} -break; -case 120: -#line 565 "perly.y" -{ yyval.opval = newUNOP(OP_POSTINC, 0, - mod(scalar(yyvsp[-1].opval), OP_POSTINC)); } -break; -case 121: -#line 568 "perly.y" -{ yyval.opval = newUNOP(OP_POSTDEC, 0, - mod(scalar(yyvsp[-1].opval), OP_POSTDEC)); } -break; -case 122: -#line 571 "perly.y" -{ yyval.opval = newUNOP(OP_PREINC, 0, - mod(scalar(yyvsp[0].opval), OP_PREINC)); } -break; -case 123: -#line 574 "perly.y" -{ yyval.opval = newUNOP(OP_PREDEC, 0, - mod(scalar(yyvsp[0].opval), OP_PREDEC)); } -break; -case 124: -#line 581 "perly.y" -{ yyval.opval = newANONLIST(yyvsp[-1].opval); } -break; -case 125: -#line 583 "perly.y" -{ yyval.opval = newANONLIST(Nullop); } -break; -case 126: -#line 585 "perly.y" -{ yyval.opval = newANONHASH(yyvsp[-2].opval); } -break; -case 127: -#line 587 "perly.y" -{ yyval.opval = newANONHASH(Nullop); } -break; -case 128: -#line 589 "perly.y" -{ yyval.opval = newANONATTRSUB(yyvsp[-3].ival, yyvsp[-2].opval, yyvsp[-1].opval, yyvsp[0].opval); } -break; -case 129: -#line 595 "perly.y" -{ yyval.opval = dofile(yyvsp[0].opval); } -break; -case 130: -#line 597 "perly.y" -{ yyval.opval = newUNOP(OP_NULL, OPf_SPECIAL, scope(yyvsp[0].opval)); } -break; -case 131: -#line 599 "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 132: -#line 607 "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 133: -#line 616 "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 134: -#line 620 "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 139: -#line 632 "perly.y" -{ yyval.opval = newCONDOP(0, yyvsp[-4].opval, yyvsp[-2].opval, yyvsp[0].opval); } -break; -case 140: -#line 634 "perly.y" -{ yyval.opval = newUNOP(OP_REFGEN, 0, mod(yyvsp[0].opval,OP_REFGEN)); } -break; -case 141: -#line 636 "perly.y" -{ yyval.opval = yyvsp[0].opval; } -break; -case 142: -#line 638 "perly.y" -{ yyval.opval = localize(yyvsp[0].opval,yyvsp[-1].ival); } -break; -case 143: -#line 640 "perly.y" -{ yyval.opval = sawparens(yyvsp[-1].opval); } -break; -case 144: -#line 642 "perly.y" -{ yyval.opval = sawparens(newNULLLIST()); } -break; -case 145: -#line 644 "perly.y" -{ yyval.opval = yyvsp[0].opval; } -break; -case 146: -#line 646 "perly.y" -{ yyval.opval = yyvsp[0].opval; } -break; -case 147: -#line 648 "perly.y" -{ yyval.opval = yyvsp[0].opval; } -break; -case 148: -#line 650 "perly.y" -{ yyval.opval = yyvsp[0].opval; } -break; -case 149: -#line 652 "perly.y" -{ yyval.opval = newUNOP(OP_AV2ARYLEN, 0, ref(yyvsp[0].opval, OP_AV2ARYLEN));} -break; -case 150: -#line 654 "perly.y" -{ yyval.opval = yyvsp[0].opval; } -break; -case 151: -#line 656 "perly.y" -{ yyval.opval = newSLICEOP(0, yyvsp[-1].opval, yyvsp[-4].opval); } -break; -case 152: -#line 658 "perly.y" -{ yyval.opval = newSLICEOP(0, yyvsp[-1].opval, Nullop); } -break; -case 153: -#line 660 "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 154: -#line 666 "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 155: -#line 673 "perly.y" -{ yyval.opval = yyvsp[0].opval; } -break; -case 156: -#line 675 "perly.y" -{ yyval.opval = newUNOP(OP_ENTERSUB, 0, scalar(yyvsp[0].opval)); } -break; -case 157: -#line 677 "perly.y" -{ yyval.opval = newUNOP(OP_ENTERSUB, OPf_STACKED, scalar(yyvsp[-2].opval)); } -break; -case 158: -#line 679 "perly.y" -{ yyval.opval = newUNOP(OP_ENTERSUB, OPf_STACKED, - append_elem(OP_LIST, yyvsp[-1].opval, scalar(yyvsp[-3].opval))); } -break; -case 159: -#line 682 "perly.y" -{ yyval.opval = newUNOP(OP_ENTERSUB, OPf_STACKED, - append_elem(OP_LIST, yyvsp[0].opval, scalar(yyvsp[-1].opval))); } -break; -case 160: -#line 685 "perly.y" -{ yyval.opval = newOP(yyvsp[0].ival, OPf_SPECIAL); - PL_hints |= HINT_BLOCK_SCOPE; } -break; -case 161: -#line 688 "perly.y" -{ yyval.opval = newLOOPEX(yyvsp[-1].ival,yyvsp[0].opval); } -break; -case 162: -#line 690 "perly.y" -{ yyval.opval = newUNOP(OP_NOT, 0, scalar(yyvsp[0].opval)); } -break; -case 163: -#line 692 "perly.y" -{ yyval.opval = newOP(yyvsp[0].ival, 0); } -break; -case 164: -#line 694 "perly.y" -{ yyval.opval = newUNOP(yyvsp[-1].ival, 0, yyvsp[0].opval); } -break; -case 165: -#line 696 "perly.y" -{ yyval.opval = newUNOP(yyvsp[-1].ival, 0, yyvsp[0].opval); } -break; -case 166: -#line 698 "perly.y" -{ yyval.opval = newUNOP(OP_ENTERSUB, OPf_STACKED, - append_elem(OP_LIST, yyvsp[0].opval, scalar(yyvsp[-1].opval))); } -break; -case 167: -#line 701 "perly.y" -{ yyval.opval = newOP(yyvsp[0].ival, 0); } -break; -case 168: -#line 703 "perly.y" -{ yyval.opval = newOP(yyvsp[-2].ival, 0); } -break; -case 169: -#line 705 "perly.y" -{ yyval.opval = newUNOP(OP_ENTERSUB, OPf_STACKED, - scalar(yyvsp[0].opval)); } -break; -case 170: -#line 708 "perly.y" -{ yyval.opval = newOP(yyvsp[-2].ival, OPf_SPECIAL); } -break; -case 171: -#line 710 "perly.y" -{ yyval.opval = newUNOP(yyvsp[-3].ival, 0, yyvsp[-1].opval); } -break; -case 172: -#line 712 "perly.y" -{ yyval.opval = pmruntime(yyvsp[-3].opval, yyvsp[-1].opval, Nullop); } -break; -case 173: -#line 714 "perly.y" -{ yyval.opval = pmruntime(yyvsp[-5].opval, yyvsp[-3].opval, yyvsp[-1].opval); } -break; -case 176: -#line 721 "perly.y" -{ yyval.opval = my_attrs(yyvsp[-1].opval,yyvsp[0].opval); } -break; -case 177: -#line 723 "perly.y" -{ yyval.opval = localize(yyvsp[0].opval,yyvsp[-1].ival); } -break; -case 178: -#line 728 "perly.y" -{ yyval.opval = sawparens(yyvsp[-1].opval); } -break; -case 179: -#line 730 "perly.y" -{ yyval.opval = sawparens(newNULLLIST()); } -break; -case 180: -#line 732 "perly.y" -{ yyval.opval = yyvsp[0].opval; } -break; -case 181: -#line 734 "perly.y" -{ yyval.opval = yyvsp[0].opval; } -break; -case 182: -#line 736 "perly.y" -{ yyval.opval = yyvsp[0].opval; } -break; -case 183: -#line 741 "perly.y" -{ yyval.opval = Nullop; } -break; -case 184: -#line 743 "perly.y" -{ yyval.opval = yyvsp[0].opval; } -break; -case 185: -#line 747 "perly.y" -{ yyval.opval = Nullop; } -break; -case 186: -#line 749 "perly.y" -{ yyval.opval = yyvsp[0].opval; } -break; -case 187: -#line 751 "perly.y" -{ yyval.opval = yyvsp[-1].opval; } -break; -case 188: -#line 757 "perly.y" -{ PL_in_my = 0; yyval.opval = my(yyvsp[0].opval); } -break; -case 189: -#line 761 "perly.y" -{ yyval.opval = newCVREF(yyvsp[-1].ival,yyvsp[0].opval); } -break; -case 190: -#line 765 "perly.y" -{ yyval.opval = newSVREF(yyvsp[0].opval); } -break; -case 191: -#line 769 "perly.y" -{ yyval.opval = newAVREF(yyvsp[0].opval); } -break; -case 192: -#line 773 "perly.y" -{ yyval.opval = newHVREF(yyvsp[0].opval); } -break; -case 193: -#line 777 "perly.y" -{ yyval.opval = newAVREF(yyvsp[0].opval); } -break; -case 194: -#line 781 "perly.y" -{ yyval.opval = newGVREF(0,yyvsp[0].opval); } -break; -case 195: -#line 786 "perly.y" -{ yyval.opval = scalar(yyvsp[0].opval); } -break; -case 196: -#line 788 "perly.y" -{ yyval.opval = scalar(yyvsp[0].opval); } -break; -case 197: -#line 790 "perly.y" -{ yyval.opval = scope(yyvsp[0].opval); } -break; -case 198: -#line 793 "perly.y" -{ yyval.opval = yyvsp[0].opval; } -break; -#line 2563 "perly.c" - } - yyssp -= yym; - yystate = *yyssp; - yyvsp -= yym; - yym = yylhs[yyn]; - if (yystate == 0 && yym == 0) - { -#if YYDEBUG - if (yydebug) - PerlIO_printf(Perl_debug_log, "yydebug: after reduction, shifting from state 0 to\ - state %d\n", YYFINAL); -#endif - yystate = YYFINAL; - *++yyssp = YYFINAL; - *++yyvsp = yyval; - if (yychar < 0) - { - if ((yychar = yylex()) < 0) yychar = 0; -#if YYDEBUG - if (yydebug) - { - yys = 0; - if (yychar <= YYMAXTOKEN) yys = yyname[yychar]; - if (!yys) yys = "illegal-symbol"; - PerlIO_printf(Perl_debug_log, "yydebug: state %d, reading %d (%s)\n", - YYFINAL, yychar, yys); - } -#endif - } - if (yychar == 0) goto yyaccept; - goto yyloop; - } - if ((yyn = yygindex[yym]) && (yyn += yystate) >= 0 && - yyn <= YYTABLESIZE && yycheck[yyn] == yystate) - yystate = yytable[yyn]; - else - yystate = yydgoto[yym]; -#if YYDEBUG - if (yydebug) - PerlIO_printf(Perl_debug_log, "yydebug: after reduction, shifting from state %d \ -to state %d\n", *yyssp, yystate); -#endif - if (yyssp >= yyss + yystacksize - 1) - { - /* - ** reallocate and recover. Note that pointers - ** have to be reset, or bad things will happen - */ - int yyps_index = (yyssp - yyss); - int yypv_index = (yyvsp - yyvs); - yystacksize += YYSTACKSIZE; - ysave->yyvs = Renew(yyvs, yystacksize, YYSTYPE); - ysave->yyss = Renew(yyss, yystacksize, short); - if (!yyvs || !yyss) - goto yyoverflow; - yyssp = yyss + yyps_index; - yyvsp = yyvs + yypv_index; - } - *++yyssp = yystate; - *++yyvsp = yyval; - goto yyloop; -yyoverflow: - yyerror("Out of memory for yacc stack"); -yyabort: - retval = 1; -yyaccept: -#ifdef USE_ITHREADS - LEAVE; /* force yydestruct() before we return */ -#endif - return retval; -} - -static void -yydestruct(pTHX_ void *ptr) -{ - struct ysv* ysave = (struct ysv*)ptr; - if (ysave->yyss) Safefree(ysave->yyss); - if (ysave->yyvs) Safefree(ysave->yyvs); - yydebug = ysave->oldyydebug; - yynerrs = ysave->oldyynerrs; - yyerrflag = ysave->oldyyerrflag; - yychar = ysave->oldyychar; - yyval = ysave->oldyyval; - yylval = ysave->oldyylval; - Safefree(ysave); -} diff --git a/vms/perly_h.vms b/vms/perly_h.vms deleted file mode 100644 index d45735fc32..0000000000 --- a/vms/perly_h.vms +++ /dev/null @@ -1,78 +0,0 @@ -/* Postprocessed by vms_yfix.pl 1.11 to add VMS declarations of globals */ -#ifdef PERL_CORE -#define WORD 257 -#define METHOD 258 -#define FUNCMETH 259 -#define THING 260 -#define PMFUNC 261 -#define PRIVATEREF 262 -#define FUNC0SUB 263 -#define UNIOPSUB 264 -#define LSTOPSUB 265 -#define LABEL 266 -#define FORMAT 267 -#define SUB 268 -#define ANONSUB 269 -#define PACKAGE 270 -#define USE 271 -#define WHILE 272 -#define UNTIL 273 -#define IF 274 -#define UNLESS 275 -#define ELSE 276 -#define ELSIF 277 -#define CONTINUE 278 -#define FOR 279 -#define LOOPEX 280 -#define DOTDOT 281 -#define FUNC0 282 -#define FUNC1 283 -#define FUNC 284 -#define UNIOP 285 -#define LSTOP 286 -#define RELOP 287 -#define EQOP 288 -#define MULOP 289 -#define ADDOP 290 -#define DOLSHARP 291 -#define DO 292 -#define HASHBRACK 293 -#define NOAMP 294 -#define LOCAL 295 -#define MY 296 -#define MYSUB 297 -#define COLONATTR 298 -#define PREC_LOW 299 -#define OROP 300 -#define DOROP 301 -#define ANDOP 302 -#define NOTOP 303 -#define ASSIGNOP 304 -#define OROR 305 -#define DORDOR 306 -#define ANDAND 307 -#define BITOROP 308 -#define BITANDOP 309 -#define SHIFTOP 310 -#define MATCHOP 311 -#define UMINUS 312 -#define REFGEN 313 -#define POWOP 314 -#define PREINC 315 -#define PREDEC 316 -#define POSTINC 317 -#define POSTDEC 318 -#define ARROW 319 -#endif /* PERL_CORE */ - -typedef union { - I32 ival; - char *pval; - OP *opval; - GV *gvval; -} YYSTYPE; -#ifndef vax11c - extern YYSTYPE yylval; -#else - globalref YYSTYPE yylval; -#endif diff --git a/vms/vms_yfix.pl b/vms/vms_yfix.pl deleted file mode 100644 index 37fefad3cc..0000000000 --- a/vms/vms_yfix.pl +++ /dev/null @@ -1,70 +0,0 @@ -# This script takes the output produced from perly.y by byacc and -# the perly.fixer shell script (i.e. the perly.c and perly.h built -# for Unix systems) and patches them to produce copies containing -# appropriate declarations for VMS handling of global symbols. -# -# If it finds that the input files are already patches for VMS, -# it just copies the input to the output. -# -# Revised 20-Dec-1996 by Charles Bailey bailey@newman.upenn.edu - -$VERSION = '1.11'; - -push(@ARGV,(qw[ perly.c perly.h vms/perly_c.vms vms/perly_h.vms])[@ARGV..4]) - if @ARGV < 4; -($cinfile,$hinfile,$coutfile,$houtfile) = @ARGV; - -open C,$cinfile or die "Can't read $cinfile: $!\n"; -open COUT, ">$coutfile" or die "Can't create $coutfile: $!\n"; -print COUT <<EOH; -/* Postprocessed by vms_yfix.pl $VERSION to add VMS declarations of globals */ -EOH -while (<C>) { - # "y.tab.c" is illegal as a VMS filename; DECC 5.2/VAX preprocessor - # doesn't like this. - if ( s/^#line\s+(\d+)\s+"y.tab.c"/#line $1 "y_tab.c"/ ) { 1; } - elsif (/char \*getenv/) { - # accomodate old VAXC's macro susbstitution pecularities - $_ = "# ifndef getenv\n$_# endif\n"; - } - elsif ( /getenv\("YYDEBUG"\)/ ) { - $_ = " {\n register int saved_errno = errno;\n" - . "#ifdef VMS\n register int saved_vaxc_errno = vaxc\$errno;\n" - . "#else\n register int saved_vaxc_errno = 0;\n#endif\n" . $_; - # Reset the "error" status if an optional lookup fails - while (not /^\s+\}/) { print COUT; $_ = <C>; } - $_ .= " else SETERRNO(saved_errno,saved_vaxc_errno);\n }\n"; - } - else { - # add the dEXT tag to definitions of global vars, so we'll insert - # a globaldef when perly.c is compiled - s/^(short|int|YYSTYPE|char \*)\s*yy/dEXT $1 yy/; - } - print COUT; -} -close C; -close COUT; - -open H,$hinfile or die "Can't read $hinfile: $!\n"; -open HOUT, ">$houtfile" or die "Can't create $houtfile: $!\n"; -print HOUT <<EOH; -/* Postprocessed by vms_yfix.pl $VERSION to add VMS declarations of globals */ -EOH -$hfixed = 0; # keep -w happy -while (<H>) { - $hfixed = /globalref/ unless $hfixed; # we've already got a fixed copy - next if /^extern YYSTYPE yylval/; # we've got a Unix version, and this - # is what we want to replace - print HOUT; -} -close H; - -print HOUT <<'EODECL' unless $hfixed; -#ifndef vax11c - extern YYSTYPE yylval; -#else - globalref YYSTYPE yylval; -#endif -EODECL - -close HOUT; |