This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
support "package Foo { ... }"
authorZefram <zefram@fysh.org>
Mon, 19 Apr 2010 19:37:25 +0000 (20:37 +0100)
committerDavid Golden <dagolden@cpan.org>
Thu, 20 May 2010 22:56:11 +0000 (18:56 -0400)
Package block syntax limits the scope of the package declaration to the
attached block.  It's cleaner than requiring the declaration to come
inside the block.

MANIFEST
perly.act
perly.h
perly.tab
perly.y
pod/perlfunc.pod
t/comp/package_block.t [new file with mode: 0644]
toke.c
util.c

index 4fac574..d31a378 100644 (file)
--- a/MANIFEST
+++ b/MANIFEST
@@ -4207,6 +4207,7 @@ t/comp/line_debug.t               See if @{"_<$file"} works
 t/comp/multiline.t             See if multiline strings work
 t/comp/opsubs.t                        See if q() etc. are not parsed as functions
 t/comp/our.t                   Tests for our declaration
+t/comp/package_block.t         See if package block syntax works
 t/comp/package.t               See if packages work
 t/comp/parser.t                        See if the parser works in edge cases
 t/comp/proto.t                 See if function prototypes work
index 6d20c29..3aee1d5 100644 (file)
--- a/perly.act
+++ b/perly.act
@@ -127,74 +127,83 @@ case 2:
 
   case 18:
 #line 246 "perly.y"
-    { (yyval.opval) = newSTATEOP(0, PVAL((ps[(1) - (2)].val.p_tkval)), (ps[(2) - (2)].val.opval)); ;}
+    { (yyval.opval) = newSTATEOP(0, NULL,
+                                newWHILEOP(0, 1, (LOOP*)(OP*)NULL,
+                                           NOLINE, (OP*)NULL, (ps[(1) - (1)].val.opval),
+                                           (OP*)NULL, 0));
+                         TOKEN_GETMAD((ps[(1) - (1)].val.opval),((LISTOP*)(yyval.opval))->op_first,'L'); ;}
     break;
 
   case 19:
-#line 251 "perly.y"
-    { (yyval.opval) = (OP*)NULL; ;}
+#line 252 "perly.y"
+    { (yyval.opval) = newSTATEOP(0, PVAL((ps[(1) - (2)].val.p_tkval)), (ps[(2) - (2)].val.opval)); ;}
     break;
 
   case 20:
-#line 253 "perly.y"
-    { (yyval.opval) = (ps[(1) - (1)].val.opval); ;}
+#line 257 "perly.y"
+    { (yyval.opval) = (OP*)NULL; ;}
     break;
 
   case 21:
-#line 255 "perly.y"
+#line 259 "perly.y"
+    { (yyval.opval) = (ps[(1) - (1)].val.opval); ;}
+    break;
+
+  case 22:
+#line 261 "perly.y"
     { (yyval.opval) = newLOGOP(OP_AND, 0, (ps[(3) - (3)].val.opval), (ps[(1) - (3)].val.opval));
                          TOKEN_GETMAD((ps[(2) - (3)].val.i_tkval),(yyval.opval),'i');
                        ;}
     break;
 
-  case 22:
-#line 259 "perly.y"
+  case 23:
+#line 265 "perly.y"
     { (yyval.opval) = newLOGOP(OP_OR, 0, (ps[(3) - (3)].val.opval), (ps[(1) - (3)].val.opval));
                          TOKEN_GETMAD((ps[(2) - (3)].val.i_tkval),(yyval.opval),'i');
                        ;}
     break;
 
-  case 23:
-#line 263 "perly.y"
+  case 24:
+#line 269 "perly.y"
     { (yyval.opval) = newLOOPOP(OPf_PARENS, 1, scalar((ps[(3) - (3)].val.opval)), (ps[(1) - (3)].val.opval));
                          TOKEN_GETMAD((ps[(2) - (3)].val.i_tkval),(yyval.opval),'w');
                        ;}
     break;
 
-  case 24:
-#line 267 "perly.y"
+  case 25:
+#line 273 "perly.y"
     { (yyval.opval) = newLOOPOP(OPf_PARENS, 1, (ps[(3) - (3)].val.opval), (ps[(1) - (3)].val.opval));
                          TOKEN_GETMAD((ps[(2) - (3)].val.i_tkval),(yyval.opval),'w');
                        ;}
     break;
 
-  case 25:
-#line 271 "perly.y"
+  case 26:
+#line 277 "perly.y"
     { (yyval.opval) = newFOROP(0, NULL, (line_t)IVAL((ps[(2) - (3)].val.i_tkval)),
                                        (OP*)NULL, (ps[(3) - (3)].val.opval), (ps[(1) - (3)].val.opval), (OP*)NULL);
                          TOKEN_GETMAD((ps[(2) - (3)].val.i_tkval),((LISTOP*)(yyval.opval))->op_first->op_sibling,'w');
                        ;}
     break;
 
-  case 26:
-#line 276 "perly.y"
+  case 27:
+#line 282 "perly.y"
     { (yyval.opval) = newWHENOP((ps[(3) - (3)].val.opval), scope((ps[(1) - (3)].val.opval))); ;}
     break;
 
-  case 27:
-#line 281 "perly.y"
+  case 28:
+#line 287 "perly.y"
     { (yyval.opval) = (OP*)NULL; ;}
     break;
 
-  case 28:
-#line 283 "perly.y"
+  case 29:
+#line 289 "perly.y"
     { ((ps[(2) - (2)].val.opval))->op_flags |= OPf_PARENS; (yyval.opval) = scope((ps[(2) - (2)].val.opval));
                          TOKEN_GETMAD((ps[(1) - (2)].val.i_tkval),(yyval.opval),'o');
                        ;}
     break;
 
-  case 29:
-#line 287 "perly.y"
+  case 30:
+#line 293 "perly.y"
     { PL_parser->copline = (line_t)IVAL((ps[(1) - (6)].val.i_tkval));
                            (yyval.opval) = newCONDOP(0, newSTATEOP(OPf_SPECIAL,NULL,(ps[(3) - (6)].val.opval)), scope((ps[(5) - (6)].val.opval)), (ps[(6) - (6)].val.opval));
                            PL_hints |= HINT_BLOCK_SCOPE;
@@ -204,8 +213,8 @@ case 2:
                        ;}
     break;
 
-  case 30:
-#line 298 "perly.y"
+  case 31:
+#line 304 "perly.y"
     { PL_parser->copline = (line_t)IVAL((ps[(1) - (7)].val.i_tkval));
                            (yyval.opval) = block_end((ps[(3) - (7)].val.ival),
                                   newCONDOP(0, (ps[(4) - (7)].val.opval), scope((ps[(6) - (7)].val.opval)), (ps[(7) - (7)].val.opval)));
@@ -215,8 +224,8 @@ case 2:
                        ;}
     break;
 
-  case 31:
-#line 306 "perly.y"
+  case 32:
+#line 312 "perly.y"
     { PL_parser->copline = (line_t)IVAL((ps[(1) - (7)].val.i_tkval));
                            (yyval.opval) = block_end((ps[(3) - (7)].val.ival),
                                   newCONDOP(0, (ps[(4) - (7)].val.opval), scope((ps[(6) - (7)].val.opval)), (ps[(7) - (7)].val.opval)));
@@ -226,31 +235,31 @@ case 2:
                        ;}
     break;
 
-  case 32:
-#line 317 "perly.y"
+  case 33:
+#line 323 "perly.y"
     { (yyval.opval) = block_end((ps[(3) - (6)].val.ival),
                newWHENOP((ps[(4) - (6)].val.opval), scope((ps[(6) - (6)].val.opval)))); ;}
     break;
 
-  case 33:
-#line 320 "perly.y"
+  case 34:
+#line 326 "perly.y"
     { (yyval.opval) = newWHENOP(0, scope((ps[(2) - (2)].val.opval))); ;}
     break;
 
-  case 34:
-#line 325 "perly.y"
+  case 35:
+#line 331 "perly.y"
     { (yyval.opval) = (OP*)NULL; ;}
     break;
 
-  case 35:
-#line 327 "perly.y"
+  case 36:
+#line 333 "perly.y"
     { (yyval.opval) = scope((ps[(2) - (2)].val.opval));
                          TOKEN_GETMAD((ps[(1) - (2)].val.i_tkval),(yyval.opval),'o');
                        ;}
     break;
 
-  case 36:
-#line 334 "perly.y"
+  case 37:
+#line 340 "perly.y"
     { OP *innerop;
                          PL_parser->copline = (line_t)IVAL((ps[(2) - (9)].val.i_tkval));
                            (yyval.opval) = block_end((ps[(4) - (9)].val.ival),
@@ -264,8 +273,8 @@ case 2:
                        ;}
     break;
 
-  case 37:
-#line 347 "perly.y"
+  case 38:
+#line 353 "perly.y"
     { OP *innerop;
                          PL_parser->copline = (line_t)IVAL((ps[(2) - (9)].val.i_tkval));
                            (yyval.opval) = block_end((ps[(4) - (9)].val.ival),
@@ -279,8 +288,8 @@ case 2:
                        ;}
     break;
 
-  case 38:
-#line 359 "perly.y"
+  case 39:
+#line 365 "perly.y"
     { OP *innerop;
                          (yyval.opval) = block_end((ps[(4) - (10)].val.ival),
                             innerop = newFOROP(0, PVAL((ps[(1) - (10)].val.p_tkval)), (line_t)IVAL((ps[(2) - (10)].val.i_tkval)),
@@ -293,8 +302,8 @@ case 2:
                        ;}
     break;
 
-  case 39:
-#line 370 "perly.y"
+  case 40:
+#line 376 "perly.y"
     { OP *innerop;
                          (yyval.opval) = block_end((ps[(5) - (9)].val.ival),
                             innerop = newFOROP(0, PVAL((ps[(1) - (9)].val.p_tkval)), (line_t)IVAL((ps[(2) - (9)].val.i_tkval)),
@@ -306,8 +315,8 @@ case 2:
                        ;}
     break;
 
-  case 40:
-#line 380 "perly.y"
+  case 41:
+#line 386 "perly.y"
     { OP *innerop;
                          (yyval.opval) = block_end((ps[(4) - (8)].val.ival),
                             innerop = newFOROP(0, PVAL((ps[(1) - (8)].val.p_tkval)), (line_t)IVAL((ps[(2) - (8)].val.i_tkval)),
@@ -319,8 +328,8 @@ case 2:
                        ;}
     break;
 
-  case 41:
-#line 392 "perly.y"
+  case 42:
+#line 398 "perly.y"
     { OP *forop;
                          PL_parser->copline = (line_t)IVAL((ps[(2) - (12)].val.i_tkval));
                          forop = newSTATEOP(0, PVAL((ps[(1) - (12)].val.p_tkval)),
@@ -352,16 +361,16 @@ case 2:
                          (yyval.opval) = block_end((ps[(4) - (12)].val.ival), forop); ;}
     break;
 
-  case 42:
-#line 422 "perly.y"
+  case 43:
+#line 428 "perly.y"
     { (yyval.opval) = newSTATEOP(0, PVAL((ps[(1) - (3)].val.p_tkval)),
                                 newWHILEOP(0, 1, (LOOP*)(OP*)NULL,
                                            NOLINE, (OP*)NULL, (ps[(2) - (3)].val.opval), (ps[(3) - (3)].val.opval), 0));
                          TOKEN_GETMAD((ps[(1) - (3)].val.p_tkval),((LISTOP*)(yyval.opval))->op_first,'L'); ;}
     break;
 
-  case 43:
-#line 430 "perly.y"
+  case 44:
+#line 436 "perly.y"
     { PL_parser->copline = (line_t) IVAL((ps[(2) - (8)].val.i_tkval));
                            (yyval.opval) = block_end((ps[(4) - (8)].val.ival),
                                newSTATEOP(0, PVAL((ps[(1) - (8)].val.p_tkval)),
@@ -369,47 +378,47 @@ case 2:
                                        (PADOFFSET) (ps[(5) - (8)].val.ival)) )); ;}
     break;
 
-  case 44:
-#line 439 "perly.y"
+  case 45:
+#line 445 "perly.y"
     { (yyval.ival) = (PL_min_intro_pending &&
                            PL_max_intro_pending >=  PL_min_intro_pending);
                          intro_my(); ;}
     break;
 
-  case 45:
-#line 445 "perly.y"
+  case 46:
+#line 451 "perly.y"
     { (yyval.opval) = (OP*)NULL; ;}
     break;
 
-  case 47:
-#line 451 "perly.y"
+  case 48:
+#line 457 "perly.y"
     { YYSTYPE tmplval;
                          (void)scan_num("1", &tmplval);
                          (yyval.opval) = tmplval.opval; ;}
     break;
 
-  case 49:
-#line 459 "perly.y"
-    { (yyval.opval) = invert(scalar((ps[(1) - (1)].val.opval))); ;}
-    break;
-
   case 50:
-#line 464 "perly.y"
-    { (yyval.opval) = (ps[(1) - (1)].val.opval); intro_my(); ;}
+#line 465 "perly.y"
+    { (yyval.opval) = invert(scalar((ps[(1) - (1)].val.opval))); ;}
     break;
 
   case 51:
-#line 468 "perly.y"
+#line 470 "perly.y"
     { (yyval.opval) = (ps[(1) - (1)].val.opval); intro_my(); ;}
     break;
 
   case 52:
-#line 472 "perly.y"
+#line 474 "perly.y"
     { (yyval.opval) = (ps[(1) - (1)].val.opval); intro_my(); ;}
     break;
 
   case 53:
-#line 477 "perly.y"
+#line 478 "perly.y"
+    { (yyval.opval) = (ps[(1) - (1)].val.opval); intro_my(); ;}
+    break;
+
+  case 54:
+#line 483 "perly.y"
     {
 #ifdef MAD
                          YYSTYPE tmplval;
@@ -421,45 +430,45 @@ case 2:
                        ;}
     break;
 
-  case 55:
-#line 491 "perly.y"
-    { (yyval.opval) = (ps[(1) - (1)].val.opval); ;}
-    break;
-
   case 56:
-#line 493 "perly.y"
+#line 497 "perly.y"
     { (yyval.opval) = (ps[(1) - (1)].val.opval); ;}
     break;
 
   case 57:
-#line 495 "perly.y"
+#line 499 "perly.y"
     { (yyval.opval) = (ps[(1) - (1)].val.opval); ;}
     break;
 
   case 58:
-#line 497 "perly.y"
+#line 501 "perly.y"
     { (yyval.opval) = (ps[(1) - (1)].val.opval); ;}
     break;
 
   case 59:
-#line 499 "perly.y"
+#line 503 "perly.y"
     { (yyval.opval) = (ps[(1) - (1)].val.opval); ;}
     break;
 
   case 60:
-#line 504 "perly.y"
+#line 505 "perly.y"
     { (yyval.opval) = (ps[(1) - (1)].val.opval); ;}
     break;
 
   case 61:
-#line 508 "perly.y"
+#line 510 "perly.y"
+    { (yyval.opval) = (ps[(1) - (1)].val.opval); ;}
+    break;
+
+  case 62:
+#line 514 "perly.y"
     { (yyval.opval) = newOP(OP_NULL,0);
                          TOKEN_GETMAD((ps[(1) - (1)].val.i_tkval),(yyval.opval),'p');
                        ;}
     break;
 
-  case 62:
-#line 514 "perly.y"
+  case 63:
+#line 520 "perly.y"
     {
                          CV *fmtcv = PL_compcv;
                          SvREFCNT_inc_simple_void(PL_compcv);
@@ -479,18 +488,18 @@ case 2:
                        ;}
     break;
 
-  case 63:
-#line 533 "perly.y"
+  case 64:
+#line 539 "perly.y"
     { (yyval.opval) = (ps[(1) - (1)].val.opval); ;}
     break;
 
-  case 64:
-#line 534 "perly.y"
+  case 65:
+#line 540 "perly.y"
     { (yyval.opval) = (OP*)NULL; ;}
     break;
 
-  case 65:
-#line 539 "perly.y"
+  case 66:
+#line 545 "perly.y"
     { SvREFCNT_inc_simple_void(PL_compcv);
 #ifdef MAD
                          (yyval.opval) = newMYSUB((ps[(2) - (6)].val.ival), (ps[(3) - (6)].val.opval), (ps[(4) - (6)].val.opval), (ps[(5) - (6)].val.opval), (ps[(6) - (6)].val.opval));
@@ -502,8 +511,8 @@ case 2:
                        ;}
     break;
 
-  case 66:
-#line 552 "perly.y"
+  case 67:
+#line 558 "perly.y"
     { SvREFCNT_inc_simple_void(PL_compcv);
 #ifdef MAD
                          {
@@ -525,26 +534,26 @@ case 2:
                        ;}
     break;
 
-  case 67:
-#line 574 "perly.y"
+  case 68:
+#line 580 "perly.y"
     { (yyval.ival) = start_subparse(FALSE, 0);
                            SAVEFREESV(PL_compcv); ;}
     break;
 
-  case 68:
-#line 580 "perly.y"
+  case 69:
+#line 586 "perly.y"
     { (yyval.ival) = start_subparse(FALSE, CVf_ANON);
                            SAVEFREESV(PL_compcv); ;}
     break;
 
-  case 69:
-#line 585 "perly.y"
+  case 70:
+#line 591 "perly.y"
     { (yyval.ival) = start_subparse(TRUE, 0);
                            SAVEFREESV(PL_compcv); ;}
     break;
 
-  case 70:
-#line 590 "perly.y"
+  case 71:
+#line 596 "perly.y"
     { const char *const name = SvPV_nolen_const(((SVOP*)(ps[(1) - (1)].val.opval))->op_sv);
                          if (strEQ(name, "BEGIN") || strEQ(name, "END")
                              || strEQ(name, "INIT") || strEQ(name, "CHECK")
@@ -553,25 +562,25 @@ case 2:
                          (yyval.opval) = (ps[(1) - (1)].val.opval); ;}
     break;
 
-  case 71:
-#line 600 "perly.y"
+  case 72:
+#line 606 "perly.y"
     { (yyval.opval) = (OP*)NULL; ;}
     break;
 
-  case 73:
-#line 606 "perly.y"
+  case 74:
+#line 612 "perly.y"
     { (yyval.opval) = (OP*)NULL; ;}
     break;
 
-  case 74:
-#line 608 "perly.y"
+  case 75:
+#line 614 "perly.y"
     { (yyval.opval) = (ps[(2) - (2)].val.opval);
                          TOKEN_GETMAD((ps[(1) - (2)].val.i_tkval),(yyval.opval),':');
                        ;}
     break;
 
-  case 75:
-#line 612 "perly.y"
+  case 76:
+#line 618 "perly.y"
     { (yyval.opval) = IF_MAD(
                                    newOP(OP_NULL, 0),
                                    (OP*)NULL
@@ -580,15 +589,15 @@ case 2:
                        ;}
     break;
 
-  case 76:
-#line 622 "perly.y"
+  case 77:
+#line 628 "perly.y"
     { (yyval.opval) = (ps[(2) - (2)].val.opval);
                          TOKEN_GETMAD((ps[(1) - (2)].val.i_tkval),(yyval.opval),':');
                        ;}
     break;
 
-  case 77:
-#line 626 "perly.y"
+  case 78:
+#line 632 "perly.y"
     { (yyval.opval) = IF_MAD(
                                    newOP(OP_NULL, 0),
                                    (OP*)NULL
@@ -597,13 +606,13 @@ case 2:
                        ;}
     break;
 
-  case 78:
-#line 635 "perly.y"
+  case 79:
+#line 641 "perly.y"
     { (yyval.opval) = (ps[(1) - (1)].val.opval); ;}
     break;
 
-  case 79:
-#line 636 "perly.y"
+  case 80:
+#line 642 "perly.y"
     { (yyval.opval) = IF_MAD(
                                    newOP(OP_NULL,0),
                                    (OP*)NULL
@@ -613,8 +622,8 @@ case 2:
                        ;}
     break;
 
-  case 80:
-#line 646 "perly.y"
+  case 81:
+#line 652 "perly.y"
     {
 #ifdef MAD
                          (yyval.opval) = package((ps[(3) - (4)].val.opval));
@@ -631,13 +640,32 @@ case 2:
                        ;}
     break;
 
-  case 81:
-#line 663 "perly.y"
+  case 82:
+#line 669 "perly.y"
+    {
+                         package((ps[(3) - (5)].val.opval));
+                         if ((ps[(2) - (5)].val.opval))
+                             package_version((ps[(2) - (5)].val.opval));
+                       ;}
+    break;
+
+  case 83:
+#line 675 "perly.y"
+    { if (PL_parser->copline > (line_t)IVAL((ps[(4) - (8)].val.i_tkval)))
+                             PL_parser->copline = (line_t)IVAL((ps[(4) - (8)].val.i_tkval));
+                         (yyval.opval) = block_end((ps[(5) - (8)].val.ival), (ps[(7) - (8)].val.opval));
+                         TOKEN_GETMAD((ps[(4) - (8)].val.i_tkval),(yyval.opval),'{');
+                         TOKEN_GETMAD((ps[(8) - (8)].val.i_tkval),(yyval.opval),'}');
+                       ;}
+    break;
+
+  case 84:
+#line 684 "perly.y"
     { CvSPECIAL_on(PL_compcv); /* It's a BEGIN {} */ ;}
     break;
 
-  case 82:
-#line 665 "perly.y"
+  case 85:
+#line 686 "perly.y"
     { SvREFCNT_inc_simple_void(PL_compcv);
 #ifdef MAD
                          (yyval.opval) = utilize(IVAL((ps[(1) - (7)].val.i_tkval)), (ps[(2) - (7)].val.ival), (ps[(4) - (7)].val.opval), (ps[(5) - (7)].val.opval), (ps[(6) - (7)].val.opval));
@@ -653,29 +681,29 @@ case 2:
                        ;}
     break;
 
-  case 83:
-#line 682 "perly.y"
+  case 86:
+#line 703 "perly.y"
     { (yyval.opval) = newLOGOP(OP_AND, 0, (ps[(1) - (3)].val.opval), (ps[(3) - (3)].val.opval));
                          TOKEN_GETMAD((ps[(2) - (3)].val.i_tkval),(yyval.opval),'o');
                        ;}
     break;
 
-  case 84:
-#line 686 "perly.y"
+  case 87:
+#line 707 "perly.y"
     { (yyval.opval) = newLOGOP(IVAL((ps[(2) - (3)].val.i_tkval)), 0, (ps[(1) - (3)].val.opval), (ps[(3) - (3)].val.opval));
                          TOKEN_GETMAD((ps[(2) - (3)].val.i_tkval),(yyval.opval),'o');
                        ;}
     break;
 
-  case 85:
-#line 690 "perly.y"
+  case 88:
+#line 711 "perly.y"
     { (yyval.opval) = newLOGOP(OP_DOR, 0, (ps[(1) - (3)].val.opval), (ps[(3) - (3)].val.opval));
                          TOKEN_GETMAD((ps[(2) - (3)].val.i_tkval),(yyval.opval),'o');
                        ;}
     break;
 
-  case 87:
-#line 698 "perly.y"
+  case 90:
+#line 719 "perly.y"
     {
 #ifdef MAD
                          OP* op = newNULLLIST();
@@ -687,8 +715,8 @@ case 2:
                        ;}
     break;
 
-  case 88:
-#line 708 "perly.y"
+  case 91:
+#line 729 "perly.y"
     { 
                          OP* term = (ps[(3) - (3)].val.opval);
                          DO_MAD(
@@ -699,16 +727,16 @@ case 2:
                        ;}
     break;
 
-  case 90:
-#line 721 "perly.y"
+  case 93:
+#line 742 "perly.y"
     { (yyval.opval) = convert(IVAL((ps[(1) - (3)].val.i_tkval)), OPf_STACKED,
                                prepend_elem(OP_LIST, newGVREF(IVAL((ps[(1) - (3)].val.i_tkval)),(ps[(2) - (3)].val.opval)), (ps[(3) - (3)].val.opval)) );
                          TOKEN_GETMAD((ps[(1) - (3)].val.i_tkval),(yyval.opval),'o');
                        ;}
     break;
 
-  case 91:
-#line 726 "perly.y"
+  case 94:
+#line 747 "perly.y"
     { (yyval.opval) = convert(IVAL((ps[(1) - (5)].val.i_tkval)), OPf_STACKED,
                                prepend_elem(OP_LIST, newGVREF(IVAL((ps[(1) - (5)].val.i_tkval)),(ps[(3) - (5)].val.opval)), (ps[(4) - (5)].val.opval)) );
                          TOKEN_GETMAD((ps[(1) - (5)].val.i_tkval),(yyval.opval),'o');
@@ -717,8 +745,8 @@ case 2:
                        ;}
     break;
 
-  case 92:
-#line 733 "perly.y"
+  case 95:
+#line 754 "perly.y"
     { (yyval.opval) = convert(OP_ENTERSUB, OPf_STACKED,
                                append_elem(OP_LIST,
                                    prepend_elem(OP_LIST, scalar((ps[(1) - (6)].val.opval)), (ps[(5) - (6)].val.opval)),
@@ -729,8 +757,8 @@ case 2:
                        ;}
     break;
 
-  case 93:
-#line 742 "perly.y"
+  case 96:
+#line 763 "perly.y"
     { (yyval.opval) = convert(OP_ENTERSUB, OPf_STACKED,
                                append_elem(OP_LIST, scalar((ps[(1) - (3)].val.opval)),
                                    newUNOP(OP_METHOD, 0, (ps[(3) - (3)].val.opval))));
@@ -738,8 +766,8 @@ case 2:
                        ;}
     break;
 
-  case 94:
-#line 748 "perly.y"
+  case 97:
+#line 769 "perly.y"
     { (yyval.opval) = convert(OP_ENTERSUB, OPf_STACKED,
                                append_elem(OP_LIST,
                                    prepend_elem(OP_LIST, (ps[(2) - (3)].val.opval), (ps[(3) - (3)].val.opval)),
@@ -747,8 +775,8 @@ case 2:
                        ;}
     break;
 
-  case 95:
-#line 754 "perly.y"
+  case 98:
+#line 775 "perly.y"
     { (yyval.opval) = convert(OP_ENTERSUB, OPf_STACKED,
                                append_elem(OP_LIST,
                                    prepend_elem(OP_LIST, (ps[(2) - (5)].val.opval), (ps[(4) - (5)].val.opval)),
@@ -758,15 +786,15 @@ case 2:
                        ;}
     break;
 
-  case 96:
-#line 762 "perly.y"
+  case 99:
+#line 783 "perly.y"
     { (yyval.opval) = convert(IVAL((ps[(1) - (2)].val.i_tkval)), 0, (ps[(2) - (2)].val.opval));
                          TOKEN_GETMAD((ps[(1) - (2)].val.i_tkval),(yyval.opval),'o');
                        ;}
     break;
 
-  case 97:
-#line 766 "perly.y"
+  case 100:
+#line 787 "perly.y"
     { (yyval.opval) = convert(IVAL((ps[(1) - (4)].val.i_tkval)), 0, (ps[(3) - (4)].val.opval));
                          TOKEN_GETMAD((ps[(1) - (4)].val.i_tkval),(yyval.opval),'o');
                          TOKEN_GETMAD((ps[(2) - (4)].val.i_tkval),(yyval.opval),'(');
@@ -774,22 +802,22 @@ case 2:
                        ;}
     break;
 
-  case 98:
-#line 772 "perly.y"
+  case 101:
+#line 793 "perly.y"
     { SvREFCNT_inc_simple_void(PL_compcv);
                          (yyval.opval) = newANONATTRSUB((ps[(2) - (3)].val.ival), 0, (OP*)NULL, (ps[(3) - (3)].val.opval)); ;}
     break;
 
-  case 99:
-#line 775 "perly.y"
+  case 102:
+#line 796 "perly.y"
     { (yyval.opval) = newUNOP(OP_ENTERSUB, OPf_STACKED,
                                 append_elem(OP_LIST,
                                   prepend_elem(OP_LIST, (ps[(4) - (5)].val.opval), (ps[(5) - (5)].val.opval)), (ps[(1) - (5)].val.opval)));
                        ;}
     break;
 
-  case 102:
-#line 790 "perly.y"
+  case 105:
+#line 811 "perly.y"
     { (yyval.opval) = newBINOP(OP_GELEM, 0, (ps[(1) - (5)].val.opval), scalar((ps[(3) - (5)].val.opval)));
                            PL_parser->expect = XOPERATOR;
                          TOKEN_GETMAD((ps[(2) - (5)].val.i_tkval),(yyval.opval),'{');
@@ -798,16 +826,16 @@ case 2:
                        ;}
     break;
 
-  case 103:
-#line 797 "perly.y"
+  case 106:
+#line 818 "perly.y"
     { (yyval.opval) = newBINOP(OP_AELEM, 0, oopsAV((ps[(1) - (4)].val.opval)), scalar((ps[(3) - (4)].val.opval)));
                          TOKEN_GETMAD((ps[(2) - (4)].val.i_tkval),(yyval.opval),'[');
                          TOKEN_GETMAD((ps[(4) - (4)].val.i_tkval),(yyval.opval),']');
                        ;}
     break;
 
-  case 104:
-#line 802 "perly.y"
+  case 107:
+#line 823 "perly.y"
     { (yyval.opval) = newBINOP(OP_AELEM, 0,
                                        ref(newAVREF((ps[(1) - (5)].val.opval)),OP_RV2AV),
                                        scalar((ps[(4) - (5)].val.opval)));
@@ -817,8 +845,8 @@ case 2:
                        ;}
     break;
 
-  case 105:
-#line 810 "perly.y"
+  case 108:
+#line 831 "perly.y"
     { (yyval.opval) = newBINOP(OP_AELEM, 0,
                                        ref(newAVREF((ps[(1) - (4)].val.opval)),OP_RV2AV),
                                        scalar((ps[(3) - (4)].val.opval)));
@@ -827,8 +855,8 @@ case 2:
                        ;}
     break;
 
-  case 106:
-#line 817 "perly.y"
+  case 109:
+#line 838 "perly.y"
     { (yyval.opval) = newBINOP(OP_HELEM, 0, oopsHV((ps[(1) - (5)].val.opval)), jmaybe((ps[(3) - (5)].val.opval)));
                            PL_parser->expect = XOPERATOR;
                          TOKEN_GETMAD((ps[(2) - (5)].val.i_tkval),(yyval.opval),'{');
@@ -837,8 +865,8 @@ case 2:
                        ;}
     break;
 
-  case 107:
-#line 824 "perly.y"
+  case 110:
+#line 845 "perly.y"
     { (yyval.opval) = newBINOP(OP_HELEM, 0,
                                        ref(newHVREF((ps[(1) - (6)].val.opval)),OP_RV2HV),
                                        jmaybe((ps[(4) - (6)].val.opval)));
@@ -850,8 +878,8 @@ case 2:
                        ;}
     break;
 
-  case 108:
-#line 834 "perly.y"
+  case 111:
+#line 855 "perly.y"
     { (yyval.opval) = newBINOP(OP_HELEM, 0,
                                        ref(newHVREF((ps[(1) - (5)].val.opval)),OP_RV2HV),
                                        jmaybe((ps[(3) - (5)].val.opval)));
@@ -862,8 +890,8 @@ case 2:
                        ;}
     break;
 
-  case 109:
-#line 843 "perly.y"
+  case 112:
+#line 864 "perly.y"
     { (yyval.opval) = newUNOP(OP_ENTERSUB, OPf_STACKED,
                                   newCVREF(0, scalar((ps[(1) - (4)].val.opval))));
                          TOKEN_GETMAD((ps[(2) - (4)].val.i_tkval),(yyval.opval),'a');
@@ -872,8 +900,8 @@ case 2:
                        ;}
     break;
 
-  case 110:
-#line 850 "perly.y"
+  case 113:
+#line 871 "perly.y"
     { (yyval.opval) = newUNOP(OP_ENTERSUB, OPf_STACKED,
                                   append_elem(OP_LIST, (ps[(4) - (5)].val.opval),
                                       newCVREF(0, scalar((ps[(1) - (5)].val.opval)))));
@@ -883,8 +911,8 @@ case 2:
                        ;}
     break;
 
-  case 111:
-#line 859 "perly.y"
+  case 114:
+#line 880 "perly.y"
     { (yyval.opval) = newUNOP(OP_ENTERSUB, OPf_STACKED,
                                   append_elem(OP_LIST, (ps[(3) - (4)].val.opval),
                                               newCVREF(0, scalar((ps[(1) - (4)].val.opval)))));
@@ -893,8 +921,8 @@ case 2:
                        ;}
     break;
 
-  case 112:
-#line 866 "perly.y"
+  case 115:
+#line 887 "perly.y"
     { (yyval.opval) = newUNOP(OP_ENTERSUB, OPf_STACKED,
                                   newCVREF(0, scalar((ps[(1) - (3)].val.opval))));
                          TOKEN_GETMAD((ps[(2) - (3)].val.i_tkval),(yyval.opval),'(');
@@ -902,8 +930,8 @@ case 2:
                        ;}
     break;
 
-  case 113:
-#line 872 "perly.y"
+  case 116:
+#line 893 "perly.y"
     { (yyval.opval) = newSLICEOP(0, (ps[(5) - (6)].val.opval), (ps[(2) - (6)].val.opval));
                          TOKEN_GETMAD((ps[(1) - (6)].val.i_tkval),(yyval.opval),'(');
                          TOKEN_GETMAD((ps[(3) - (6)].val.i_tkval),(yyval.opval),')');
@@ -912,8 +940,8 @@ case 2:
                        ;}
     break;
 
-  case 114:
-#line 879 "perly.y"
+  case 117:
+#line 900 "perly.y"
     { (yyval.opval) = newSLICEOP(0, (ps[(4) - (5)].val.opval), (OP*)NULL);
                          TOKEN_GETMAD((ps[(1) - (5)].val.i_tkval),(yyval.opval),'(');
                          TOKEN_GETMAD((ps[(2) - (5)].val.i_tkval),(yyval.opval),')');
@@ -922,22 +950,22 @@ case 2:
                        ;}
     break;
 
-  case 115:
-#line 889 "perly.y"
+  case 118:
+#line 910 "perly.y"
     { (yyval.opval) = newASSIGNOP(OPf_STACKED, (ps[(1) - (3)].val.opval), IVAL((ps[(2) - (3)].val.i_tkval)), (ps[(3) - (3)].val.opval));
                          TOKEN_GETMAD((ps[(2) - (3)].val.i_tkval),(yyval.opval),'o');
                        ;}
     break;
 
-  case 116:
-#line 893 "perly.y"
+  case 119:
+#line 914 "perly.y"
     { (yyval.opval) = newBINOP(IVAL((ps[(2) - (3)].val.i_tkval)), 0, scalar((ps[(1) - (3)].val.opval)), scalar((ps[(3) - (3)].val.opval)));
                          TOKEN_GETMAD((ps[(2) - (3)].val.i_tkval),(yyval.opval),'o');
                        ;}
     break;
 
-  case 117:
-#line 897 "perly.y"
+  case 120:
+#line 918 "perly.y"
     {   if (IVAL((ps[(2) - (3)].val.i_tkval)) != OP_REPEAT)
                                scalar((ps[(1) - (3)].val.opval));
                            (yyval.opval) = newBINOP(IVAL((ps[(2) - (3)].val.i_tkval)), 0, (ps[(1) - (3)].val.opval), scalar((ps[(3) - (3)].val.opval)));
@@ -945,50 +973,50 @@ case 2:
                        ;}
     break;
 
-  case 118:
-#line 903 "perly.y"
+  case 121:
+#line 924 "perly.y"
     { (yyval.opval) = newBINOP(IVAL((ps[(2) - (3)].val.i_tkval)), 0, scalar((ps[(1) - (3)].val.opval)), scalar((ps[(3) - (3)].val.opval)));
                          TOKEN_GETMAD((ps[(2) - (3)].val.i_tkval),(yyval.opval),'o');
                        ;}
     break;
 
-  case 119:
-#line 907 "perly.y"
+  case 122:
+#line 928 "perly.y"
     { (yyval.opval) = newBINOP(IVAL((ps[(2) - (3)].val.i_tkval)), 0, scalar((ps[(1) - (3)].val.opval)), scalar((ps[(3) - (3)].val.opval)));
                          TOKEN_GETMAD((ps[(2) - (3)].val.i_tkval),(yyval.opval),'o');
                        ;}
     break;
 
-  case 120:
-#line 911 "perly.y"
+  case 123:
+#line 932 "perly.y"
     { (yyval.opval) = newBINOP(IVAL((ps[(2) - (3)].val.i_tkval)), 0, scalar((ps[(1) - (3)].val.opval)), scalar((ps[(3) - (3)].val.opval)));
                          TOKEN_GETMAD((ps[(2) - (3)].val.i_tkval),(yyval.opval),'o');
                        ;}
     break;
 
-  case 121:
-#line 915 "perly.y"
+  case 124:
+#line 936 "perly.y"
     { (yyval.opval) = newBINOP(IVAL((ps[(2) - (3)].val.i_tkval)), 0, scalar((ps[(1) - (3)].val.opval)), scalar((ps[(3) - (3)].val.opval)));
                          TOKEN_GETMAD((ps[(2) - (3)].val.i_tkval),(yyval.opval),'o');
                        ;}
     break;
 
-  case 122:
-#line 919 "perly.y"
+  case 125:
+#line 940 "perly.y"
     { (yyval.opval) = newBINOP(IVAL((ps[(2) - (3)].val.i_tkval)), 0, scalar((ps[(1) - (3)].val.opval)), scalar((ps[(3) - (3)].val.opval)));
                          TOKEN_GETMAD((ps[(2) - (3)].val.i_tkval),(yyval.opval),'o');
                        ;}
     break;
 
-  case 123:
-#line 923 "perly.y"
+  case 126:
+#line 944 "perly.y"
     { (yyval.opval) = newBINOP(IVAL((ps[(2) - (3)].val.i_tkval)), 0, scalar((ps[(1) - (3)].val.opval)), scalar((ps[(3) - (3)].val.opval)));
                          TOKEN_GETMAD((ps[(2) - (3)].val.i_tkval),(yyval.opval),'o');
                        ;}
     break;
 
-  case 124:
-#line 927 "perly.y"
+  case 127:
+#line 948 "perly.y"
     {
                          (yyval.opval) = newRANGE(IVAL((ps[(2) - (3)].val.i_tkval)), scalar((ps[(1) - (3)].val.opval)), scalar((ps[(3) - (3)].val.opval)));
                          DO_MAD({
@@ -1002,29 +1030,29 @@ case 2:
                        ;}
     break;
 
-  case 125:
-#line 939 "perly.y"
+  case 128:
+#line 960 "perly.y"
     { (yyval.opval) = newLOGOP(OP_AND, 0, (ps[(1) - (3)].val.opval), (ps[(3) - (3)].val.opval));
                          TOKEN_GETMAD((ps[(2) - (3)].val.i_tkval),(yyval.opval),'o');
                        ;}
     break;
 
-  case 126:
-#line 943 "perly.y"
+  case 129:
+#line 964 "perly.y"
     { (yyval.opval) = newLOGOP(OP_OR, 0, (ps[(1) - (3)].val.opval), (ps[(3) - (3)].val.opval));
                          TOKEN_GETMAD((ps[(2) - (3)].val.i_tkval),(yyval.opval),'o');
                        ;}
     break;
 
-  case 127:
-#line 947 "perly.y"
+  case 130:
+#line 968 "perly.y"
     { (yyval.opval) = newLOGOP(OP_DOR, 0, (ps[(1) - (3)].val.opval), (ps[(3) - (3)].val.opval));
                          TOKEN_GETMAD((ps[(2) - (3)].val.i_tkval),(yyval.opval),'o');
                        ;}
     break;
 
-  case 128:
-#line 951 "perly.y"
+  case 131:
+#line 972 "perly.y"
     { (yyval.opval) = bind_match(IVAL((ps[(2) - (3)].val.i_tkval)), (ps[(1) - (3)].val.opval), (ps[(3) - (3)].val.opval));
                          TOKEN_GETMAD((ps[(2) - (3)].val.i_tkval),
                                ((yyval.opval)->op_type == OP_NOT
@@ -1033,15 +1061,15 @@ case 2:
                        ;}
     break;
 
-  case 129:
-#line 961 "perly.y"
+  case 132:
+#line 982 "perly.y"
     { (yyval.opval) = newUNOP(OP_NEGATE, 0, scalar((ps[(2) - (2)].val.opval)));
                          TOKEN_GETMAD((ps[(1) - (2)].val.i_tkval),(yyval.opval),'o');
                        ;}
     break;
 
-  case 130:
-#line 965 "perly.y"
+  case 133:
+#line 986 "perly.y"
     { (yyval.opval) = IF_MAD(
                                    newUNOP(OP_NULL, 0, (ps[(2) - (2)].val.opval)),
                                    (ps[(2) - (2)].val.opval)
@@ -1050,70 +1078,70 @@ case 2:
                        ;}
     break;
 
-  case 131:
-#line 972 "perly.y"
+  case 134:
+#line 993 "perly.y"
     { (yyval.opval) = newUNOP(OP_NOT, 0, scalar((ps[(2) - (2)].val.opval)));
                          TOKEN_GETMAD((ps[(1) - (2)].val.i_tkval),(yyval.opval),'o');
                        ;}
     break;
 
-  case 132:
-#line 976 "perly.y"
+  case 135:
+#line 997 "perly.y"
     { (yyval.opval) = newUNOP(OP_COMPLEMENT, 0, scalar((ps[(2) - (2)].val.opval)));
                          TOKEN_GETMAD((ps[(1) - (2)].val.i_tkval),(yyval.opval),'o');
                        ;}
     break;
 
-  case 133:
-#line 980 "perly.y"
+  case 136:
+#line 1001 "perly.y"
     { (yyval.opval) = newUNOP(OP_POSTINC, 0,
                                        mod(scalar((ps[(1) - (2)].val.opval)), OP_POSTINC));
                          TOKEN_GETMAD((ps[(2) - (2)].val.i_tkval),(yyval.opval),'o');
                        ;}
     break;
 
-  case 134:
-#line 985 "perly.y"
+  case 137:
+#line 1006 "perly.y"
     { (yyval.opval) = newUNOP(OP_POSTDEC, 0,
                                        mod(scalar((ps[(1) - (2)].val.opval)), OP_POSTDEC));
                          TOKEN_GETMAD((ps[(2) - (2)].val.i_tkval),(yyval.opval),'o');
                        ;}
     break;
 
-  case 135:
-#line 990 "perly.y"
+  case 138:
+#line 1011 "perly.y"
     { (yyval.opval) = newUNOP(OP_PREINC, 0,
                                        mod(scalar((ps[(2) - (2)].val.opval)), OP_PREINC));
                          TOKEN_GETMAD((ps[(1) - (2)].val.i_tkval),(yyval.opval),'o');
                        ;}
     break;
 
-  case 136:
-#line 995 "perly.y"
+  case 139:
+#line 1016 "perly.y"
     { (yyval.opval) = newUNOP(OP_PREDEC, 0,
                                        mod(scalar((ps[(2) - (2)].val.opval)), OP_PREDEC));
                          TOKEN_GETMAD((ps[(1) - (2)].val.i_tkval),(yyval.opval),'o');
                        ;}
     break;
 
-  case 137:
-#line 1004 "perly.y"
+  case 140:
+#line 1025 "perly.y"
     { (yyval.opval) = newANONLIST((ps[(2) - (3)].val.opval));
                          TOKEN_GETMAD((ps[(1) - (3)].val.i_tkval),(yyval.opval),'[');
                          TOKEN_GETMAD((ps[(3) - (3)].val.i_tkval),(yyval.opval),']');
                        ;}
     break;
 
-  case 138:
-#line 1009 "perly.y"
+  case 141:
+#line 1030 "perly.y"
     { (yyval.opval) = newANONLIST((OP*)NULL);
                          TOKEN_GETMAD((ps[(1) - (2)].val.i_tkval),(yyval.opval),'[');
                          TOKEN_GETMAD((ps[(2) - (2)].val.i_tkval),(yyval.opval),']');
                        ;}
     break;
 
-  case 139:
-#line 1014 "perly.y"
+  case 142:
+#line 1035 "perly.y"
     { (yyval.opval) = newANONHASH((ps[(2) - (4)].val.opval));
                          TOKEN_GETMAD((ps[(1) - (4)].val.i_tkval),(yyval.opval),'{');
                          TOKEN_GETMAD((ps[(3) - (4)].val.i_tkval),(yyval.opval),';');
@@ -1121,8 +1149,8 @@ case 2:
                        ;}
     break;
 
-  case 140:
-#line 1020 "perly.y"
+  case 143:
+#line 1041 "perly.y"
     { (yyval.opval) = newANONHASH((OP*)NULL);
                          TOKEN_GETMAD((ps[(1) - (3)].val.i_tkval),(yyval.opval),'{');
                          TOKEN_GETMAD((ps[(2) - (3)].val.i_tkval),(yyval.opval),';');
@@ -1130,8 +1158,8 @@ case 2:
                        ;}
     break;
 
-  case 141:
-#line 1026 "perly.y"
+  case 144:
+#line 1047 "perly.y"
     { SvREFCNT_inc_simple_void(PL_compcv);
                          (yyval.opval) = newANONATTRSUB((ps[(2) - (5)].val.ival), (ps[(3) - (5)].val.opval), (ps[(4) - (5)].val.opval), (ps[(5) - (5)].val.opval));
                          TOKEN_GETMAD((ps[(1) - (5)].val.i_tkval),(yyval.opval),'o');
@@ -1140,22 +1168,22 @@ case 2:
                        ;}
     break;
 
-  case 142:
-#line 1037 "perly.y"
+  case 145:
+#line 1058 "perly.y"
     { (yyval.opval) = dofile((ps[(2) - (2)].val.opval), IVAL((ps[(1) - (2)].val.i_tkval)));
                          TOKEN_GETMAD((ps[(1) - (2)].val.i_tkval),(yyval.opval),'o');
                        ;}
     break;
 
-  case 143:
-#line 1041 "perly.y"
+  case 146:
+#line 1062 "perly.y"
     { (yyval.opval) = newUNOP(OP_NULL, OPf_SPECIAL, scope((ps[(2) - (2)].val.opval)));
                          TOKEN_GETMAD((ps[(1) - (2)].val.i_tkval),(yyval.opval),'D');
                        ;}
     break;
 
-  case 144:
-#line 1045 "perly.y"
+  case 147:
+#line 1066 "perly.y"
     { (yyval.opval) = newUNOP(OP_ENTERSUB,
                            OPf_SPECIAL|OPf_STACKED,
                            prepend_elem(OP_LIST,
@@ -1169,8 +1197,8 @@ case 2:
                        ;}
     break;
 
-  case 145:
-#line 1057 "perly.y"
+  case 148:
+#line 1078 "perly.y"
     { (yyval.opval) = newUNOP(OP_ENTERSUB,
                            OPf_SPECIAL|OPf_STACKED,
                            append_elem(OP_LIST,
@@ -1185,8 +1213,8 @@ case 2:
                        ;}
     break;
 
-  case 146:
-#line 1070 "perly.y"
+  case 149:
+#line 1091 "perly.y"
     { (yyval.opval) = newUNOP(OP_ENTERSUB, OPf_SPECIAL|OPf_STACKED,
                            prepend_elem(OP_LIST,
                                scalar(newCVREF(0,scalar((ps[(2) - (4)].val.opval)))), (OP*)NULL)); dep();
@@ -1196,8 +1224,8 @@ case 2:
                        ;}
     break;
 
-  case 147:
-#line 1078 "perly.y"
+  case 150:
+#line 1099 "perly.y"
     { (yyval.opval) = newUNOP(OP_ENTERSUB, OPf_SPECIAL|OPf_STACKED,
                            prepend_elem(OP_LIST,
                                (ps[(4) - (5)].val.opval),
@@ -1208,81 +1236,81 @@ case 2:
                        ;}
     break;
 
-  case 152:
-#line 1094 "perly.y"
+  case 155:
+#line 1115 "perly.y"
     { (yyval.opval) = newCONDOP(0, (ps[(1) - (5)].val.opval), (ps[(3) - (5)].val.opval), (ps[(5) - (5)].val.opval));
                          TOKEN_GETMAD((ps[(2) - (5)].val.i_tkval),(yyval.opval),'?');
                          TOKEN_GETMAD((ps[(4) - (5)].val.i_tkval),(yyval.opval),':');
                        ;}
     break;
 
-  case 153:
-#line 1099 "perly.y"
+  case 156:
+#line 1120 "perly.y"
     { (yyval.opval) = newUNOP(OP_REFGEN, 0, mod((ps[(2) - (2)].val.opval),OP_REFGEN));
                          TOKEN_GETMAD((ps[(1) - (2)].val.i_tkval),(yyval.opval),'o');
                        ;}
     break;
 
-  case 154:
-#line 1103 "perly.y"
+  case 157:
+#line 1124 "perly.y"
     { (yyval.opval) = (ps[(1) - (1)].val.opval); ;}
     break;
 
-  case 155:
-#line 1105 "perly.y"
+  case 158:
+#line 1126 "perly.y"
     { (yyval.opval) = localize((ps[(2) - (2)].val.opval),IVAL((ps[(1) - (2)].val.i_tkval)));
                          TOKEN_GETMAD((ps[(1) - (2)].val.i_tkval),(yyval.opval),'k');
                        ;}
     break;
 
-  case 156:
-#line 1109 "perly.y"
+  case 159:
+#line 1130 "perly.y"
     { (yyval.opval) = sawparens(IF_MAD(newUNOP(OP_NULL,0,(ps[(2) - (3)].val.opval)), (ps[(2) - (3)].val.opval)));
                          TOKEN_GETMAD((ps[(1) - (3)].val.i_tkval),(yyval.opval),'(');
                          TOKEN_GETMAD((ps[(3) - (3)].val.i_tkval),(yyval.opval),')');
                        ;}
     break;
 
-  case 157:
-#line 1114 "perly.y"
+  case 160:
+#line 1135 "perly.y"
     { (yyval.opval) = sawparens(newNULLLIST());
                          TOKEN_GETMAD((ps[(1) - (2)].val.i_tkval),(yyval.opval),'(');
                          TOKEN_GETMAD((ps[(2) - (2)].val.i_tkval),(yyval.opval),')');
                        ;}
     break;
 
-  case 158:
-#line 1119 "perly.y"
+  case 161:
+#line 1140 "perly.y"
     { (yyval.opval) = (ps[(1) - (1)].val.opval); ;}
     break;
 
-  case 159:
-#line 1121 "perly.y"
+  case 162:
+#line 1142 "perly.y"
     { (yyval.opval) = (ps[(1) - (1)].val.opval); ;}
     break;
 
-  case 160:
-#line 1123 "perly.y"
+  case 163:
+#line 1144 "perly.y"
     { (yyval.opval) = (ps[(1) - (1)].val.opval); ;}
     break;
 
-  case 161:
-#line 1125 "perly.y"
+  case 164:
+#line 1146 "perly.y"
     { (yyval.opval) = (ps[(1) - (1)].val.opval); ;}
     break;
 
-  case 162:
-#line 1127 "perly.y"
+  case 165:
+#line 1148 "perly.y"
     { (yyval.opval) = newUNOP(OP_AV2ARYLEN, 0, ref((ps[(1) - (1)].val.opval), OP_AV2ARYLEN));;}
     break;
 
-  case 163:
-#line 1129 "perly.y"
+  case 166:
+#line 1150 "perly.y"
     { (yyval.opval) = (ps[(1) - (1)].val.opval); ;}
     break;
 
-  case 164:
-#line 1131 "perly.y"
+  case 167:
+#line 1152 "perly.y"
     { (yyval.opval) = prepend_elem(OP_ASLICE,
                                newOP(OP_PUSHMARK, 0),
                                    newLISTOP(OP_ASLICE, 0,
@@ -1293,8 +1321,8 @@ case 2:
                        ;}
     break;
 
-  case 165:
-#line 1140 "perly.y"
+  case 168:
+#line 1161 "perly.y"
     { (yyval.opval) = prepend_elem(OP_HSLICE,
                                newOP(OP_PUSHMARK, 0),
                                    newLISTOP(OP_HSLICE, 0,
@@ -1307,26 +1335,26 @@ case 2:
                        ;}
     break;
 
-  case 166:
-#line 1151 "perly.y"
+  case 169:
+#line 1172 "perly.y"
     { (yyval.opval) = (ps[(1) - (1)].val.opval); ;}
     break;
 
-  case 167:
-#line 1153 "perly.y"
+  case 170:
+#line 1174 "perly.y"
     { (yyval.opval) = newUNOP(OP_ENTERSUB, 0, scalar((ps[(1) - (1)].val.opval))); ;}
     break;
 
-  case 168:
-#line 1155 "perly.y"
+  case 171:
+#line 1176 "perly.y"
     { (yyval.opval) = newUNOP(OP_ENTERSUB, OPf_STACKED, scalar((ps[(1) - (3)].val.opval)));
                          TOKEN_GETMAD((ps[(2) - (3)].val.i_tkval),(yyval.opval),'(');
                          TOKEN_GETMAD((ps[(3) - (3)].val.i_tkval),(yyval.opval),')');
                        ;}
     break;
 
-  case 169:
-#line 1160 "perly.y"
+  case 172:
+#line 1181 "perly.y"
     {
                          (yyval.opval) = newUNOP(OP_ENTERSUB, OPf_STACKED,
                                append_elem(OP_LIST, (ps[(3) - (4)].val.opval), scalar((ps[(1) - (4)].val.opval))));
@@ -1341,91 +1369,91 @@ case 2:
                        ;}
     break;
 
-  case 170:
-#line 1173 "perly.y"
+  case 173:
+#line 1194 "perly.y"
     { (yyval.opval) = newUNOP(OP_ENTERSUB, OPf_STACKED,
                            append_elem(OP_LIST, (ps[(3) - (3)].val.opval), scalar((ps[(2) - (3)].val.opval))));
                          TOKEN_GETMAD((ps[(1) - (3)].val.i_tkval),(yyval.opval),'o');
                        ;}
     break;
 
-  case 171:
-#line 1178 "perly.y"
+  case 174:
+#line 1199 "perly.y"
     { (yyval.opval) = newOP(IVAL((ps[(1) - (1)].val.i_tkval)), OPf_SPECIAL);
                            PL_hints |= HINT_BLOCK_SCOPE;
                          TOKEN_GETMAD((ps[(1) - (1)].val.i_tkval),(yyval.opval),'o');
                        ;}
     break;
 
-  case 172:
-#line 1183 "perly.y"
+  case 175:
+#line 1204 "perly.y"
     { (yyval.opval) = newLOOPEX(IVAL((ps[(1) - (2)].val.i_tkval)),(ps[(2) - (2)].val.opval));
                          TOKEN_GETMAD((ps[(1) - (2)].val.i_tkval),(yyval.opval),'o');
                        ;}
     break;
 
-  case 173:
-#line 1187 "perly.y"
+  case 176:
+#line 1208 "perly.y"
     { (yyval.opval) = newUNOP(OP_NOT, 0, scalar((ps[(2) - (2)].val.opval)));
                          TOKEN_GETMAD((ps[(1) - (2)].val.i_tkval),(yyval.opval),'o');
                        ;}
     break;
 
-  case 174:
-#line 1191 "perly.y"
+  case 177:
+#line 1212 "perly.y"
     { (yyval.opval) = newOP(IVAL((ps[(1) - (1)].val.i_tkval)), 0);
                          TOKEN_GETMAD((ps[(1) - (1)].val.i_tkval),(yyval.opval),'o');
                        ;}
     break;
 
-  case 175:
-#line 1195 "perly.y"
+  case 178:
+#line 1216 "perly.y"
     { (yyval.opval) = newUNOP(IVAL((ps[(1) - (2)].val.i_tkval)), 0, (ps[(2) - (2)].val.opval));
                          TOKEN_GETMAD((ps[(1) - (2)].val.i_tkval),(yyval.opval),'o');
                        ;}
     break;
 
-  case 176:
-#line 1199 "perly.y"
+  case 179:
+#line 1220 "perly.y"
     { (yyval.opval) = newUNOP(IVAL((ps[(1) - (2)].val.i_tkval)), 0, (ps[(2) - (2)].val.opval));
                          TOKEN_GETMAD((ps[(1) - (2)].val.i_tkval),(yyval.opval),'o');
                        ;}
     break;
 
-  case 177:
-#line 1203 "perly.y"
+  case 180:
+#line 1224 "perly.y"
     { (yyval.opval) = newOP(OP_REQUIRE, (ps[(1) - (1)].val.i_tkval) ? OPf_SPECIAL : 0);
                          TOKEN_GETMAD((ps[(1) - (1)].val.i_tkval),(yyval.opval),'o');
                        ;}
     break;
 
-  case 178:
-#line 1207 "perly.y"
+  case 181:
+#line 1228 "perly.y"
     { (yyval.opval) = newUNOP(OP_REQUIRE, (ps[(1) - (2)].val.i_tkval) ? OPf_SPECIAL : 0, (ps[(2) - (2)].val.opval));
                          TOKEN_GETMAD((ps[(1) - (2)].val.i_tkval),(yyval.opval),'o');
                        ;}
     break;
 
-  case 179:
-#line 1211 "perly.y"
+  case 182:
+#line 1232 "perly.y"
     { (yyval.opval) = newUNOP(OP_ENTERSUB, OPf_STACKED, scalar((ps[(1) - (1)].val.opval))); ;}
     break;
 
-  case 180:
-#line 1213 "perly.y"
+  case 183:
+#line 1234 "perly.y"
     { (yyval.opval) = newUNOP(OP_ENTERSUB, OPf_STACKED,
                            append_elem(OP_LIST, (ps[(2) - (2)].val.opval), scalar((ps[(1) - (2)].val.opval)))); ;}
     break;
 
-  case 181:
-#line 1216 "perly.y"
+  case 184:
+#line 1237 "perly.y"
     { (yyval.opval) = newOP(IVAL((ps[(1) - (1)].val.i_tkval)), 0);
                          TOKEN_GETMAD((ps[(1) - (1)].val.i_tkval),(yyval.opval),'o');
                        ;}
     break;
 
-  case 182:
-#line 1220 "perly.y"
+  case 185:
+#line 1241 "perly.y"
     { (yyval.opval) = newOP(IVAL((ps[(1) - (3)].val.i_tkval)), 0);
                          TOKEN_GETMAD((ps[(1) - (3)].val.i_tkval),(yyval.opval),'o');
                          TOKEN_GETMAD((ps[(2) - (3)].val.i_tkval),(yyval.opval),'(');
@@ -1433,14 +1461,14 @@ case 2:
                        ;}
     break;
 
-  case 183:
-#line 1226 "perly.y"
+  case 186:
+#line 1247 "perly.y"
     { (yyval.opval) = newUNOP(OP_ENTERSUB, OPf_STACKED,
                                scalar((ps[(1) - (1)].val.opval))); ;}
     break;
 
-  case 184:
-#line 1229 "perly.y"
+  case 187:
+#line 1250 "perly.y"
     { (yyval.opval) = (IVAL((ps[(1) - (3)].val.i_tkval)) == OP_NOT)
                            ? newUNOP(IVAL((ps[(1) - (3)].val.i_tkval)), 0, newSVOP(OP_CONST, 0, newSViv(0)))
                            : newOP(IVAL((ps[(1) - (3)].val.i_tkval)), OPf_SPECIAL);
@@ -1451,8 +1479,8 @@ case 2:
                        ;}
     break;
 
-  case 185:
-#line 1238 "perly.y"
+  case 188:
+#line 1259 "perly.y"
     { (yyval.opval) = newUNOP(IVAL((ps[(1) - (4)].val.i_tkval)), 0, (ps[(3) - (4)].val.opval));
                          TOKEN_GETMAD((ps[(1) - (4)].val.i_tkval),(yyval.opval),'o');
                          TOKEN_GETMAD((ps[(2) - (4)].val.i_tkval),(yyval.opval),'(');
@@ -1460,16 +1488,16 @@ case 2:
                        ;}
     break;
 
-  case 186:
-#line 1244 "perly.y"
+  case 189:
+#line 1265 "perly.y"
     { (yyval.opval) = pmruntime((ps[(1) - (4)].val.opval), (ps[(3) - (4)].val.opval), 1);
                          TOKEN_GETMAD((ps[(2) - (4)].val.i_tkval),(yyval.opval),'(');
                          TOKEN_GETMAD((ps[(4) - (4)].val.i_tkval),(yyval.opval),')');
                        ;}
     break;
 
-  case 189:
-#line 1251 "perly.y"
+  case 192:
+#line 1272 "perly.y"
     {
                          (yyval.opval) = newLISTOP(OP_DIE, 0, newOP(OP_PUSHMARK, 0),
                                newSVOP(OP_CONST, 0, newSVpvs("Unimplemented")));
@@ -1477,8 +1505,8 @@ case 2:
                        ;}
     break;
 
-  case 191:
-#line 1261 "perly.y"
+  case 194:
+#line 1282 "perly.y"
     { (yyval.opval) = my_attrs((ps[(2) - (3)].val.opval),(ps[(3) - (3)].val.opval));
                          DO_MAD(
                              token_getmad((ps[(1) - (3)].val.i_tkval),(yyval.opval),'d');
@@ -1488,66 +1516,66 @@ case 2:
                        ;}
     break;
 
-  case 192:
-#line 1269 "perly.y"
+  case 195:
+#line 1290 "perly.y"
     { (yyval.opval) = localize((ps[(2) - (2)].val.opval),IVAL((ps[(1) - (2)].val.i_tkval)));
                          TOKEN_GETMAD((ps[(1) - (2)].val.i_tkval),(yyval.opval),'d');
                        ;}
     break;
 
-  case 193:
-#line 1276 "perly.y"
+  case 196:
+#line 1297 "perly.y"
     { (yyval.opval) = sawparens((ps[(2) - (3)].val.opval));
                          TOKEN_GETMAD((ps[(1) - (3)].val.i_tkval),(yyval.opval),'(');
                          TOKEN_GETMAD((ps[(3) - (3)].val.i_tkval),(yyval.opval),')');
                        ;}
     break;
 
-  case 194:
-#line 1281 "perly.y"
+  case 197:
+#line 1302 "perly.y"
     { (yyval.opval) = sawparens(newNULLLIST());
                          TOKEN_GETMAD((ps[(1) - (2)].val.i_tkval),(yyval.opval),'(');
                          TOKEN_GETMAD((ps[(2) - (2)].val.i_tkval),(yyval.opval),')');
                        ;}
     break;
 
-  case 195:
-#line 1286 "perly.y"
+  case 198:
+#line 1307 "perly.y"
     { (yyval.opval) = (ps[(1) - (1)].val.opval); ;}
     break;
 
-  case 196:
-#line 1288 "perly.y"
+  case 199:
+#line 1309 "perly.y"
     { (yyval.opval) = (ps[(1) - (1)].val.opval); ;}
     break;
 
-  case 197:
-#line 1290 "perly.y"
+  case 200:
+#line 1311 "perly.y"
     { (yyval.opval) = (ps[(1) - (1)].val.opval); ;}
     break;
 
-  case 198:
-#line 1295 "perly.y"
+  case 201:
+#line 1316 "perly.y"
     { (yyval.opval) = (OP*)NULL; ;}
     break;
 
-  case 199:
-#line 1297 "perly.y"
+  case 202:
+#line 1318 "perly.y"
     { (yyval.opval) = (ps[(1) - (1)].val.opval); ;}
     break;
 
-  case 200:
-#line 1301 "perly.y"
+  case 203:
+#line 1322 "perly.y"
     { (yyval.opval) = (OP*)NULL; ;}
     break;
 
-  case 201:
-#line 1303 "perly.y"
+  case 204:
+#line 1324 "perly.y"
     { (yyval.opval) = (ps[(1) - (1)].val.opval); ;}
     break;
 
-  case 202:
-#line 1305 "perly.y"
+  case 205:
+#line 1326 "perly.y"
     {
 #ifdef MAD
                          OP* op = newNULLLIST();
@@ -1560,72 +1588,75 @@ case 2:
                        ;}
     break;
 
-  case 203:
-#line 1320 "perly.y"
+  case 206:
+#line 1341 "perly.y"
     { PL_parser->in_my = 0; (yyval.opval) = my((ps[(1) - (1)].val.opval)); ;}
     break;
 
-  case 204:
-#line 1324 "perly.y"
+  case 207:
+#line 1345 "perly.y"
     { (yyval.opval) = newCVREF(IVAL((ps[(1) - (2)].val.i_tkval)),(ps[(2) - (2)].val.opval));
                          TOKEN_GETMAD((ps[(1) - (2)].val.i_tkval),(yyval.opval),'&');
                        ;}
     break;
 
-  case 205:
-#line 1330 "perly.y"
+  case 208:
+#line 1351 "perly.y"
     { (yyval.opval) = newSVREF((ps[(2) - (2)].val.opval));
                          TOKEN_GETMAD((ps[(1) - (2)].val.i_tkval),(yyval.opval),'$');
                        ;}
     break;
 
-  case 206:
-#line 1336 "perly.y"
+  case 209:
+#line 1357 "perly.y"
     { (yyval.opval) = newAVREF((ps[(2) - (2)].val.opval));
                          TOKEN_GETMAD((ps[(1) - (2)].val.i_tkval),(yyval.opval),'@');
                        ;}
     break;
 
-  case 207:
-#line 1342 "perly.y"
+  case 210:
+#line 1363 "perly.y"
     { (yyval.opval) = newHVREF((ps[(2) - (2)].val.opval));
                          TOKEN_GETMAD((ps[(1) - (2)].val.i_tkval),(yyval.opval),'%');
                        ;}
     break;
 
-  case 208:
-#line 1348 "perly.y"
+  case 211:
+#line 1369 "perly.y"
     { (yyval.opval) = newAVREF((ps[(2) - (2)].val.opval));
                          TOKEN_GETMAD((ps[(1) - (2)].val.i_tkval),(yyval.opval),'l');
                        ;}
     break;
 
-  case 209:
-#line 1354 "perly.y"
+  case 212:
+#line 1375 "perly.y"
     { (yyval.opval) = newGVREF(0,(ps[(2) - (2)].val.opval));
                          TOKEN_GETMAD((ps[(1) - (2)].val.i_tkval),(yyval.opval),'*');
                        ;}
     break;
 
-  case 210:
-#line 1361 "perly.y"
+  case 213:
+#line 1382 "perly.y"
     { (yyval.opval) = scalar((ps[(1) - (1)].val.opval)); ;}
     break;
 
-  case 211:
-#line 1363 "perly.y"
+  case 214:
+#line 1384 "perly.y"
     { (yyval.opval) = scalar((ps[(1) - (1)].val.opval)); ;}
     break;
 
-  case 212:
-#line 1365 "perly.y"
+  case 215:
+#line 1386 "perly.y"
     { (yyval.opval) = scope((ps[(1) - (1)].val.opval)); ;}
     break;
 
-  case 213:
-#line 1368 "perly.y"
+  case 216:
+#line 1389 "perly.y"
     { (yyval.opval) = (ps[(1) - (1)].val.opval); ;}
     break;
 
+
+/* Line 1267 of yacc.c.  */
+
       default: break;
     
diff --git a/perly.h b/perly.h
index b40a968..4ff6876 100644 (file)
--- a/perly.h
+++ b/perly.h
@@ -1,24 +1,25 @@
 #ifdef PERL_CORE
-
-/* A Bison parser, made by GNU Bison 2.4.1.  */
+/* A Bison parser, made by GNU Bison 2.3.  */
 
 /* Skeleton interface for Bison's Yacc-like parsers in C
-   
-      Copyright (C) 1984, 1989, 1990, 2000, 2001, 2002, 2003, 2004, 2005, 2006
+
+   Copyright (C) 1984, 1989, 1990, 2000, 2001, 2002, 2003, 2004, 2005, 2006
    Free Software Foundation, Inc.
-   
-   This program is free software: you can redistribute it and/or modify
+
+   This program is free software; you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
-   the Free Software Foundation, either version 3 of the License, or
-   (at your option) any later version.
-   
+   the Free Software Foundation; either version 2, or (at your option)
+   any later version.
+
    This program is distributed in the hope that it will be useful,
    but WITHOUT ANY WARRANTY; without even the implied warranty of
    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
    GNU General Public License for more details.
-   
+
    You should have received a copy of the GNU General Public License
-   along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
+   along with this program; if not, write to the Free Software
+   Foundation, Inc., 51 Franklin Street, Fifth Floor,
+   Boston, MA 02110-1301, USA.  */
 
 /* As a special exception, you may create a larger work that contains
    part or all of the Bison parser skeleton and distribute that work
    special exception, which will cause the skeleton and the resulting
    Bison output files to be licensed under the GNU General Public
    License without this special exception.
-   
+
    This special exception was added by the Free Software Foundation in
    version 2.2 of Bison.  */
 
-
 /* Tokens.  */
 #ifndef YYTOKENTYPE
 # define YYTOKENTYPE
      PEG = 328
    };
 #endif
-
 /* Tokens.  */
 #define WORD 258
 #define METHOD 259
 
 
 
+
 #endif /* PERL_CORE */
 #if ! defined YYSTYPE && ! defined YYSTYPE_IS_DECLARED
 typedef union YYSTYPE
 {
-
-/* Line 1676 of yacc.c  */
-
     I32        ival; /* __DEFAULT__ (marker for regen_perly.pl;
                                must always be 1st union member) */
     char *pval;
@@ -211,16 +208,13 @@ typedef union YYSTYPE
 #ifdef PERL_MAD
     TOKEN* tkval;
 #endif
-
-
-
-/* Line 1676 of yacc.c  */
-} YYSTYPE;
-# define YYSTYPE_IS_TRIVIAL 1
+}
+/* Line 1489 of yacc.c.  */
+       YYSTYPE;
 # define yystype YYSTYPE /* obsolescent; will be withdrawn */
 # define YYSTYPE_IS_DECLARED 1
+# define YYSTYPE_IS_TRIVIAL 1
 #endif
 
 
 
-
index 34096e1..056c43b 100644 (file)
--- a/perly.tab
+++ b/perly.tab
@@ -1,15 +1,15 @@
 #define YYFINAL  3
 /* YYLAST -- Last index in YYTABLE.  */
-#define YYLAST   2074
+#define YYLAST   2106
 
 /* YYNTOKENS -- Number of terminals.  */
 #define YYNTOKENS  93
 /* YYNNTS -- Number of nonterminals.  */
-#define YYNNTS  65
+#define YYNNTS  67
 /* YYNRULES -- Number of rules.  */
-#define YYNRULES  213
+#define YYNRULES  216
 /* YYNRULES -- Number of states.  */
-#define YYNSTATES  425
+#define YYNSTATES  431
 
 /* YYTRANSLATE(YYLEX) -- Bison symbol number corresponding to YYLEX.  */
 #define YYUNDEFTOK  2
@@ -62,27 +62,27 @@ static const yytype_uint8 yytranslate[] =
 static const yytype_uint16 yyprhs[] =
 {
        0,     0,     3,     6,    11,    12,    13,    14,    19,    20,
-      21,    24,    27,    30,    32,    34,    37,    40,    44,    47,
-      49,    51,    55,    59,    63,    67,    71,    75,    76,    79,
-      86,    94,   102,   109,   112,   113,   116,   126,   136,   147,
-     157,   166,   179,   183,   192,   193,   194,   196,   197,   199,
-     201,   203,   205,   207,   208,   210,   212,   214,   216,   218,
-     220,   222,   224,   229,   231,   232,   239,   246,   247,   248,
-     249,   251,   252,   254,   255,   258,   260,   263,   265,   267,
-     269,   274,   275,   283,   287,   291,   295,   297,   300,   304,
-     306,   310,   316,   323,   327,   331,   337,   340,   345,   346,
-     352,   354,   356,   362,   367,   373,   378,   384,   391,   397,
-     402,   408,   413,   417,   424,   430,   434,   438,   442,   446,
+      21,    24,    27,    30,    32,    34,    37,    40,    44,    46,
+      49,    51,    53,    57,    61,    65,    69,    73,    77,    78,
+      81,    88,    96,   104,   111,   114,   115,   118,   128,   138,
+     149,   159,   168,   181,   185,   194,   195,   196,   198,   199,
+     201,   203,   205,   207,   209,   210,   212,   214,   216,   218,
+     220,   222,   224,   226,   231,   233,   234,   241,   248,   249,
+     250,   251,   253,   254,   256,   257,   260,   262,   265,   267,
+     269,   271,   276,   277,   286,   287,   295,   299,   303,   307,
+     309,   312,   316,   318,   322,   328,   335,   339,   343,   349,
+     352,   357,   358,   364,   366,   368,   374,   379,   385,   390,
+     396,   403,   409,   414,   420,   425,   429,   436,   442,   446,
      450,   454,   458,   462,   466,   470,   474,   478,   482,   486,
-     489,   492,   495,   498,   501,   504,   507,   510,   514,   517,
-     522,   526,   532,   535,   538,   543,   549,   554,   560,   562,
-     564,   566,   568,   574,   577,   579,   582,   586,   589,   591,
-     593,   595,   597,   599,   601,   606,   612,   614,   616,   620,
-     625,   629,   631,   634,   637,   639,   642,   645,   647,   650,
-     652,   655,   657,   661,   663,   667,   672,   677,   679,   681,
-     683,   685,   689,   692,   696,   699,   701,   703,   705,   706,
-     708,   709,   711,   714,   716,   719,   722,   725,   728,   731,
-     734,   736,   738,   740
+     490,   494,   498,   501,   504,   507,   510,   513,   516,   519,
+     522,   526,   529,   534,   538,   544,   547,   550,   555,   561,
+     566,   572,   574,   576,   578,   580,   586,   589,   591,   594,
+     598,   601,   603,   605,   607,   609,   611,   613,   618,   624,
+     626,   628,   632,   637,   641,   643,   646,   649,   651,   654,
+     657,   659,   662,   664,   667,   669,   673,   675,   679,   684,
+     689,   691,   693,   695,   697,   701,   704,   708,   711,   713,
+     715,   717,   718,   720,   721,   723,   726,   728,   731,   734,
+     737,   740,   743,   746,   748,   750,   752
 };
 
 /* YYRHS -- A `-1'-separated list of the rules' RHS.  */
@@ -92,104 +92,105 @@ static const yytype_int16 yyrhs[] =
       -1,    -1,    -1,    -1,     3,   100,   101,     4,    -1,    -1,
       -1,   101,   118,    -1,   101,   102,    -1,   117,   105,    -1,
      108,    -1,   109,    -1,   117,   106,    -1,   117,    14,    -1,
-     117,   103,    14,    -1,   117,    25,    -1,     1,    -1,   135,
-      -1,   135,    34,   135,    -1,   135,    35,   135,    -1,   135,
-      32,   135,    -1,   135,    33,   113,    -1,   135,    39,   135,
-      -1,   135,    41,   135,    -1,    -1,    36,    99,    -1,    37,
-      91,   114,    90,    99,   104,    -1,    34,    91,    96,   114,
-      90,    99,   104,    -1,    35,    91,    96,   116,    90,    99,
-     104,    -1,    41,    91,    96,   114,    90,    99,    -1,    42,
-      95,    -1,    -1,    38,    95,    -1,   117,    32,    91,    96,
-     112,    90,   110,    99,   107,    -1,   117,    33,    91,    96,
-     113,    90,   110,    99,   107,    -1,   117,    39,    60,    96,
-     150,    91,   114,    90,    99,   107,    -1,   117,    39,   152,
-      91,    96,   114,    90,    99,   107,    -1,   117,    39,    91,
-      96,   114,    90,    99,   107,    -1,   117,    39,    91,    96,
-     115,    14,   112,    14,   110,   115,    90,    99,    -1,   117,
-      95,   107,    -1,   117,    40,    91,    96,    97,   114,    90,
-      99,    -1,    -1,    -1,   103,    -1,    -1,   135,    -1,   135,
-      -1,   135,    -1,   111,    -1,   113,    -1,    -1,    26,    -1,
-     120,    -1,   123,    -1,   122,    -1,   132,    -1,   133,    -1,
-     119,    -1,    92,    -1,    27,   126,   121,    95,    -1,    15,
-      -1,    -1,    61,   124,   127,   128,   129,   131,    -1,    28,
-     124,   127,   128,   129,   131,    -1,    -1,    -1,    -1,    15,
-      -1,    -1,    18,    -1,    -1,    63,    18,    -1,    63,    -1,
-      63,    18,    -1,    63,    -1,    95,    -1,    14,    -1,    30,
-      15,    15,    14,    -1,    -1,    31,   124,   134,    15,    15,
-     148,    14,    -1,   135,    67,   135,    -1,   135,    66,   135,
-      -1,   135,    65,   135,    -1,   136,    -1,   136,    69,    -1,
-     136,    69,   145,    -1,   145,    -1,    50,   157,   136,    -1,
-      48,    91,   157,   135,    90,    -1,   145,    89,   139,    91,
-     149,    90,    -1,   145,    89,   139,    -1,    16,   157,   148,
-      -1,    17,   157,    91,   149,    90,    -1,    50,   148,    -1,
-      48,    91,   149,    90,    -1,    -1,    23,   125,    95,   138,
-     148,    -1,    16,    -1,   152,    -1,   156,     3,   135,    14,
-       4,    -1,   152,     5,   135,     6,    -1,   145,    89,     5,
-     135,     6,    -1,   140,     5,   135,     6,    -1,   152,     3,
-     135,    14,     4,    -1,   145,    89,     3,   135,    14,     4,
-      -1,   140,     3,   135,    14,     4,    -1,   145,    89,    91,
-      90,    -1,   145,    89,    91,   135,    90,    -1,   140,    91,
-     135,    90,    -1,   140,    91,    90,    -1,    91,   135,    90,
-       5,   135,     6,    -1,    91,    90,     5,   135,     6,    -1,
-     145,    70,   145,    -1,   145,    84,   145,    -1,   145,    53,
-     145,    -1,   145,    54,   145,    -1,   145,    78,   145,    -1,
-     145,    51,   145,    -1,   145,    52,   145,    -1,   145,    77,
-     145,    -1,   145,    76,   145,    -1,   145,    44,   145,    -1,
-     145,    75,   145,    -1,   145,    74,   145,    -1,   145,    73,
-     145,    -1,   145,    79,   145,    -1,     7,   145,    -1,     8,
-     145,    -1,    80,   145,    -1,    81,   145,    -1,   145,    86,
-      -1,   145,    85,    -1,    88,   145,    -1,    87,   145,    -1,
-       5,   135,     6,    -1,     5,     6,    -1,    57,   135,    14,
-       4,    -1,    57,    14,     4,    -1,    29,   125,   128,   129,
-      95,    -1,    56,   145,    -1,    56,    95,    -1,    56,    15,
-      91,    90,    -1,    56,    15,    91,   135,    90,    -1,    56,
-     152,    91,    90,    -1,    56,   152,    91,   135,    90,    -1,
-     141,    -1,   142,    -1,   143,    -1,   144,    -1,   145,    71,
-     145,    72,   145,    -1,    82,   145,    -1,   146,    -1,    59,
-     145,    -1,    91,   135,    90,    -1,    91,    90,    -1,   152,
-      -1,   156,    -1,   154,    -1,   153,    -1,   155,    -1,   140,
-      -1,   153,     5,   135,     6,    -1,   153,     3,   135,    14,
-       4,    -1,    18,    -1,   151,    -1,   151,    91,    90,    -1,
-     151,    91,   135,    90,    -1,    58,    15,   148,    -1,    43,
-      -1,    43,   145,    -1,    68,   136,    -1,    49,    -1,    49,
-      95,    -1,    49,   145,    -1,    62,    -1,    62,   145,    -1,
-      22,    -1,    22,   145,    -1,    46,    -1,    46,    91,    90,
-      -1,    21,    -1,    47,    91,    90,    -1,    47,    91,   135,
-      90,    -1,    19,    91,   136,    90,    -1,    15,    -1,   137,
-      -1,    45,    -1,    24,    -1,    60,   147,   130,    -1,    60,
-     147,    -1,    91,   135,    90,    -1,    91,    90,    -1,   152,
-      -1,   154,    -1,   153,    -1,    -1,   136,    -1,    -1,   135,
-      -1,   135,    69,    -1,   152,    -1,    13,   157,    -1,     9,
-     157,    -1,    10,   157,    -1,    11,   157,    -1,    55,   157,
-      -1,    12,   157,    -1,    15,    -1,   152,    -1,    95,    -1,
-      20,    -1
+     117,   103,    14,    -1,   133,    -1,   117,    25,    -1,     1,
+      -1,   137,    -1,   137,    34,   137,    -1,   137,    35,   137,
+      -1,   137,    32,   137,    -1,   137,    33,   113,    -1,   137,
+      39,   137,    -1,   137,    41,   137,    -1,    -1,    36,    99,
+      -1,    37,    91,   114,    90,    99,   104,    -1,    34,    91,
+      96,   114,    90,    99,   104,    -1,    35,    91,    96,   116,
+      90,    99,   104,    -1,    41,    91,    96,   114,    90,    99,
+      -1,    42,    95,    -1,    -1,    38,    95,    -1,   117,    32,
+      91,    96,   112,    90,   110,    99,   107,    -1,   117,    33,
+      91,    96,   113,    90,   110,    99,   107,    -1,   117,    39,
+      60,    96,   152,    91,   114,    90,    99,   107,    -1,   117,
+      39,   154,    91,    96,   114,    90,    99,   107,    -1,   117,
+      39,    91,    96,   114,    90,    99,   107,    -1,   117,    39,
+      91,    96,   115,    14,   112,    14,   110,   115,    90,    99,
+      -1,   117,    95,   107,    -1,   117,    40,    91,    96,    97,
+     114,    90,    99,    -1,    -1,    -1,   103,    -1,    -1,   137,
+      -1,   137,    -1,   137,    -1,   111,    -1,   113,    -1,    -1,
+      26,    -1,   120,    -1,   123,    -1,   122,    -1,   132,    -1,
+     135,    -1,   119,    -1,    92,    -1,    27,   126,   121,    95,
+      -1,    15,    -1,    -1,    61,   124,   127,   128,   129,   131,
+      -1,    28,   124,   127,   128,   129,   131,    -1,    -1,    -1,
+      -1,    15,    -1,    -1,    18,    -1,    -1,    63,    18,    -1,
+      63,    -1,    63,    18,    -1,    63,    -1,    95,    -1,    14,
+      -1,    30,    15,    15,    14,    -1,    -1,    30,    15,    15,
+       3,    96,   134,   101,     4,    -1,    -1,    31,   124,   136,
+      15,    15,   150,    14,    -1,   137,    67,   137,    -1,   137,
+      66,   137,    -1,   137,    65,   137,    -1,   138,    -1,   138,
+      69,    -1,   138,    69,   147,    -1,   147,    -1,    50,   159,
+     138,    -1,    48,    91,   159,   137,    90,    -1,   147,    89,
+     141,    91,   151,    90,    -1,   147,    89,   141,    -1,    16,
+     159,   150,    -1,    17,   159,    91,   151,    90,    -1,    50,
+     150,    -1,    48,    91,   151,    90,    -1,    -1,    23,   125,
+      95,   140,   150,    -1,    16,    -1,   154,    -1,   158,     3,
+     137,    14,     4,    -1,   154,     5,   137,     6,    -1,   147,
+      89,     5,   137,     6,    -1,   142,     5,   137,     6,    -1,
+     154,     3,   137,    14,     4,    -1,   147,    89,     3,   137,
+      14,     4,    -1,   142,     3,   137,    14,     4,    -1,   147,
+      89,    91,    90,    -1,   147,    89,    91,   137,    90,    -1,
+     142,    91,   137,    90,    -1,   142,    91,    90,    -1,    91,
+     137,    90,     5,   137,     6,    -1,    91,    90,     5,   137,
+       6,    -1,   147,    70,   147,    -1,   147,    84,   147,    -1,
+     147,    53,   147,    -1,   147,    54,   147,    -1,   147,    78,
+     147,    -1,   147,    51,   147,    -1,   147,    52,   147,    -1,
+     147,    77,   147,    -1,   147,    76,   147,    -1,   147,    44,
+     147,    -1,   147,    75,   147,    -1,   147,    74,   147,    -1,
+     147,    73,   147,    -1,   147,    79,   147,    -1,     7,   147,
+      -1,     8,   147,    -1,    80,   147,    -1,    81,   147,    -1,
+     147,    86,    -1,   147,    85,    -1,    88,   147,    -1,    87,
+     147,    -1,     5,   137,     6,    -1,     5,     6,    -1,    57,
+     137,    14,     4,    -1,    57,    14,     4,    -1,    29,   125,
+     128,   129,    95,    -1,    56,   147,    -1,    56,    95,    -1,
+      56,    15,    91,    90,    -1,    56,    15,    91,   137,    90,
+      -1,    56,   154,    91,    90,    -1,    56,   154,    91,   137,
+      90,    -1,   143,    -1,   144,    -1,   145,    -1,   146,    -1,
+     147,    71,   147,    72,   147,    -1,    82,   147,    -1,   148,
+      -1,    59,   147,    -1,    91,   137,    90,    -1,    91,    90,
+      -1,   154,    -1,   158,    -1,   156,    -1,   155,    -1,   157,
+      -1,   142,    -1,   155,     5,   137,     6,    -1,   155,     3,
+     137,    14,     4,    -1,    18,    -1,   153,    -1,   153,    91,
+      90,    -1,   153,    91,   137,    90,    -1,    58,    15,   150,
+      -1,    43,    -1,    43,   147,    -1,    68,   138,    -1,    49,
+      -1,    49,    95,    -1,    49,   147,    -1,    62,    -1,    62,
+     147,    -1,    22,    -1,    22,   147,    -1,    46,    -1,    46,
+      91,    90,    -1,    21,    -1,    47,    91,    90,    -1,    47,
+      91,   137,    90,    -1,    19,    91,   138,    90,    -1,    15,
+      -1,   139,    -1,    45,    -1,    24,    -1,    60,   149,   130,
+      -1,    60,   149,    -1,    91,   137,    90,    -1,    91,    90,
+      -1,   154,    -1,   156,    -1,   155,    -1,    -1,   138,    -1,
+      -1,   137,    -1,   137,    69,    -1,   154,    -1,    13,   159,
+      -1,     9,   159,    -1,    10,   159,    -1,    11,   159,    -1,
+      55,   159,    -1,    12,   159,    -1,    15,    -1,   154,    -1,
+      95,    -1,    20,    -1
 };
 
 /* YYRLINE[YYN] -- source line where rule number YYN was defined.  */
 static const yytype_uint16 yyrline[] =
 {
        0,   141,   141,   147,   157,   161,   165,   171,   181,   186,
-     187,   194,   204,   207,   208,   210,   212,   229,   245,   250,
-     252,   254,   258,   262,   266,   270,   275,   281,   282,   286,
-     297,   305,   316,   319,   325,   326,   333,   346,   358,   369,
-     379,   389,   421,   429,   439,   445,   446,   451,   454,   458,
-     463,   467,   471,   477,   486,   490,   492,   494,   496,   498,
-     503,   507,   513,   533,   534,   538,   551,   574,   580,   585,
-     590,   600,   601,   606,   607,   611,   621,   625,   635,   636,
-     645,   663,   662,   681,   685,   689,   693,   697,   707,   716,
-     720,   725,   732,   741,   747,   753,   761,   765,   772,   771,
-     782,   783,   787,   796,   801,   809,   816,   823,   833,   842,
-     849,   858,   865,   871,   878,   888,   892,   896,   902,   906,
-     910,   914,   918,   922,   926,   938,   942,   946,   950,   960,
-     964,   971,   975,   979,   984,   989,   994,  1003,  1008,  1013,
-    1019,  1025,  1036,  1040,  1044,  1056,  1069,  1077,  1089,  1090,
-    1091,  1092,  1093,  1098,  1102,  1104,  1108,  1113,  1118,  1120,
-    1122,  1124,  1126,  1128,  1130,  1139,  1150,  1152,  1154,  1159,
-    1172,  1177,  1182,  1186,  1190,  1194,  1198,  1202,  1206,  1210,
-    1212,  1215,  1219,  1225,  1228,  1237,  1243,  1248,  1249,  1250,
-    1256,  1260,  1268,  1275,  1280,  1285,  1287,  1289,  1294,  1296,
-    1301,  1302,  1304,  1319,  1323,  1329,  1335,  1341,  1347,  1353,
-    1360,  1362,  1364,  1367
+     187,   194,   204,   207,   208,   210,   212,   229,   245,   251,
+     256,   258,   260,   264,   268,   272,   276,   281,   287,   288,
+     292,   303,   311,   322,   325,   331,   332,   339,   352,   364,
+     375,   385,   395,   427,   435,   445,   451,   452,   457,   460,
+     464,   469,   473,   477,   483,   492,   496,   498,   500,   502,
+     504,   509,   513,   519,   539,   540,   544,   557,   580,   586,
+     591,   596,   606,   607,   612,   613,   617,   627,   631,   641,
+     642,   651,   669,   668,   684,   683,   702,   706,   710,   714,
+     718,   728,   737,   741,   746,   753,   762,   768,   774,   782,
+     786,   793,   792,   803,   804,   808,   817,   822,   830,   837,
+     844,   854,   863,   870,   879,   886,   892,   899,   909,   913,
+     917,   923,   927,   931,   935,   939,   943,   947,   959,   963,
+     967,   971,   981,   985,   992,   996,  1000,  1005,  1010,  1015,
+    1024,  1029,  1034,  1040,  1046,  1057,  1061,  1065,  1077,  1090,
+    1098,  1110,  1111,  1112,  1113,  1114,  1119,  1123,  1125,  1129,
+    1134,  1139,  1141,  1143,  1145,  1147,  1149,  1151,  1160,  1171,
+    1173,  1175,  1180,  1193,  1198,  1203,  1207,  1211,  1215,  1219,
+    1223,  1227,  1231,  1233,  1236,  1240,  1246,  1249,  1258,  1264,
+    1269,  1270,  1271,  1277,  1281,  1289,  1296,  1301,  1306,  1308,
+    1310,  1315,  1317,  1322,  1323,  1325,  1340,  1344,  1350,  1356,
+    1362,  1368,  1374,  1381,  1383,  1385,  1388
 };
 #endif
 
@@ -216,10 +217,11 @@ static const char *const yytname[] =
   "mexpr", "mnexpr", "miexpr", "label", "decl", "peg", "format",
   "formname", "mysubrout", "subrout", "startsub", "startanonsub",
   "startformsub", "subname", "proto", "subattrlist", "myattrlist",
-  "subbody", "package", "use", "$@1", "expr", "argexpr", "listop", "@2",
-  "method", "subscripted", "termbinop", "termunop", "anonymous", "termdo",
-  "term", "myattrterm", "myterm", "listexpr", "listexprcom", "my_scalar",
-  "amper", "scalar", "ary", "hsh", "arylen", "star", "indirob", 0
+  "subbody", "package", "package_block", "@1", "use", "@2", "expr",
+  "argexpr", "listop", "@3", "method", "subscripted", "termbinop",
+  "termunop", "anonymous", "termdo", "term", "myattrterm", "myterm",
+  "listexpr", "listexprcom", "my_scalar", "amper", "scalar", "ary", "hsh",
+  "arylen", "star", "indirob", 0
 };
 #endif
 
@@ -245,54 +247,54 @@ static const yytype_uint16 yytoknum[] =
 static const yytype_uint8 yyr1[] =
 {
        0,    93,    94,    95,    96,    97,    98,    99,   100,   101,
-     101,   101,   102,   102,   102,   102,   102,   102,   102,   103,
-     103,   103,   103,   103,   103,   103,   103,   104,   104,   104,
-     105,   105,   106,   106,   107,   107,   108,   108,   108,   108,
-     108,   108,   108,   109,   110,   111,   111,   112,   112,   113,
-     114,   115,   116,   117,   117,   118,   118,   118,   118,   118,
-     118,   119,   120,   121,   121,   122,   123,   124,   125,   126,
-     127,   128,   128,   129,   129,   129,   130,   130,   131,   131,
-     132,   134,   133,   135,   135,   135,   135,   136,   136,   136,
-     137,   137,   137,   137,   137,   137,   137,   137,   138,   137,
-     139,   139,   140,   140,   140,   140,   140,   140,   140,   140,
-     140,   140,   140,   140,   140,   141,   141,   141,   141,   141,
-     141,   141,   141,   141,   141,   141,   141,   141,   141,   142,
-     142,   142,   142,   142,   142,   142,   142,   143,   143,   143,
-     143,   143,   144,   144,   144,   144,   144,   144,   145,   145,
-     145,   145,   145,   145,   145,   145,   145,   145,   145,   145,
-     145,   145,   145,   145,   145,   145,   145,   145,   145,   145,
-     145,   145,   145,   145,   145,   145,   145,   145,   145,   145,
-     145,   145,   145,   145,   145,   145,   145,   145,   145,   145,
-     145,   146,   146,   147,   147,   147,   147,   147,   148,   148,
-     149,   149,   149,   150,   151,   152,   153,   154,   155,   156,
-     157,   157,   157,   157
+     101,   101,   102,   102,   102,   102,   102,   102,   102,   102,
+     103,   103,   103,   103,   103,   103,   103,   103,   104,   104,
+     104,   105,   105,   106,   106,   107,   107,   108,   108,   108,
+     108,   108,   108,   108,   109,   110,   111,   111,   112,   112,
+     113,   114,   115,   116,   117,   117,   118,   118,   118,   118,
+     118,   118,   119,   120,   121,   121,   122,   123,   124,   125,
+     126,   127,   128,   128,   129,   129,   129,   130,   130,   131,
+     131,   132,   134,   133,   136,   135,   137,   137,   137,   137,
+     138,   138,   138,   139,   139,   139,   139,   139,   139,   139,
+     139,   140,   139,   141,   141,   142,   142,   142,   142,   142,
+     142,   142,   142,   142,   142,   142,   142,   142,   143,   143,
+     143,   143,   143,   143,   143,   143,   143,   143,   143,   143,
+     143,   143,   144,   144,   144,   144,   144,   144,   144,   144,
+     145,   145,   145,   145,   145,   146,   146,   146,   146,   146,
+     146,   147,   147,   147,   147,   147,   147,   147,   147,   147,
+     147,   147,   147,   147,   147,   147,   147,   147,   147,   147,
+     147,   147,   147,   147,   147,   147,   147,   147,   147,   147,
+     147,   147,   147,   147,   147,   147,   147,   147,   147,   147,
+     147,   147,   147,   147,   148,   148,   149,   149,   149,   149,
+     149,   150,   150,   151,   151,   151,   152,   153,   154,   155,
+     156,   157,   158,   159,   159,   159,   159
 };
 
 /* YYR2[YYN] -- Number of symbols composing right hand side of rule YYN.  */
 static const yytype_uint8 yyr2[] =
 {
        0,     2,     2,     4,     0,     0,     0,     4,     0,     0,
-       2,     2,     2,     1,     1,     2,     2,     3,     2,     1,
-       1,     3,     3,     3,     3,     3,     3,     0,     2,     6,
-       7,     7,     6,     2,     0,     2,     9,     9,    10,     9,
-       8,    12,     3,     8,     0,     0,     1,     0,     1,     1,
-       1,     1,     1,     0,     1,     1,     1,     1,     1,     1,
-       1,     1,     4,     1,     0,     6,     6,     0,     0,     0,
-       1,     0,     1,     0,     2,     1,     2,     1,     1,     1,
-       4,     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,     6,     5,     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,     4,     5,     1,     1,     3,     4,
-       3,     1,     2,     2,     1,     2,     2,     1,     2,     1,
-       2,     1,     3,     1,     3,     4,     4,     1,     1,     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
+       2,     2,     2,     1,     1,     2,     2,     3,     1,     2,
+       1,     1,     3,     3,     3,     3,     3,     3,     0,     2,
+       6,     7,     7,     6,     2,     0,     2,     9,     9,    10,
+       9,     8,    12,     3,     8,     0,     0,     1,     0,     1,
+       1,     1,     1,     1,     0,     1,     1,     1,     1,     1,
+       1,     1,     1,     4,     1,     0,     6,     6,     0,     0,
+       0,     1,     0,     1,     0,     2,     1,     2,     1,     1,
+       1,     4,     0,     8,     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,     6,     5,     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,     4,     5,     1,
+       1,     3,     4,     3,     1,     2,     2,     1,     2,     2,
+       1,     2,     1,     2,     1,     3,     1,     3,     4,     4,
+       1,     1,     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
 };
 
 /* YYDEFACT[STATE-NAME] -- Default rule to reduce with in state
@@ -300,458 +302,497 @@ static const yytype_uint8 yyr2[] =
    means the default is an error.  */
 static const yytype_uint8 yydefact[] =
 {
-       6,     0,     9,     1,    53,    54,    69,    67,     0,    67,
-      67,    61,    11,    13,    14,     0,    10,    60,    55,    57,
-      56,    58,    59,    64,     0,     0,    81,     0,    19,     4,
-       0,     0,     0,     0,     0,     0,     0,     0,    16,   187,
-       0,     0,   166,     0,   183,   179,    68,   190,    18,    68,
-       0,     0,     0,     0,     0,     0,     0,     0,   171,   189,
-     181,     0,     0,   174,   198,     0,     0,     0,     0,     0,
-       0,   177,     0,     0,     0,     0,     0,     0,     0,    34,
-       0,    12,    15,    20,    86,   188,   163,   148,   149,   150,
-     151,    89,   154,   167,   158,   161,   160,   162,   159,    63,
-       0,    70,    71,     0,     0,    71,     9,   138,     0,   129,
-     130,   210,   213,   212,   211,   205,   206,   207,   209,   204,
-     198,     0,     0,   180,     0,    71,     4,     4,     4,     4,
-       4,     4,     0,     4,     4,    33,   172,     0,     0,   200,
-     175,   176,   210,   199,    96,   211,     0,   208,   187,   143,
-     142,   158,     0,     0,   198,   155,     0,   192,   195,   197,
-     196,   178,   173,   131,   132,   153,   136,   135,   157,     0,
-       0,    42,    17,     0,     0,     0,     0,     0,     0,     0,
-       0,     0,    87,     0,     0,     0,     0,     0,     0,     0,
+       6,     0,     9,     1,    54,    55,    70,    68,     0,    68,
+      68,    62,    11,    13,    14,     0,    10,    61,    56,    58,
+      57,    59,    18,    60,    65,     0,     0,    84,     0,    20,
+       4,     0,     0,     0,     0,     0,     0,     0,     0,    16,
+     190,     0,     0,   169,     0,   186,   182,    69,   193,    19,
+      69,     0,     0,     0,     0,     0,     0,     0,     0,   174,
+     192,   184,     0,     0,   177,   201,     0,     0,     0,     0,
+       0,     0,   180,     0,     0,     0,     0,     0,     0,     0,
+      35,     0,    12,    15,    21,    89,   191,   166,   151,   152,
+     153,   154,    92,   157,   170,   161,   164,   163,   165,   162,
+      64,     0,    71,    72,     0,     0,    72,     9,   141,     0,
+     132,   133,   213,   216,   215,   214,   208,   209,   210,   212,
+     207,   201,     0,     0,   183,     0,    72,     4,     4,     4,
+       4,     4,     4,     0,     4,     4,    34,   175,     0,     0,
+     203,   178,   179,   213,   202,    99,   214,     0,   211,   190,
+     146,   145,   161,     0,     0,   201,   158,     0,   195,   198,
+     200,   199,   181,   176,   134,   135,   156,   139,   138,   160,
+       0,     0,    43,    17,     0,     0,     0,     0,     0,     0,
+       0,     0,     0,    90,     0,     0,     0,     0,     0,     0,
        0,     0,     0,     0,     0,     0,     0,     0,     0,     0,
-       0,   134,   133,     0,     0,     0,     0,     0,     0,     0,
-      62,    72,    73,    80,     0,    73,    53,   137,    94,   200,
-       0,    98,    73,    47,     0,     0,     0,     0,     0,     4,
-       5,     0,   182,   184,     0,   201,     0,     0,    90,     0,
-       0,   140,     0,   170,   194,     0,    77,   191,     0,   156,
-      35,    23,    24,    49,    21,    22,    25,    26,    85,    84,
-      83,    88,     0,     0,   112,     0,   124,   120,   121,   117,
-     118,   115,     0,   127,   126,   125,   123,   122,   119,   128,
-     116,     0,     0,   100,     0,    93,   101,   168,     0,     0,
-       0,     0,     0,     0,    75,     0,   198,     0,     3,     0,
-     186,   198,     0,     0,    48,     0,     0,    50,    52,     0,
-       0,   203,    46,    51,     0,     0,    20,     0,     0,     0,
-     185,   202,    97,     0,   144,     0,   146,     0,   139,   193,
-      76,     0,     0,     0,   105,   111,     0,     0,     0,   109,
-       0,   200,   169,     0,   103,     0,   164,     0,    74,    79,
-      78,    66,     0,    65,    95,    99,   141,    44,    44,     0,
-       0,     0,     0,    47,     0,     0,     0,    91,   145,   147,
-     114,     0,   108,   152,     0,   104,   110,     0,   106,   165,
-     102,    82,     0,     0,     8,    27,    27,     0,    34,     0,
-       0,     0,    32,   113,   107,    92,    34,    34,     9,     0,
-       0,    30,    31,     0,    40,    44,    34,    43,    36,    37,
-      53,    28,     0,    34,     0,    39,     7,     0,    38,     0,
-       0,     0,    27,    41,    29
+       0,     0,   137,   136,     0,     0,     0,     0,     0,     0,
+       0,    63,    73,    74,     4,    81,     0,    74,    54,   140,
+      97,   203,     0,   101,    74,    48,     0,     0,     0,     0,
+       0,     4,     5,     0,   185,   187,     0,   204,     0,     0,
+      93,     0,     0,   143,     0,   173,   197,     0,    78,   194,
+       0,   159,    36,    24,    25,    50,    22,    23,    26,    27,
+      88,    87,    86,    91,     0,     0,   115,     0,   127,   123,
+     124,   120,   121,   118,     0,   130,   129,   128,   126,   125,
+     122,   131,   119,     0,     0,   103,     0,    96,   104,   171,
+       0,     0,     0,     0,     0,     0,    76,     0,    82,   201,
+       0,     3,     0,   189,   201,     0,     0,    49,     0,     0,
+      51,    53,     0,     0,   206,    47,    52,     0,     0,    21,
+       0,     0,     0,   188,   205,   100,     0,   147,     0,   149,
+       0,   142,   196,    77,     0,     0,     0,   108,   114,     0,
+       0,     0,   112,     0,   203,   172,     0,   106,     0,   167,
+       0,    75,    80,    79,    67,     9,     0,    66,    98,   102,
+     144,    45,    45,     0,     0,     0,     0,    48,     0,     0,
+       0,    94,   148,   150,   117,     0,   111,   155,     0,   107,
+     113,     0,   109,   168,   105,    54,    85,     0,     0,     8,
+      28,    28,     0,    35,     0,     0,     0,    33,   116,   110,
+      95,    83,    35,    35,     9,     0,     0,    31,    32,     0,
+      41,    45,    35,    44,    37,    38,    54,    29,     0,    35,
+       0,    40,     7,     0,    39,     0,     0,     0,    28,    42,
+      30
 };
 
 /* YYDEFGOTO[NTERM-NUM].  */
 static const yytype_int16 yydefgoto[] =
 {
-      -1,     1,   113,   106,   318,     2,   385,   398,     4,    12,
-     312,   401,    81,    82,   171,    13,    14,   382,   313,   303,
-     252,   306,   315,   309,    15,    16,    17,    18,   100,    19,
-      20,    24,   124,    23,   102,   212,   295,   247,   351,    21,
-      22,   104,   307,    84,    85,   301,   285,    86,    87,    88,
-      89,    90,    91,    92,   157,   144,   236,   310,    93,    94,
-      95,    96,    97,    98,   115
+      -1,     1,   114,   107,   321,     2,   390,   404,     4,    12,
+     315,   407,    82,    83,   172,    13,    14,   387,   316,   306,
+     254,   309,   318,   312,    15,    16,    17,    18,   101,    19,
+      20,    25,   125,    24,   103,   213,   297,   249,   354,    21,
+      22,   355,    23,   105,   310,    85,    86,   304,   287,    87,
+      88,    89,    90,    91,    92,    93,   158,   145,   238,   313,
+      94,    95,    96,    97,    98,    99,   116
 };
 
 /* YYPACT[STATE-NUM] -- Index in YYTABLE of the portion describing
    STATE-NUM.  */
-#define YYPACT_NINF -373
+#define YYPACT_NINF -383
 static const yytype_int16 yypact[] =
 {
-    -373,    28,  -373,  -373,     3,  -373,  -373,  -373,    65,  -373,
-    -373,  -373,  -373,  -373,  -373,   320,  -373,  -373,  -373,  -373,
-    -373,  -373,  -373,    74,    75,    84,  -373,    75,  -373,  -373,
-     899,  1765,  1765,   378,   378,   378,   378,   378,  -373,  -373,
-     378,   378,  -373,   -67,  -373,  1765,  -373,  -373,  -373,  -373,
-     -51,   -24,    -8,    -5,     9,    37,    76,   147,  1765,  -373,
-      89,    92,    97,   666,   579,   378,   753,   984,   141,  1765,
-      12,  1765,  1765,  1765,  1765,  1765,  1765,  1765,  1069,   137,
-     167,  -373,  -373,  1067,   115,  -373,    48,  -373,  -373,  -373,
-    -373,  1907,  -373,   104,    93,   110,  -373,  -373,   207,  -373,
-     147,  -373,   200,   209,   214,   200,  -373,  -373,   140,    68,
-      68,  -373,  -373,  -373,  -373,  -373,  -373,  -373,  -373,  -373,
-    1765,   135,  1765,   230,   147,   200,  -373,  -373,  -373,  -373,
-    -373,  -373,   146,  -373,  -373,  -373,  1907,   151,  1156,   579,
-    -373,   230,  1825,   115,  -373,   813,  1765,  -373,   169,  -373,
-     230,    52,   260,   120,  1765,   230,  1243,   202,  -373,  -373,
-    -373,   230,   115,    68,    68,    68,    59,    59,   263,   319,
-     147,  -373,  -373,  1765,  1765,  1765,  1765,  1765,  1765,  1765,
-    1765,  1765,  1765,  1765,  1765,  1330,  1765,  1765,  1765,  1765,
-    1765,  1765,  1765,  1765,  1765,  1765,  1765,  1765,  1765,  1765,
-    1765,  -373,  -373,    88,  1417,  1765,  1765,  1765,  1765,  1765,
-    -373,  -373,   212,  -373,   259,   212,    81,  -373,  -373,  1765,
-     -43,  -373,   212,  1765,  1765,  1765,  1765,   270,   405,  -373,
-    -373,  1765,  -373,  -373,   366,    71,   195,  1765,   115,  1504,
-    1591,  -373,   288,  -373,  -373,   461,   276,  -373,  1765,   290,
-    -373,   224,  -373,   224,   224,   224,   224,   224,   231,   231,
-    -373,  1907,   221,   149,  -373,   540,  1985,   970,   884,   525,
-     217,  1907,  1868,   478,   478,   566,   652,   931,   393,    68,
-      68,  1765,  1765,  -373,  1678,   216,  -373,  -373,   627,   245,
-     165,   291,   196,   306,   282,    24,  1765,    24,  -373,   223,
-    -373,  1765,   147,   228,   224,   232,   234,   224,  -373,   250,
-     255,  -373,  -373,  -373,   257,   336,   404,  1765,  1765,   261,
-    -373,  -373,  -373,   653,  -373,   714,  -373,   724,  -373,  -373,
-    -373,   206,  1765,   360,  -373,  -373,  1765,   375,   211,  -373,
-     727,  1765,  -373,   370,  -373,   379,  -373,   386,  -373,  -373,
-    -373,  -373,   377,  -373,  -373,  -373,  -373,  -373,  -373,   391,
-     391,  1765,   391,  1765,   305,   307,   391,  -373,  -373,  -373,
-    -373,   215,  -373,  1946,   392,  -373,  -373,   313,  -373,  -373,
-    -373,  -373,   391,   391,  -373,    25,    25,   314,   137,   411,
-     391,   391,  -373,  -373,  -373,  -373,   137,   137,  -373,   391,
-     339,  -373,  -373,   391,  -373,  -373,   137,  -373,  -373,  -373,
-      90,  -373,  1765,   137,   490,  -373,  -373,   315,  -373,   345,
-     391,   391,    25,  -373,  -373
+    -383,    35,  -383,  -383,    51,  -383,  -383,  -383,    -8,  -383,
+    -383,  -383,  -383,  -383,  -383,   399,  -383,  -383,  -383,  -383,
+    -383,  -383,  -383,  -383,    40,    45,    69,  -383,    45,  -383,
+    -383,   978,  1844,  1844,   216,   216,   216,   216,   216,  -383,
+    -383,   216,   216,  -383,   -50,  -383,  1844,  -383,  -383,  -383,
+    -383,   -21,     9,    18,    22,     5,    25,    46,   145,  1844,
+    -383,    66,    67,    77,   745,   658,   216,   832,  1063,   173,
+    1844,    23,  1844,  1844,  1844,  1844,  1844,  1844,  1844,  1148,
+     140,   182,  -383,  -383,  1146,   133,  -383,     3,  -383,  -383,
+    -383,  -383,  1939,  -383,   112,   148,   176,  -383,  -383,   206,
+    -383,   145,  -383,   198,    26,   197,   198,  -383,  -383,    32,
+      60,    60,  -383,  -383,  -383,  -383,  -383,  -383,  -383,  -383,
+    -383,  1844,   130,  1844,   863,   145,   198,  -383,  -383,  -383,
+    -383,  -383,  -383,   131,  -383,  -383,  -383,  1939,   142,  1235,
+     658,  -383,   863,   304,   133,  -383,   892,  1844,  -383,   150,
+    -383,   863,    10,   229,    89,  1844,   863,  1322,   202,  -383,
+    -383,  -383,   863,   133,    60,    60,    60,     1,     1,   267,
+     250,   145,  -383,  -383,  1844,  1844,  1844,  1844,  1844,  1844,
+    1844,  1844,  1844,  1844,  1844,  1844,  1409,  1844,  1844,  1844,
+    1844,  1844,  1844,  1844,  1844,  1844,  1844,  1844,  1844,  1844,
+    1844,  1844,  -383,  -383,    47,  1496,  1844,  1844,  1844,  1844,
+    1844,  -383,  -383,   207,  -383,  -383,   270,   207,    91,  -383,
+    -383,  1844,   -51,  -383,   207,  1844,  1844,  1844,  1844,   277,
+     484,  -383,  -383,  1844,  -383,  -383,   360,   449,   203,  1844,
+     133,  1583,  1670,  -383,   283,  -383,  -383,   386,   276,  -383,
+    1844,   290,  -383,   -45,  -383,   -45,   -45,   -45,   -45,   -45,
+     221,   221,  -383,  1939,   194,    41,  -383,   445,  2017,  1010,
+     730,   265,   384,  1939,  1900,   472,   472,   556,   644,   963,
+     246,    60,    60,  1844,  1844,  -383,  1757,   215,  -383,  -383,
+     455,   294,    74,   297,   208,   319,   284,    55,  -383,  1844,
+      55,  -383,   222,  -383,  1844,   145,   223,   -45,   224,   231,
+     -45,  -383,   237,   228,  -383,  -383,  -383,   244,   291,   257,
+    1844,  1844,   251,  -383,  -383,  -383,   530,  -383,   619,  -383,
+     645,  -383,  -383,  -383,   211,  1844,   322,  -383,  -383,  1844,
+     332,   214,  -383,   706,  1844,  -383,   338,  -383,   349,  -383,
+     361,  -383,  -383,  -383,  -383,  -383,   352,  -383,  -383,  -383,
+    -383,  -383,  -383,   365,   365,  1844,   365,  1844,   282,   301,
+     365,  -383,  -383,  -383,  -383,   217,  -383,  1978,   383,  -383,
+    -383,   306,  -383,  -383,  -383,   146,  -383,   365,   365,  -383,
+      38,    38,   311,   140,   389,   365,   365,  -383,  -383,  -383,
+    -383,  -383,   140,   140,  -383,   365,   328,  -383,  -383,   365,
+    -383,  -383,   140,  -383,  -383,  -383,   236,  -383,  1844,   140,
+     569,  -383,  -383,   339,  -383,   340,   365,   365,    38,  -383,
+    -383
 };
 
 /* YYPGOTO[NTERM-NUM].  */
 static const yytype_int16 yypgoto[] =
 {
-    -373,  -373,     2,   -52,  -373,  -373,  -163,  -373,  -105,  -373,
-     429,  -372,  -373,  -373,   128,  -373,  -373,  -349,  -373,    86,
-     -48,  -212,    43,  -373,  -373,  -373,  -373,  -373,  -373,  -373,
-    -373,    61,   409,  -373,   432,   -59,  -183,  -373,   171,  -373,
-    -373,  -373,   -15,   -62,  -373,  -373,  -373,  -373,  -373,  -373,
-    -373,  -373,    56,  -373,  -373,  -100,  -206,  -373,  -373,   -29,
-     396,   406,  -373,  -373,     8
+    -383,  -383,     4,  -104,  -383,  -383,  1541,  -383,   -97,  -383,
+     420,  -382,  -383,  -383,  -336,  -383,  -383,  -357,  -383,    76,
+     -44,  -229,    16,  -383,  -383,  -383,  -383,  -383,  -383,  -383,
+    -383,   177,   410,  -383,   434,   -89,  -113,  -383,   164,  -383,
+    -383,  -383,  -383,  -383,   -15,   -62,  -383,  -383,  -383,  -383,
+    -383,  -383,  -383,  -383,    56,  -383,  -383,  -119,  -209,  -383,
+    -383,   163,   394,   395,  -383,  -383,     7
 };
 
 /* YYTABLE[YYPACT[STATE-NUM]].  What to do in state STATE-NUM.  If
    positive, shift that token.  If negative, reduce the rule which
    number is the opposite.  If zero, do what YYDEFACT says.
    If YYTABLE_NINF, syntax error.  */
-#define YYTABLE_NINF -188
+#define YYTABLE_NINF -191
 static const yytype_int16 yytable[] =
 {
-      83,   216,   143,    -2,   114,   114,   114,   114,   114,   383,
-     162,   114,   114,   299,   402,   108,   314,    79,    33,   319,
-     218,    33,    34,    35,   122,   132,   182,    29,     3,     5,
-       6,     7,   297,     8,     9,   145,   114,   151,   349,   302,
-     126,   158,   116,   117,   118,   119,   215,   300,   120,   121,
-     424,   183,   153,   184,   243,   205,   414,   206,   143,   135,
-     220,   399,   400,   169,    10,   140,   222,   127,   149,   130,
-      26,    27,   146,   147,   223,   224,   225,   226,   227,   228,
-      25,   230,   231,   128,   238,   298,   129,   109,   110,    99,
-     101,   281,   143,   282,   416,    11,   205,    33,   206,   103,
-     131,   123,   210,   156,   283,   364,   365,     5,     6,     7,
-     145,     8,     9,   207,   136,   208,     5,     6,     7,   141,
-       8,     9,   150,   234,   235,   155,   221,   161,   133,   163,
-     164,   165,   166,   167,   242,   377,   179,   180,   181,   185,
-     321,   245,    10,   240,  -188,  -188,   217,   237,   203,   387,
-      29,    10,   200,   201,   202,   334,   154,   203,   251,   253,
-     254,   255,   256,   257,   258,   259,   260,   134,   262,   263,
-     265,   344,   250,    11,   286,   170,   305,   317,   308,   284,
-     137,   172,    11,   138,   182,   179,   180,   181,   139,   288,
-     289,   290,   291,   292,   293,   204,   352,   386,   311,   388,
-     417,   355,   346,   392,   235,   179,   180,   181,   304,   253,
-     209,   253,   370,   316,   179,   180,   181,   375,   211,   396,
-     397,   393,   323,   213,   325,   327,   219,   406,   407,   214,
-     179,   180,   181,   331,   143,   333,   411,   229,   261,   143,
-     413,   232,   266,   267,   268,   269,   270,   271,   272,   273,
-     274,   275,   276,   277,   278,   279,   280,   422,   423,   343,
-     239,   179,   180,   181,   241,   246,   337,   338,   248,   340,
-     189,   179,   180,   181,   296,   294,   179,   180,   181,    33,
-     179,   180,   181,   189,   190,   322,   179,   180,   181,   179,
-     180,   181,   328,   410,   330,   332,   199,   350,   181,   350,
-     348,   200,   201,   202,   356,   345,   203,   341,   198,   199,
-     179,   180,   181,   354,   200,   201,   202,   371,   357,   203,
-     347,    28,   358,    29,   359,    30,   235,    31,    32,    33,
-      34,    35,    36,    37,    38,    39,    40,    41,    42,    43,
-     360,    44,    45,    46,    47,    48,   361,   362,   304,    49,
-     363,   366,    50,    51,    52,    53,   179,   180,   181,    54,
-      55,    56,    57,    58,   372,    59,    60,    61,    62,    63,
-      64,   179,   180,   181,   378,    65,    66,    67,    68,    69,
-      70,    29,    71,   379,   179,   180,   181,    33,    72,   374,
-     380,   381,   373,   111,   384,   390,   394,   391,   112,    83,
-      73,    74,    75,   395,   403,   420,    28,    76,    77,   249,
-      30,    78,    31,    32,    33,    34,    35,    36,    37,   -45,
-      39,    40,    41,    42,    43,   405,    44,    45,    46,    47,
-     412,   179,   180,   181,    49,   421,   173,   174,   175,   176,
-     179,   180,   181,   177,    80,   178,   189,   190,    58,   389,
-      59,    60,    61,    62,    63,    64,   320,   419,   125,   105,
-      65,    66,    67,    68,    69,    70,   159,    71,   353,   179,
-     180,   181,   199,    72,     0,     0,   160,   200,   201,   202,
-       0,     0,   203,     0,     0,    73,    74,    75,     0,     0,
-       0,    28,    76,    77,   -50,    30,    78,    31,    32,    33,
-      34,    35,    36,    37,     0,    39,    40,    41,    42,    43,
-       0,    44,    45,    46,    47,     0,   404,     0,     0,    49,
-       0,     0,     0,     0,   408,   409,   179,   180,   181,   187,
-     188,   189,   190,    58,   415,    59,    60,    61,    62,    63,
-      64,   418,     0,     0,     0,    65,    66,    67,    68,    69,
-      70,   329,    71,   195,   196,   197,   198,   199,    72,     0,
-       0,     0,   200,   201,   202,     0,     0,   203,     0,     0,
-      73,    74,    75,     0,     0,     0,     0,    76,    77,     0,
-     -45,    78,    29,     0,    30,     0,    31,    32,    33,    34,
-      35,    36,    37,     0,   142,    40,    41,    42,    43,   112,
-      44,    45,    46,    47,   199,   179,   180,   181,    49,   200,
-     201,   202,     0,     0,   203,     0,     0,   187,   188,   189,
-     190,     0,    58,     0,    59,    60,    61,    62,    63,    64,
-     335,     0,     0,     0,    65,    66,    67,    68,    69,    70,
-       0,    71,   196,   197,   198,   199,     0,    72,     0,     0,
-     200,   201,   202,     0,     0,   203,     0,     0,     0,    73,
-      74,    75,     0,     0,     0,     0,    76,    77,     0,    29,
-      78,    30,     0,    31,    32,    33,    34,    35,    36,    37,
-       0,    39,    40,    41,    42,    43,     0,    44,    45,    46,
-      47,     0,   179,   180,   181,    49,     0,     0,     0,     0,
-       0,     0,     0,   187,   188,   189,   190,     0,     0,    58,
-       0,    59,    60,    61,    62,    63,    64,   342,   179,   180,
-     181,    65,    66,    67,    68,    69,    70,     0,    71,   197,
-     198,   199,     0,     0,    72,     0,   200,   201,   202,     0,
-       0,   203,     0,   367,     0,     0,    73,    74,    75,     0,
-       0,     0,     0,    76,    77,     0,    29,    78,    30,     0,
-      31,    32,    33,    34,    35,    36,    37,     0,   148,    40,
-      41,    42,    43,     0,    44,    45,    46,    47,     0,   179,
-     180,   181,    49,     0,     0,     0,     0,     0,     0,   179,
-     180,   181,   179,   180,   181,     0,    58,     0,    59,    60,
-      61,    62,    63,    64,   368,     0,     0,     0,    65,    66,
-      67,    68,    69,    70,   369,    71,   205,   376,   206,  -158,
-       0,    72,     0,     0,     0,     0,     0,  -158,     0,     0,
-       0,     0,     0,    73,    74,    75,     0,     0,     0,     0,
-      76,    77,     0,     0,    78,  -158,  -158,  -158,  -158,     0,
-       0,     0,  -158,     0,  -158,     0,     0,  -158,     0,     0,
-       0,     0,     0,     0,  -158,  -158,  -158,  -158,     0,     0,
-       0,     0,     0,     0,     0,     0,     0,     0,  -158,  -158,
-    -158,     0,  -158,  -158,  -158,  -158,  -158,  -158,  -158,  -158,
-    -158,  -158,  -158,     0,     0,     0,     0,  -158,  -158,  -158,
-       0,     0,  -158,  -158,    30,   107,    31,    32,    33,    34,
-      35,    36,    37,     0,    39,    40,    41,    42,    43,     0,
-      44,    45,    46,    47,     0,     0,     0,     0,    49,     0,
-       0,     0,     0,     0,     0,   187,  -188,   189,   190,     0,
-       0,     0,    58,     0,    59,    60,    61,    62,    63,    64,
-       0,     0,     0,     0,    65,    66,    67,    68,    69,    70,
-       0,    71,   198,   199,     0,     0,     0,    72,   200,   201,
-     202,     0,     0,   203,     0,     0,     0,     0,     0,    73,
-      74,    75,   187,   188,   189,   190,    76,    77,     0,    30,
-      78,    31,    32,    33,    34,    35,    36,    37,   152,    39,
-      40,    41,    42,    43,     0,    44,    45,    46,    47,   198,
-     199,     0,     0,    49,     0,   200,   201,   202,     0,     0,
-     203,  -188,     0,   189,   190,     0,     0,    58,     0,    59,
-      60,    61,    62,    63,    64,     0,     0,     0,     0,    65,
-      66,    67,    68,    69,    70,     0,    71,     0,   198,   199,
-       0,     0,    72,     0,   200,   201,   202,     0,     0,   203,
-       0,     0,     0,     0,    73,    74,    75,     0,     0,     0,
-       0,    76,    77,     0,    30,    78,    31,    32,    33,    34,
-      35,    36,    37,     0,    39,    40,    41,    42,    43,     0,
-      44,    45,    46,    47,     0,     0,     0,     0,    49,   173,
-     174,   175,   176,     0,     0,     0,   177,     0,   178,     0,
-       0,     0,    58,     0,    59,    60,    61,    62,    63,    64,
-       0,     0,     0,     0,    65,    66,    67,    68,    69,    70,
-       0,    71,   179,   180,   181,     0,     0,    72,     0,     0,
-       0,     0,     0,     0,     0,     0,     0,     0,     0,    73,
-      74,    75,     0,     0,     0,     0,    76,    77,     0,   168,
-      78,    30,     0,    31,    32,    33,    34,    35,    36,    37,
-       0,    39,    40,    41,    42,    43,     0,    44,    45,    46,
-      47,     0,     0,     0,     0,    49,     0,     0,     0,     0,
-       0,     0,     0,     0,     0,     0,     0,     0,     0,    58,
-       0,    59,    60,    61,    62,    63,    64,     0,     0,     0,
-       0,    65,    66,    67,    68,    69,    70,     0,    71,     0,
-       0,     0,     0,     0,    72,     0,     0,     0,     0,     0,
-       0,     0,     0,     0,     0,     0,    73,    74,    75,     0,
-       0,     0,     0,    76,    77,     0,   233,    78,    30,     0,
-      31,    32,    33,    34,    35,    36,    37,     0,    39,    40,
-      41,    42,    43,     0,    44,    45,    46,    47,     0,     0,
-       0,     0,    49,     0,     0,     0,     0,     0,     0,     0,
-       0,     0,     0,     0,     0,     0,    58,     0,    59,    60,
-      61,    62,    63,    64,     0,     0,     0,     0,    65,    66,
-      67,    68,    69,    70,     0,    71,     0,     0,     0,     0,
-       0,    72,     0,     0,     0,     0,     0,     0,     0,     0,
-       0,     0,     0,    73,    74,    75,     0,     0,     0,     0,
-      76,    77,     0,   244,    78,    30,     0,    31,    32,    33,
-      34,    35,    36,    37,     0,    39,    40,    41,    42,    43,
-       0,    44,    45,    46,    47,     0,     0,     0,     0,    49,
+      84,   317,   220,   144,   322,   388,   184,    26,   185,   408,
+     218,   163,   302,   206,    34,   207,   109,   217,   183,    80,
+     180,   181,   182,   225,   226,   227,   228,   229,   230,   214,
+     232,   233,    34,    35,    36,     3,   245,   224,   219,   303,
+     215,   123,   117,   118,   119,   120,   430,   337,   121,   122,
+     283,    -2,   284,   154,   420,   100,    34,   410,    30,   144,
+     102,   222,   136,   285,   170,   131,   414,   415,   141,   352,
+     127,   150,   147,   148,   405,   406,   421,     5,     6,     7,
+     347,     8,     9,   424,   104,   240,  -191,  -191,   110,   111,
+     204,   368,   369,   144,   186,   301,   132,   180,   181,   182,
+     128,   242,   124,   244,   300,   211,   180,   181,   182,   129,
+     298,   305,    10,   130,   157,   137,   134,     5,     6,     7,
+     142,     8,     9,   151,   236,   237,   156,   320,   162,   223,
+     164,   165,   166,   167,   168,   381,   392,   135,   286,   180,
+     181,   182,   247,    11,   201,   202,   203,   239,    30,   204,
+     401,   206,    10,   207,   180,   181,   182,   138,   139,   253,
+     255,   256,   257,   258,   259,   260,   261,   262,   140,   264,
+     265,   267,     5,     6,     7,   252,     8,     9,   171,   208,
+     356,   209,   308,    11,   311,   359,    27,    28,   155,   423,
+     290,   291,   292,   293,   294,   295,   173,   115,   115,   115,
+     115,   115,   183,   205,   115,   115,   237,    10,   336,   210,
+     307,   255,   216,   255,   349,   319,   212,   374,   133,    30,
+     379,   221,   231,   398,   326,    34,   328,   330,   146,   115,
+     152,   112,   234,   243,   159,   334,   113,   144,    11,   263,
+     422,   241,   144,   268,   269,   270,   271,   272,   273,   274,
+     275,   276,   277,   278,   279,   280,   281,   282,   385,   180,
+     181,   182,     5,     6,     7,   248,     8,     9,   340,   341,
+     296,   343,   250,   180,   181,   182,   180,   181,   182,   180,
+     181,   182,   180,   181,   182,   299,    34,   331,   182,   174,
+     175,   176,   177,   325,   333,   335,   178,    10,   179,   190,
+     191,   353,   351,   146,   353,   367,   344,   416,   346,   360,
+    -190,   348,   358,   361,   362,   180,   181,   182,  -190,   365,
+     375,   363,   180,   181,   182,   200,   376,   364,    11,   237,
+     201,   202,   203,   350,   366,   204,  -190,  -190,  -190,  -190,
+     251,   370,   382,  -190,   200,  -190,   378,   -51,  -190,   201,
+     202,   203,   307,   383,   204,  -190,  -190,  -190,  -190,   180,
+     181,   182,   180,   181,   182,   384,   386,   288,   389,  -190,
+    -190,  -190,   395,  -190,  -190,  -190,  -190,  -190,  -190,  -190,
+    -190,  -190,  -190,  -190,   180,   181,   182,   399,  -190,  -190,
+    -190,   396,   314,  -190,  -190,   377,   400,   180,   181,   182,
+      29,   409,    30,   411,    31,    84,    32,    33,    34,    35,
+      36,    37,    38,    39,    40,    41,    42,    43,    44,   418,
+      45,    46,    47,    48,    49,   180,   181,   182,    50,   426,
+     427,    51,    52,    53,    54,    81,   425,   190,    55,    56,
+      57,    58,    59,   394,    60,    61,    62,    63,    64,    65,
+     323,   180,   181,   182,    66,    67,    68,    69,    70,    71,
+     126,    72,   106,   200,   357,   160,   161,    73,   201,   202,
+     203,     0,     0,   204,     0,     0,   332,     0,     0,    74,
+      75,    76,     0,     0,     0,    29,    77,    78,     0,    31,
+      79,    32,    33,    34,    35,    36,    37,    38,   -46,    40,
+      41,    42,    43,    44,     0,    45,    46,    47,    48,     0,
+     180,   181,   182,    50,   180,   181,   182,     0,   324,     0,
+     180,   181,   182,   188,   189,   190,   191,    59,     0,    60,
+      61,    62,    63,    64,    65,   338,     0,     0,     0,    66,
+      67,    68,    69,    70,    71,   345,    72,   196,   197,   198,
+     199,   200,    73,     0,     0,     0,   201,   202,   203,     0,
+       0,   204,     0,     0,    74,    75,    76,     0,     0,     0,
+      29,    77,    78,     0,    31,    79,    32,    33,    34,    35,
+      36,    37,    38,     0,    40,    41,    42,    43,    44,     0,
+      45,    46,    47,    48,     0,   180,   181,   182,    50,     0,
+       0,     0,     0,     0,     0,     0,     0,   188,   189,   190,
+     191,     0,    59,     0,    60,    61,    62,    63,    64,    65,
+     371,     0,     0,     0,    66,    67,    68,    69,    70,    71,
+       0,    72,   197,   198,   199,   200,     0,    73,     0,     0,
+     201,   202,   203,     0,     0,   204,     0,     0,     0,    74,
+      75,    76,     0,     0,     0,     0,    77,    78,     0,   -46,
+      79,    30,     0,    31,     0,    32,    33,    34,    35,    36,
+      37,    38,     0,   143,    41,    42,    43,    44,   113,    45,
+      46,    47,    48,     0,   180,   181,   182,    50,     0,     0,
+       0,     0,     0,     0,     0,   188,   189,   190,   191,     0,
+       0,    59,     0,    60,    61,    62,    63,    64,    65,   372,
+     180,   181,   182,    66,    67,    68,    69,    70,    71,     0,
+      72,   198,   199,   200,     0,     0,    73,     0,   201,   202,
+     203,     0,     0,   204,     0,   373,     0,     0,    74,    75,
+      76,     0,     0,     0,     0,    77,    78,     0,    30,    79,
+      31,     0,    32,    33,    34,    35,    36,    37,    38,     0,
+      40,    41,    42,    43,    44,     0,    45,    46,    47,    48,
+       0,   180,   181,   182,    50,     0,     0,     0,     0,     0,
+       0,   188,  -191,   190,   191,     0,     0,     0,    59,     0,
+      60,    61,    62,    63,    64,    65,   380,     0,     0,     0,
+      66,    67,    68,    69,    70,    71,     0,    72,   199,   200,
+       0,     0,     0,    73,   201,   202,   203,     0,     0,   204,
+       0,     0,     0,     0,     0,    74,    75,    76,     0,     0,
+       0,     0,    77,    78,     0,    30,    79,    31,     0,    32,
+      33,    34,    35,    36,    37,    38,     0,   149,    41,    42,
+      43,    44,     0,    45,    46,    47,    48,     0,     0,     0,
+       0,    50,     0,     0,     0,     0,     0,     0,     0,     0,
+       0,     0,     0,     0,     0,    59,     0,    60,    61,    62,
+      63,    64,    65,     0,     0,     0,     0,    66,    67,    68,
+      69,    70,    71,     0,    72,   206,     0,   207,  -161,     0,
+      73,     0,     0,     0,     0,     0,  -161,     0,     0,     0,
+       0,     0,    74,    75,    76,     0,   190,   191,     0,    77,
+      78,     0,     0,    79,  -161,  -161,  -161,  -161,     0,     0,
+       0,  -161,     0,  -161,     0,     0,  -161,     0,     0,     0,
+       0,   199,   200,  -161,  -161,  -161,  -161,   201,   202,   203,
+       0,     0,   204,     0,     0,     0,     0,  -161,  -161,  -161,
+       0,  -161,  -161,  -161,  -161,  -161,  -161,  -161,  -161,  -161,
+    -161,  -161,     0,     0,     0,     0,  -161,  -161,  -161,     0,
+       0,  -161,  -161,    31,   108,    32,    33,    34,    35,    36,
+      37,    38,     0,    40,    41,    42,    43,    44,     0,    45,
+      46,    47,    48,     0,     0,     0,     0,    50,     0,     0,
+       0,     0,     0,     0,   188,   189,   190,   191,     0,     0,
+       0,    59,     0,    60,    61,    62,    63,    64,    65,     0,
+       0,     0,     0,    66,    67,    68,    69,    70,    71,     0,
+      72,   199,   200,     0,     0,     0,    73,   201,   202,   203,
+       0,     0,   204,     0,     0,     0,     0,     0,    74,    75,
+      76,  -191,     0,   190,   191,    77,    78,     0,    31,    79,
+      32,    33,    34,    35,    36,    37,    38,   153,    40,    41,
+      42,    43,    44,     0,    45,    46,    47,    48,   199,   200,
+       0,     0,    50,     0,   201,   202,   203,     0,     0,   204,
+       0,     0,     0,     0,     0,     0,    59,     0,    60,    61,
+      62,    63,    64,    65,     0,     0,     0,     0,    66,    67,
+      68,    69,    70,    71,     0,    72,     0,     0,     0,     0,
+       0,    73,     0,     0,     0,     0,     0,     0,     0,     0,
+       0,     0,     0,    74,    75,    76,     0,     0,     0,     0,
+      77,    78,     0,    31,    79,    32,    33,    34,    35,    36,
+      37,    38,     0,    40,    41,    42,    43,    44,     0,    45,
+      46,    47,    48,     0,     0,     0,     0,    50,   174,   175,
+     176,   177,     0,     0,     0,   178,     0,   179,     0,     0,
+       0,    59,     0,    60,    61,    62,    63,    64,    65,     0,
+       0,     0,     0,    66,    67,    68,    69,    70,    71,     0,
+      72,   180,   181,   182,     0,     0,    73,     0,     0,     0,
+       0,     0,     0,     0,     0,     0,     0,     0,    74,    75,
+      76,     0,     0,     0,     0,    77,    78,     0,   169,    79,
+      31,     0,    32,    33,    34,    35,    36,    37,    38,     0,
+      40,    41,    42,    43,    44,     0,    45,    46,    47,    48,
+       0,     0,     0,     0,    50,     0,     0,     0,     0,     0,
+       0,     0,     0,     0,     0,     0,     0,     0,    59,     0,
+      60,    61,    62,    63,    64,    65,     0,     0,     0,     0,
+      66,    67,    68,    69,    70,    71,     0,    72,     0,     0,
+       0,     0,     0,    73,     0,     0,     0,     0,     0,     0,
+       0,     0,     0,     0,     0,    74,    75,    76,     0,     0,
+       0,     0,    77,    78,     0,   235,    79,    31,     0,    32,
+      33,    34,    35,    36,    37,    38,     0,    40,    41,    42,
+      43,    44,     0,    45,    46,    47,    48,     0,     0,     0,
+       0,    50,     0,     0,     0,     0,     0,     0,     0,     0,
+       0,     0,     0,     0,     0,    59,     0,    60,    61,    62,
+      63,    64,    65,     0,     0,     0,     0,    66,    67,    68,
+      69,    70,    71,     0,    72,     0,     0,     0,     0,     0,
+      73,     0,     0,     0,     0,     0,     0,     0,     0,     0,
+       0,     0,    74,    75,    76,     0,     0,     0,     0,    77,
+      78,     0,   246,    79,    31,     0,    32,    33,    34,    35,
+      36,    37,    38,     0,    40,    41,    42,    43,    44,     0,
+      45,    46,    47,    48,     0,     0,     0,     0,    50,     0,
        0,     0,     0,     0,     0,     0,     0,     0,     0,     0,
-       0,     0,     0,    58,     0,    59,    60,    61,    62,    63,
-      64,     0,     0,     0,     0,    65,    66,    67,    68,    69,
-      70,     0,    71,     0,     0,     0,     0,     0,    72,     0,
+       0,     0,    59,     0,    60,    61,    62,    63,    64,    65,
+       0,     0,     0,     0,    66,    67,    68,    69,    70,    71,
+       0,    72,     0,     0,     0,     0,     0,    73,     0,     0,
+       0,     0,     0,     0,     0,     0,     0,     0,     0,    74,
+      75,    76,     0,     0,     0,     0,    77,    78,     0,   266,
+      79,    31,     0,    32,    33,    34,    35,    36,    37,    38,
+       0,    40,    41,    42,    43,    44,     0,    45,    46,    47,
+      48,     0,     0,     0,     0,    50,     0,     0,     0,     0,
+       0,     0,     0,     0,     0,     0,     0,     0,     0,    59,
+       0,    60,    61,    62,    63,    64,    65,     0,     0,     0,
+       0,    66,    67,    68,    69,    70,    71,     0,    72,     0,
+       0,     0,     0,     0,    73,     0,     0,     0,     0,     0,
+       0,     0,     0,     0,     0,     0,    74,    75,    76,     0,
+       0,     0,     0,    77,    78,     0,   289,    79,    31,     0,
+      32,    33,    34,    35,    36,    37,    38,     0,    40,    41,
+      42,    43,    44,     0,    45,    46,    47,    48,     0,     0,
+       0,     0,    50,     0,     0,     0,     0,     0,     0,     0,
+       0,     0,     0,     0,     0,     0,    59,     0,    60,    61,
+      62,    63,    64,    65,     0,     0,     0,     0,    66,    67,
+      68,    69,    70,    71,     0,    72,     0,     0,     0,     0,
+       0,    73,     0,     0,     0,     0,     0,     0,     0,     0,
+       0,     0,     0,    74,    75,    76,     0,     0,     0,     0,
+      77,    78,     0,   327,    79,    31,     0,    32,    33,    34,
+      35,    36,    37,    38,     0,    40,    41,    42,    43,    44,
+       0,    45,    46,    47,    48,     0,     0,     0,     0,    50,
        0,     0,     0,     0,     0,     0,     0,     0,     0,     0,
-      73,    74,    75,     0,     0,     0,     0,    76,    77,     0,
-     264,    78,    30,     0,    31,    32,    33,    34,    35,    36,
-      37,     0,    39,    40,    41,    42,    43,     0,    44,    45,
-      46,    47,     0,     0,     0,     0,    49,     0,     0,     0,
+       0,     0,     0,    59,     0,    60,    61,    62,    63,    64,
+      65,     0,     0,     0,     0,    66,    67,    68,    69,    70,
+      71,     0,    72,     0,     0,     0,     0,     0,    73,     0,
        0,     0,     0,     0,     0,     0,     0,     0,     0,     0,
-      58,     0,    59,    60,    61,    62,    63,    64,     0,     0,
-       0,     0,    65,    66,    67,    68,    69,    70,     0,    71,
-       0,     0,     0,     0,     0,    72,     0,     0,     0,     0,
-       0,     0,     0,     0,     0,     0,     0,    73,    74,    75,
-       0,     0,     0,     0,    76,    77,     0,   287,    78,    30,
-       0,    31,    32,    33,    34,    35,    36,    37,     0,    39,
-      40,    41,    42,    43,     0,    44,    45,    46,    47,     0,
-       0,     0,     0,    49,     0,     0,     0,     0,     0,     0,
-       0,     0,     0,     0,     0,     0,     0,    58,     0,    59,
-      60,    61,    62,    63,    64,     0,     0,     0,     0,    65,
-      66,    67,    68,    69,    70,     0,    71,     0,     0,     0,
-       0,     0,    72,     0,     0,     0,     0,     0,     0,     0,
-       0,     0,     0,     0,    73,    74,    75,     0,     0,     0,
-       0,    76,    77,     0,   324,    78,    30,     0,    31,    32,
-      33,    34,    35,    36,    37,     0,    39,    40,    41,    42,
-      43,     0,    44,    45,    46,    47,     0,     0,     0,     0,
-      49,     0,     0,     0,     0,     0,     0,     0,     0,     0,
-       0,     0,     0,     0,    58,     0,    59,    60,    61,    62,
-      63,    64,     0,     0,     0,     0,    65,    66,    67,    68,
-      69,    70,     0,    71,     0,     0,     0,     0,     0,    72,
+      74,    75,    76,     0,     0,     0,     0,    77,    78,     0,
+     329,    79,    31,     0,    32,    33,    34,    35,    36,    37,
+      38,     0,    40,    41,    42,    43,    44,     0,    45,    46,
+      47,    48,     0,     0,     0,     0,    50,     0,     0,     0,
        0,     0,     0,     0,     0,     0,     0,     0,     0,     0,
-       0,    73,    74,    75,     0,     0,     0,     0,    76,    77,
-       0,   326,    78,    30,     0,    31,    32,    33,    34,    35,
-      36,    37,     0,    39,    40,    41,    42,    43,     0,    44,
-      45,    46,    47,     0,     0,     0,     0,    49,     0,     0,
+      59,     0,    60,    61,    62,    63,    64,    65,     0,     0,
+       0,     0,    66,    67,    68,    69,    70,    71,     0,    72,
+       0,     0,     0,     0,     0,    73,     0,     0,     0,     0,
+       0,     0,     0,     0,     0,     0,     0,    74,    75,    76,
+       0,     0,     0,     0,    77,    78,     0,   342,    79,    31,
+       0,    32,    33,    34,    35,    36,    37,    38,     0,    40,
+      41,    42,    43,    44,     0,    45,    46,    47,    48,     0,
+       0,     0,     0,    50,     0,     0,     0,     0,     0,     0,
+       0,     0,     0,     0,     0,     0,     0,    59,     0,    60,
+      61,    62,    63,    64,    65,     0,     0,     0,     0,    66,
+      67,    68,    69,    70,    71,   391,    72,   393,     0,     0,
+       0,   397,    73,     0,     0,     0,     0,     0,     0,     0,
+       0,     0,     0,     0,    74,    75,    76,     0,   402,   403,
+       0,    77,    78,     0,     0,    79,   412,   413,     0,     0,
+       0,     0,     0,     0,   187,     0,   417,     0,     0,     0,
+     419,   188,   189,   190,   191,     0,     0,     0,     0,     0,
+       0,     0,     0,     0,     0,     0,     0,   428,   429,     0,
+     192,   193,   339,   194,   195,   196,   197,   198,   199,   200,
+       0,     0,     0,   187,   201,   202,   203,     0,     0,   204,
+     188,   189,   190,   191,     0,     0,     0,     0,     0,     0,
+       0,     0,     0,     0,     0,     0,     0,     0,     0,   192,
+     193,     0,   194,   195,   196,   197,   198,   199,   200,     0,
+       0,     0,   187,   201,   202,   203,     0,     0,   204,   188,
+     189,   190,   191,     0,     0,     0,     0,     0,     0,     0,
+       0,     0,     0,     0,     0,     0,     0,     0,     0,   193,
+       0,   194,   195,   196,   197,   198,   199,   200,     0,     0,
+       0,  -191,   201,   202,   203,     0,     0,   204,   188,   189,
+     190,   191,     0,     0,     0,     0,     0,     0,     0,     0,
        0,     0,     0,     0,     0,     0,     0,     0,     0,     0,
-       0,    58,     0,    59,    60,    61,    62,    63,    64,     0,
-       0,     0,     0,    65,    66,    67,    68,    69,    70,     0,
-      71,     0,     0,     0,     0,     0,    72,     0,     0,     0,
-       0,     0,     0,     0,     0,     0,     0,     0,    73,    74,
-      75,     0,     0,     0,     0,    76,    77,     0,   339,    78,
-      30,     0,    31,    32,    33,    34,    35,    36,    37,     0,
-      39,    40,    41,    42,    43,     0,    44,    45,    46,    47,
-       0,     0,     0,     0,    49,     0,     0,     0,     0,     0,
-       0,     0,     0,     0,     0,     0,     0,     0,    58,     0,
-      59,    60,    61,    62,    63,    64,     0,     0,     0,     0,
-      65,    66,    67,    68,    69,    70,     0,    71,     0,     0,
-       0,  -187,     0,    72,     0,     0,     0,     0,     0,  -187,
-       0,     0,     0,     0,     0,    73,    74,    75,     0,     0,
-       0,     0,    76,    77,     0,     0,    78,  -187,  -187,  -187,
-    -187,     0,     0,     0,  -187,     0,  -187,     0,     0,  -187,
-       0,     0,     0,     0,     0,     0,  -187,  -187,  -187,  -187,
-       0,     0,     0,     0,     0,     0,     0,     0,     0,     0,
-    -187,  -187,  -187,     0,  -187,  -187,  -187,  -187,  -187,  -187,
-    -187,  -187,  -187,  -187,  -187,     0,     0,     0,     0,  -187,
-    -187,  -187,   186,     0,  -187,  -187,     0,     0,     0,   187,
-     188,   189,   190,     0,     0,     0,     0,     0,     0,     0,
-       0,     0,     0,     0,     0,     0,     0,     0,   191,   192,
-     336,   193,   194,   195,   196,   197,   198,   199,     0,     0,
-       0,   186,   200,   201,   202,     0,     0,   203,   187,   188,
-     189,   190,     0,     0,     0,     0,     0,     0,     0,     0,
-       0,     0,     0,     0,     0,     0,     0,   191,   192,     0,
-     193,   194,   195,   196,   197,   198,   199,     0,     0,     0,
-     186,   200,   201,   202,     0,     0,   203,   187,   188,   189,
-     190,     0,     0,     0,     0,     0,     0,     0,     0,     0,
-       0,     0,     0,     0,     0,     0,     0,   192,     0,   193,
-     194,   195,   196,   197,   198,   199,     0,     0,     0,  -188,
-     200,   201,   202,     0,     0,   203,   187,   188,   189,   190,
-       0,     0,     0,     0,     0,     0,     0,     0,     0,     0,
-       0,     0,     0,     0,     0,     0,     0,     0,   193,   194,
-     195,   196,   197,   198,   199,     0,     0,     0,     0,   200,
-     201,   202,     0,     0,   203
+     194,   195,   196,   197,   198,   199,   200,     0,     0,     0,
+       0,   201,   202,   203,     0,     0,   204
 };
 
 static const yytype_int16 yycheck[] =
 {
-      15,   106,    64,     0,    33,    34,    35,    36,    37,   358,
-      72,    40,    41,   219,   386,    30,   228,    15,     9,   231,
-     120,     9,    10,    11,    91,    54,    69,     3,     0,    26,
-      27,    28,   215,    30,    31,    64,    65,    66,    14,   222,
-      91,    70,    34,    35,    36,    37,   105,    90,    40,    41,
-     422,     3,    67,     5,   154,     3,   405,     5,   120,    57,
-     122,    36,    37,    78,    61,    63,   125,    91,    66,    60,
-       9,    10,    64,    65,   126,   127,   128,   129,   130,   131,
-      15,   133,   134,    91,   146,     4,    91,    31,    32,    15,
-      15,     3,   154,     5,     4,    92,     3,     9,     5,    15,
-      91,    45,   100,    91,    16,   317,   318,    26,    27,    28,
-     139,    30,    31,     3,    58,     5,    26,    27,    28,    63,
-      30,    31,    66,   138,   139,    69,   124,    71,    91,    73,
-      74,    75,    76,    77,    14,   341,    65,    66,    67,    91,
-      69,   156,    61,    91,    85,    86,     6,   139,    89,   361,
-       3,    61,    84,    85,    86,     6,    15,    89,   173,   174,
-     175,   176,   177,   178,   179,   180,   181,    91,   183,   184,
-     185,     6,   170,    92,   203,    38,   224,   229,   226,    91,
-      91,    14,    92,    91,    69,    65,    66,    67,    91,   204,
-     205,   206,   207,   208,   209,    91,   296,   360,   227,   362,
-     412,   301,     6,   366,   219,    65,    66,    67,   223,   224,
-       3,   226,     6,   228,    65,    66,    67,     6,    18,   382,
-     383,     6,   237,    14,   239,   240,    91,   390,   391,    15,
-      65,    66,    67,   248,   296,    14,   399,    91,   182,   301,
-     403,    90,   186,   187,   188,   189,   190,   191,   192,   193,
-     194,   195,   196,   197,   198,   199,   200,   420,   421,    14,
-      91,    65,    66,    67,     4,    63,   281,   282,     5,   284,
-      53,    65,    66,    67,    15,    63,    65,    66,    67,     9,
-      65,    66,    67,    53,    54,    90,    65,    66,    67,    65,
-      66,    67,     4,   398,    18,     5,    79,   295,    67,   297,
-      18,    84,    85,    86,   302,    14,    89,    91,    78,    79,
-      65,    66,    67,    90,    84,    85,    86,   332,    90,    89,
-      14,     1,    90,     3,    90,     5,   341,     7,     8,     9,
-      10,    11,    12,    13,    14,    15,    16,    17,    18,    19,
-      90,    21,    22,    23,    24,    25,    91,    90,   363,    29,
-      14,    90,    32,    33,    34,    35,    65,    66,    67,    39,
-      40,    41,    42,    43,     4,    45,    46,    47,    48,    49,
-      50,    65,    66,    67,     4,    55,    56,    57,    58,    59,
-      60,     3,    62,     4,    65,    66,    67,     9,    68,    14,
-       4,    14,   336,    15,     3,    90,     4,    90,    20,   414,
-      80,    81,    82,    90,    90,    90,     1,    87,    88,    90,
-       5,    91,     7,     8,     9,    10,    11,    12,    13,    14,
-      15,    16,    17,    18,    19,    14,    21,    22,    23,    24,
-      91,    65,    66,    67,    29,    90,    32,    33,    34,    35,
-      65,    66,    67,    39,    15,    41,    53,    54,    43,   363,
-      45,    46,    47,    48,    49,    50,    90,   414,    49,    27,
-      55,    56,    57,    58,    59,    60,    70,    62,   297,    65,
-      66,    67,    79,    68,    -1,    -1,    70,    84,    85,    86,
-      -1,    -1,    89,    -1,    -1,    80,    81,    82,    -1,    -1,
-      -1,     1,    87,    88,    90,     5,    91,     7,     8,     9,
-      10,    11,    12,    13,    -1,    15,    16,    17,    18,    19,
-      -1,    21,    22,    23,    24,    -1,   388,    -1,    -1,    29,
-      -1,    -1,    -1,    -1,   396,   397,    65,    66,    67,    51,
-      52,    53,    54,    43,   406,    45,    46,    47,    48,    49,
-      50,   413,    -1,    -1,    -1,    55,    56,    57,    58,    59,
-      60,    90,    62,    75,    76,    77,    78,    79,    68,    -1,
-      -1,    -1,    84,    85,    86,    -1,    -1,    89,    -1,    -1,
-      80,    81,    82,    -1,    -1,    -1,    -1,    87,    88,    -1,
-      90,    91,     3,    -1,     5,    -1,     7,     8,     9,    10,
-      11,    12,    13,    -1,    15,    16,    17,    18,    19,    20,
-      21,    22,    23,    24,    79,    65,    66,    67,    29,    84,
-      85,    86,    -1,    -1,    89,    -1,    -1,    51,    52,    53,
+      15,   230,   121,    65,   233,   362,     3,    15,     5,   391,
+     107,    73,   221,     3,     9,     5,    31,   106,    69,    15,
+      65,    66,    67,   127,   128,   129,   130,   131,   132,     3,
+     134,   135,     9,    10,    11,     0,   155,   126,     6,    90,
+      14,    91,    35,    36,    37,    38,   428,     6,    41,    42,
+       3,     0,     5,    68,   411,    15,     9,   393,     3,   121,
+      15,   123,    58,    16,    79,    60,   402,   403,    64,    14,
+      91,    67,    65,    66,    36,    37,   412,    26,    27,    28,
+       6,    30,    31,   419,    15,   147,    85,    86,    32,    33,
+      89,   320,   321,   155,    91,     4,    91,    65,    66,    67,
+      91,    91,    46,    14,   217,   101,    65,    66,    67,    91,
+     214,   224,    61,    91,    91,    59,    91,    26,    27,    28,
+      64,    30,    31,    67,   139,   140,    70,   231,    72,   125,
+      74,    75,    76,    77,    78,   344,   365,    91,    91,    65,
+      66,    67,   157,    92,    84,    85,    86,   140,     3,    89,
+       4,     3,    61,     5,    65,    66,    67,    91,    91,   174,
+     175,   176,   177,   178,   179,   180,   181,   182,    91,   184,
+     185,   186,    26,    27,    28,   171,    30,    31,    38,     3,
+     299,     5,   226,    92,   228,   304,     9,    10,    15,   418,
+     205,   206,   207,   208,   209,   210,    14,    34,    35,    36,
+      37,    38,    69,    91,    41,    42,   221,    61,    14,     3,
+     225,   226,    15,   228,     6,   230,    18,     6,    55,     3,
+       6,    91,    91,     6,   239,     9,   241,   242,    65,    66,
+      67,    15,    90,     4,    71,   250,    20,   299,    92,   183,
+       4,    91,   304,   187,   188,   189,   190,   191,   192,   193,
+     194,   195,   196,   197,   198,   199,   200,   201,   355,    65,
+      66,    67,    26,    27,    28,    63,    30,    31,   283,   284,
+      63,   286,     5,    65,    66,    67,    65,    66,    67,    65,
+      66,    67,    65,    66,    67,    15,     9,     4,    67,    32,
+      33,    34,    35,    90,    18,     5,    39,    61,    41,    53,
+      54,   297,    18,   140,   300,    14,    91,   404,    14,   305,
+       6,    14,    90,    90,    90,    65,    66,    67,    14,    91,
+     335,    90,    65,    66,    67,    79,     4,    90,    92,   344,
+      84,    85,    86,    14,    90,    89,    32,    33,    34,    35,
+      90,    90,     4,    39,    79,    41,    14,    90,    44,    84,
+      85,    86,   367,     4,    89,    51,    52,    53,    54,    65,
+      66,    67,    65,    66,    67,     4,    14,   204,     3,    65,
+      66,    67,    90,    69,    70,    71,    72,    73,    74,    75,
+      76,    77,    78,    79,    65,    66,    67,     4,    84,    85,
+      86,    90,   229,    89,    90,   339,    90,    65,    66,    67,
+       1,    90,     3,    14,     5,   420,     7,     8,     9,    10,
+      11,    12,    13,    14,    15,    16,    17,    18,    19,    91,
+      21,    22,    23,    24,    25,    65,    66,    67,    29,    90,
+      90,    32,    33,    34,    35,    15,   420,    53,    39,    40,
+      41,    42,    43,   367,    45,    46,    47,    48,    49,    50,
+      90,    65,    66,    67,    55,    56,    57,    58,    59,    60,
+      50,    62,    28,    79,   300,    71,    71,    68,    84,    85,
+      86,    -1,    -1,    89,    -1,    -1,    90,    -1,    -1,    80,
+      81,    82,    -1,    -1,    -1,     1,    87,    88,    -1,     5,
+      91,     7,     8,     9,    10,    11,    12,    13,    14,    15,
+      16,    17,    18,    19,    -1,    21,    22,    23,    24,    -1,
+      65,    66,    67,    29,    65,    66,    67,    -1,    69,    -1,
+      65,    66,    67,    51,    52,    53,    54,    43,    -1,    45,
+      46,    47,    48,    49,    50,    90,    -1,    -1,    -1,    55,
+      56,    57,    58,    59,    60,    90,    62,    75,    76,    77,
+      78,    79,    68,    -1,    -1,    -1,    84,    85,    86,    -1,
+      -1,    89,    -1,    -1,    80,    81,    82,    -1,    -1,    -1,
+       1,    87,    88,    -1,     5,    91,     7,     8,     9,    10,
+      11,    12,    13,    -1,    15,    16,    17,    18,    19,    -1,
+      21,    22,    23,    24,    -1,    65,    66,    67,    29,    -1,
+      -1,    -1,    -1,    -1,    -1,    -1,    -1,    51,    52,    53,
       54,    -1,    43,    -1,    45,    46,    47,    48,    49,    50,
       90,    -1,    -1,    -1,    55,    56,    57,    58,    59,    60,
       -1,    62,    76,    77,    78,    79,    -1,    68,    -1,    -1,
       84,    85,    86,    -1,    -1,    89,    -1,    -1,    -1,    80,
-      81,    82,    -1,    -1,    -1,    -1,    87,    88,    -1,     3,
-      91,     5,    -1,     7,     8,     9,    10,    11,    12,    13,
-      -1,    15,    16,    17,    18,    19,    -1,    21,    22,    23,
-      24,    -1,    65,    66,    67,    29,    -1,    -1,    -1,    -1,
-      -1,    -1,    -1,    51,    52,    53,    54,    -1,    -1,    43,
-      -1,    45,    46,    47,    48,    49,    50,    90,    65,    66,
-      67,    55,    56,    57,    58,    59,    60,    -1,    62,    77,
-      78,    79,    -1,    -1,    68,    -1,    84,    85,    86,    -1,
-      -1,    89,    -1,    90,    -1,    -1,    80,    81,    82,    -1,
-      -1,    -1,    -1,    87,    88,    -1,     3,    91,     5,    -1,
-       7,     8,     9,    10,    11,    12,    13,    -1,    15,    16,
-      17,    18,    19,    -1,    21,    22,    23,    24,    -1,    65,
-      66,    67,    29,    -1,    -1,    -1,    -1,    -1,    -1,    65,
-      66,    67,    65,    66,    67,    -1,    43,    -1,    45,    46,
-      47,    48,    49,    50,    90,    -1,    -1,    -1,    55,    56,
-      57,    58,    59,    60,    90,    62,     3,    90,     5,     6,
-      -1,    68,    -1,    -1,    -1,    -1,    -1,    14,    -1,    -1,
-      -1,    -1,    -1,    80,    81,    82,    -1,    -1,    -1,    -1,
-      87,    88,    -1,    -1,    91,    32,    33,    34,    35,    -1,
-      -1,    -1,    39,    -1,    41,    -1,    -1,    44,    -1,    -1,
+      81,    82,    -1,    -1,    -1,    -1,    87,    88,    -1,    90,
+      91,     3,    -1,     5,    -1,     7,     8,     9,    10,    11,
+      12,    13,    -1,    15,    16,    17,    18,    19,    20,    21,
+      22,    23,    24,    -1,    65,    66,    67,    29,    -1,    -1,
+      -1,    -1,    -1,    -1,    -1,    51,    52,    53,    54,    -1,
+      -1,    43,    -1,    45,    46,    47,    48,    49,    50,    90,
+      65,    66,    67,    55,    56,    57,    58,    59,    60,    -1,
+      62,    77,    78,    79,    -1,    -1,    68,    -1,    84,    85,
+      86,    -1,    -1,    89,    -1,    90,    -1,    -1,    80,    81,
+      82,    -1,    -1,    -1,    -1,    87,    88,    -1,     3,    91,
+       5,    -1,     7,     8,     9,    10,    11,    12,    13,    -1,
+      15,    16,    17,    18,    19,    -1,    21,    22,    23,    24,
+      -1,    65,    66,    67,    29,    -1,    -1,    -1,    -1,    -1,
+      -1,    51,    52,    53,    54,    -1,    -1,    -1,    43,    -1,
+      45,    46,    47,    48,    49,    50,    90,    -1,    -1,    -1,
+      55,    56,    57,    58,    59,    60,    -1,    62,    78,    79,
+      -1,    -1,    -1,    68,    84,    85,    86,    -1,    -1,    89,
+      -1,    -1,    -1,    -1,    -1,    80,    81,    82,    -1,    -1,
+      -1,    -1,    87,    88,    -1,     3,    91,     5,    -1,     7,
+       8,     9,    10,    11,    12,    13,    -1,    15,    16,    17,
+      18,    19,    -1,    21,    22,    23,    24,    -1,    -1,    -1,
+      -1,    29,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,
+      -1,    -1,    -1,    -1,    -1,    43,    -1,    45,    46,    47,
+      48,    49,    50,    -1,    -1,    -1,    -1,    55,    56,    57,
+      58,    59,    60,    -1,    62,     3,    -1,     5,     6,    -1,
+      68,    -1,    -1,    -1,    -1,    -1,    14,    -1,    -1,    -1,
+      -1,    -1,    80,    81,    82,    -1,    53,    54,    -1,    87,
+      88,    -1,    -1,    91,    32,    33,    34,    35,    -1,    -1,
+      -1,    39,    -1,    41,    -1,    -1,    44,    -1,    -1,    -1,
+      -1,    78,    79,    51,    52,    53,    54,    84,    85,    86,
+      -1,    -1,    89,    -1,    -1,    -1,    -1,    65,    66,    67,
+      -1,    69,    70,    71,    72,    73,    74,    75,    76,    77,
+      78,    79,    -1,    -1,    -1,    -1,    84,    85,    86,    -1,
+      -1,    89,    90,     5,     6,     7,     8,     9,    10,    11,
+      12,    13,    -1,    15,    16,    17,    18,    19,    -1,    21,
+      22,    23,    24,    -1,    -1,    -1,    -1,    29,    -1,    -1,
       -1,    -1,    -1,    -1,    51,    52,    53,    54,    -1,    -1,
-      -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    65,    66,
-      67,    -1,    69,    70,    71,    72,    73,    74,    75,    76,
-      77,    78,    79,    -1,    -1,    -1,    -1,    84,    85,    86,
-      -1,    -1,    89,    90,     5,     6,     7,     8,     9,    10,
+      -1,    43,    -1,    45,    46,    47,    48,    49,    50,    -1,
+      -1,    -1,    -1,    55,    56,    57,    58,    59,    60,    -1,
+      62,    78,    79,    -1,    -1,    -1,    68,    84,    85,    86,
+      -1,    -1,    89,    -1,    -1,    -1,    -1,    -1,    80,    81,
+      82,    51,    -1,    53,    54,    87,    88,    -1,     5,    91,
+       7,     8,     9,    10,    11,    12,    13,    14,    15,    16,
+      17,    18,    19,    -1,    21,    22,    23,    24,    78,    79,
+      -1,    -1,    29,    -1,    84,    85,    86,    -1,    -1,    89,
+      -1,    -1,    -1,    -1,    -1,    -1,    43,    -1,    45,    46,
+      47,    48,    49,    50,    -1,    -1,    -1,    -1,    55,    56,
+      57,    58,    59,    60,    -1,    62,    -1,    -1,    -1,    -1,
+      -1,    68,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,
+      -1,    -1,    -1,    80,    81,    82,    -1,    -1,    -1,    -1,
+      87,    88,    -1,     5,    91,     7,     8,     9,    10,    11,
+      12,    13,    -1,    15,    16,    17,    18,    19,    -1,    21,
+      22,    23,    24,    -1,    -1,    -1,    -1,    29,    32,    33,
+      34,    35,    -1,    -1,    -1,    39,    -1,    41,    -1,    -1,
+      -1,    43,    -1,    45,    46,    47,    48,    49,    50,    -1,
+      -1,    -1,    -1,    55,    56,    57,    58,    59,    60,    -1,
+      62,    65,    66,    67,    -1,    -1,    68,    -1,    -1,    -1,
+      -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    80,    81,
+      82,    -1,    -1,    -1,    -1,    87,    88,    -1,    90,    91,
+       5,    -1,     7,     8,     9,    10,    11,    12,    13,    -1,
+      15,    16,    17,    18,    19,    -1,    21,    22,    23,    24,
+      -1,    -1,    -1,    -1,    29,    -1,    -1,    -1,    -1,    -1,
+      -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    43,    -1,
+      45,    46,    47,    48,    49,    50,    -1,    -1,    -1,    -1,
+      55,    56,    57,    58,    59,    60,    -1,    62,    -1,    -1,
+      -1,    -1,    -1,    68,    -1,    -1,    -1,    -1,    -1,    -1,
+      -1,    -1,    -1,    -1,    -1,    80,    81,    82,    -1,    -1,
+      -1,    -1,    87,    88,    -1,    90,    91,     5,    -1,     7,
+       8,     9,    10,    11,    12,    13,    -1,    15,    16,    17,
+      18,    19,    -1,    21,    22,    23,    24,    -1,    -1,    -1,
+      -1,    29,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,
+      -1,    -1,    -1,    -1,    -1,    43,    -1,    45,    46,    47,
+      48,    49,    50,    -1,    -1,    -1,    -1,    55,    56,    57,
+      58,    59,    60,    -1,    62,    -1,    -1,    -1,    -1,    -1,
+      68,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,
+      -1,    -1,    80,    81,    82,    -1,    -1,    -1,    -1,    87,
+      88,    -1,    90,    91,     5,    -1,     7,     8,     9,    10,
       11,    12,    13,    -1,    15,    16,    17,    18,    19,    -1,
       21,    22,    23,    24,    -1,    -1,    -1,    -1,    29,    -1,
-      -1,    -1,    -1,    -1,    -1,    51,    52,    53,    54,    -1,
-      -1,    -1,    43,    -1,    45,    46,    47,    48,    49,    50,
-      -1,    -1,    -1,    -1,    55,    56,    57,    58,    59,    60,
-      -1,    62,    78,    79,    -1,    -1,    -1,    68,    84,    85,
-      86,    -1,    -1,    89,    -1,    -1,    -1,    -1,    -1,    80,
-      81,    82,    51,    52,    53,    54,    87,    88,    -1,     5,
-      91,     7,     8,     9,    10,    11,    12,    13,    14,    15,
-      16,    17,    18,    19,    -1,    21,    22,    23,    24,    78,
-      79,    -1,    -1,    29,    -1,    84,    85,    86,    -1,    -1,
-      89,    51,    -1,    53,    54,    -1,    -1,    43,    -1,    45,
-      46,    47,    48,    49,    50,    -1,    -1,    -1,    -1,    55,
-      56,    57,    58,    59,    60,    -1,    62,    -1,    78,    79,
-      -1,    -1,    68,    -1,    84,    85,    86,    -1,    -1,    89,
-      -1,    -1,    -1,    -1,    80,    81,    82,    -1,    -1,    -1,
-      -1,    87,    88,    -1,     5,    91,     7,     8,     9,    10,
-      11,    12,    13,    -1,    15,    16,    17,    18,    19,    -1,
-      21,    22,    23,    24,    -1,    -1,    -1,    -1,    29,    32,
-      33,    34,    35,    -1,    -1,    -1,    39,    -1,    41,    -1,
+      -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,
       -1,    -1,    43,    -1,    45,    46,    47,    48,    49,    50,
       -1,    -1,    -1,    -1,    55,    56,    57,    58,    59,    60,
-      -1,    62,    65,    66,    67,    -1,    -1,    68,    -1,    -1,
+      -1,    62,    -1,    -1,    -1,    -1,    -1,    68,    -1,    -1,
       -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    80,
       81,    82,    -1,    -1,    -1,    -1,    87,    88,    -1,    90,
       91,     5,    -1,     7,     8,     9,    10,    11,    12,    13,
@@ -794,58 +835,27 @@ static const yytype_int16 yycheck[] =
       -1,    -1,    -1,    29,    -1,    -1,    -1,    -1,    -1,    -1,
       -1,    -1,    -1,    -1,    -1,    -1,    -1,    43,    -1,    45,
       46,    47,    48,    49,    50,    -1,    -1,    -1,    -1,    55,
-      56,    57,    58,    59,    60,    -1,    62,    -1,    -1,    -1,
-      -1,    -1,    68,    -1,    -1,    -1,    -1,    -1,    -1,    -1,
-      -1,    -1,    -1,    -1,    80,    81,    82,    -1,    -1,    -1,
-      -1,    87,    88,    -1,    90,    91,     5,    -1,     7,     8,
-       9,    10,    11,    12,    13,    -1,    15,    16,    17,    18,
-      19,    -1,    21,    22,    23,    24,    -1,    -1,    -1,    -1,
-      29,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,
-      -1,    -1,    -1,    -1,    43,    -1,    45,    46,    47,    48,
-      49,    50,    -1,    -1,    -1,    -1,    55,    56,    57,    58,
-      59,    60,    -1,    62,    -1,    -1,    -1,    -1,    -1,    68,
-      -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,
-      -1,    80,    81,    82,    -1,    -1,    -1,    -1,    87,    88,
-      -1,    90,    91,     5,    -1,     7,     8,     9,    10,    11,
-      12,    13,    -1,    15,    16,    17,    18,    19,    -1,    21,
-      22,    23,    24,    -1,    -1,    -1,    -1,    29,    -1,    -1,
-      -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,
-      -1,    43,    -1,    45,    46,    47,    48,    49,    50,    -1,
-      -1,    -1,    -1,    55,    56,    57,    58,    59,    60,    -1,
-      62,    -1,    -1,    -1,    -1,    -1,    68,    -1,    -1,    -1,
-      -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    80,    81,
-      82,    -1,    -1,    -1,    -1,    87,    88,    -1,    90,    91,
-       5,    -1,     7,     8,     9,    10,    11,    12,    13,    -1,
-      15,    16,    17,    18,    19,    -1,    21,    22,    23,    24,
-      -1,    -1,    -1,    -1,    29,    -1,    -1,    -1,    -1,    -1,
-      -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    43,    -1,
-      45,    46,    47,    48,    49,    50,    -1,    -1,    -1,    -1,
-      55,    56,    57,    58,    59,    60,    -1,    62,    -1,    -1,
-      -1,     6,    -1,    68,    -1,    -1,    -1,    -1,    -1,    14,
-      -1,    -1,    -1,    -1,    -1,    80,    81,    82,    -1,    -1,
-      -1,    -1,    87,    88,    -1,    -1,    91,    32,    33,    34,
-      35,    -1,    -1,    -1,    39,    -1,    41,    -1,    -1,    44,
-      -1,    -1,    -1,    -1,    -1,    -1,    51,    52,    53,    54,
-      -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,
-      65,    66,    67,    -1,    69,    70,    71,    72,    73,    74,
-      75,    76,    77,    78,    79,    -1,    -1,    -1,    -1,    84,
-      85,    86,    44,    -1,    89,    90,    -1,    -1,    -1,    51,
+      56,    57,    58,    59,    60,   364,    62,   366,    -1,    -1,
+      -1,   370,    68,    -1,    -1,    -1,    -1,    -1,    -1,    -1,
+      -1,    -1,    -1,    -1,    80,    81,    82,    -1,   387,   388,
+      -1,    87,    88,    -1,    -1,    91,   395,   396,    -1,    -1,
+      -1,    -1,    -1,    -1,    44,    -1,   405,    -1,    -1,    -1,
+     409,    51,    52,    53,    54,    -1,    -1,    -1,    -1,    -1,
+      -1,    -1,    -1,    -1,    -1,    -1,    -1,   426,   427,    -1,
+      70,    71,    72,    73,    74,    75,    76,    77,    78,    79,
+      -1,    -1,    -1,    44,    84,    85,    86,    -1,    -1,    89,
+      51,    52,    53,    54,    -1,    -1,    -1,    -1,    -1,    -1,
+      -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    70,
+      71,    -1,    73,    74,    75,    76,    77,    78,    79,    -1,
+      -1,    -1,    44,    84,    85,    86,    -1,    -1,    89,    51,
       52,    53,    54,    -1,    -1,    -1,    -1,    -1,    -1,    -1,
-      -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    70,    71,
-      72,    73,    74,    75,    76,    77,    78,    79,    -1,    -1,
+      -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    71,
+      -1,    73,    74,    75,    76,    77,    78,    79,    -1,    -1,
       -1,    44,    84,    85,    86,    -1,    -1,    89,    51,    52,
       53,    54,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,
-      -1,    -1,    -1,    -1,    -1,    -1,    -1,    70,    71,    -1,
-      73,    74,    75,    76,    77,    78,    79,    -1,    -1,    -1,
-      44,    84,    85,    86,    -1,    -1,    89,    51,    52,    53,
-      54,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,
-      -1,    -1,    -1,    -1,    -1,    -1,    -1,    71,    -1,    73,
-      74,    75,    76,    77,    78,    79,    -1,    -1,    -1,    44,
-      84,    85,    86,    -1,    -1,    89,    51,    52,    53,    54,
       -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,
-      -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    73,    74,
-      75,    76,    77,    78,    79,    -1,    -1,    -1,    -1,    84,
-      85,    86,    -1,    -1,    89
+      73,    74,    75,    76,    77,    78,    79,    -1,    -1,    -1,
+      -1,    84,    85,    86,    -1,    -1,    89
 };
 
 /* YYSTOS[STATE-NUM] -- The (internal number of the) accessing
@@ -854,47 +864,48 @@ static const yytype_uint8 yystos[] =
 {
        0,    94,    98,     0,   101,    26,    27,    28,    30,    31,
       61,    92,   102,   108,   109,   117,   118,   119,   120,   122,
-     123,   132,   133,   126,   124,    15,   124,   124,     1,     3,
-       5,     7,     8,     9,    10,    11,    12,    13,    14,    15,
-      16,    17,    18,    19,    21,    22,    23,    24,    25,    29,
-      32,    33,    34,    35,    39,    40,    41,    42,    43,    45,
-      46,    47,    48,    49,    50,    55,    56,    57,    58,    59,
-      60,    62,    68,    80,    81,    82,    87,    88,    91,    95,
-     103,   105,   106,   135,   136,   137,   140,   141,   142,   143,
-     144,   145,   146,   151,   152,   153,   154,   155,   156,    15,
-     121,    15,   127,    15,   134,   127,    96,     6,   135,   145,
-     145,    15,    20,    95,   152,   157,   157,   157,   157,   157,
-     157,   157,    91,   145,   125,   125,    91,    91,    91,    91,
-      60,    91,   152,    91,    91,    95,   145,    91,    91,    91,
-      95,   145,    15,   136,   148,   152,   157,   157,    15,    95,
-     145,   152,    14,   135,    15,   145,    91,   147,   152,   153,
-     154,   145,   136,   145,   145,   145,   145,   145,    90,   135,
-      38,   107,    14,    32,    33,    34,    35,    39,    41,    65,
-      66,    67,    69,     3,     5,    91,    44,    51,    52,    53,
-      54,    70,    71,    73,    74,    75,    76,    77,    78,    79,
-      84,    85,    86,    89,    91,     3,     5,     3,     5,     3,
-      95,    18,   128,    14,    15,   128,   101,     6,   148,    91,
-     136,    95,   128,    96,    96,    96,    96,    96,    96,    91,
-      96,    96,    90,    90,   135,   135,   149,   157,   136,    91,
-      91,     4,    14,   148,    90,   135,    63,   130,     5,    90,
-      95,   135,   113,   135,   135,   135,   135,   135,   135,   135,
-     135,   145,   135,   135,    90,   135,   145,   145,   145,   145,
-     145,   145,   145,   145,   145,   145,   145,   145,   145,   145,
-     145,     3,     5,    16,    91,   139,   152,    90,   135,   135,
-     135,   135,   135,   135,    63,   129,    15,   129,     4,   149,
-      90,   138,   129,   112,   135,   113,   114,   135,   113,   116,
-     150,   152,   103,   111,   114,   115,   135,    96,    97,   114,
-      90,    69,    90,   135,    90,   135,    90,   135,     4,    90,
-      18,   135,     5,    14,     6,    90,    72,   135,   135,    90,
-     135,    91,    90,    14,     6,    14,     6,    14,    18,    14,
-      95,   131,   148,   131,    90,   148,    95,    90,    90,    90,
-      90,    91,    90,    14,   114,   114,    90,    90,    90,    90,
-       6,   135,     4,   145,    14,     6,    90,   149,     4,     4,
-       4,    14,   110,   110,     3,    99,    99,   114,    99,   112,
-      90,    90,    99,     6,     4,    90,    99,    99,   100,    36,
-      37,   104,   104,    90,   107,    14,    99,    99,   107,   107,
-     101,    99,    91,    99,   110,   107,     4,   114,   107,   115,
-      90,    90,    99,    99,   104
+     123,   132,   133,   135,   126,   124,    15,   124,   124,     1,
+       3,     5,     7,     8,     9,    10,    11,    12,    13,    14,
+      15,    16,    17,    18,    19,    21,    22,    23,    24,    25,
+      29,    32,    33,    34,    35,    39,    40,    41,    42,    43,
+      45,    46,    47,    48,    49,    50,    55,    56,    57,    58,
+      59,    60,    62,    68,    80,    81,    82,    87,    88,    91,
+      95,   103,   105,   106,   137,   138,   139,   142,   143,   144,
+     145,   146,   147,   148,   153,   154,   155,   156,   157,   158,
+      15,   121,    15,   127,    15,   136,   127,    96,     6,   137,
+     147,   147,    15,    20,    95,   154,   159,   159,   159,   159,
+     159,   159,   159,    91,   147,   125,   125,    91,    91,    91,
+      91,    60,    91,   154,    91,    91,    95,   147,    91,    91,
+      91,    95,   147,    15,   138,   150,   154,   159,   159,    15,
+      95,   147,   154,    14,   137,    15,   147,    91,   149,   154,
+     155,   156,   147,   138,   147,   147,   147,   147,   147,    90,
+     137,    38,   107,    14,    32,    33,    34,    35,    39,    41,
+      65,    66,    67,    69,     3,     5,    91,    44,    51,    52,
+      53,    54,    70,    71,    73,    74,    75,    76,    77,    78,
+      79,    84,    85,    86,    89,    91,     3,     5,     3,     5,
+       3,    95,    18,   128,     3,    14,    15,   128,   101,     6,
+     150,    91,   138,    95,   128,    96,    96,    96,    96,    96,
+      96,    91,    96,    96,    90,    90,   137,   137,   151,   159,
+     138,    91,    91,     4,    14,   150,    90,   137,    63,   130,
+       5,    90,    95,   137,   113,   137,   137,   137,   137,   137,
+     137,   137,   137,   147,   137,   137,    90,   137,   147,   147,
+     147,   147,   147,   147,   147,   147,   147,   147,   147,   147,
+     147,   147,   147,     3,     5,    16,    91,   141,   154,    90,
+     137,   137,   137,   137,   137,   137,    63,   129,    96,    15,
+     129,     4,   151,    90,   140,   129,   112,   137,   113,   114,
+     137,   113,   116,   152,   154,   103,   111,   114,   115,   137,
+      96,    97,   114,    90,    69,    90,   137,    90,   137,    90,
+     137,     4,    90,    18,   137,     5,    14,     6,    90,    72,
+     137,   137,    90,   137,    91,    90,    14,     6,    14,     6,
+      14,    18,    14,    95,   131,   134,   150,   131,    90,   150,
+      95,    90,    90,    90,    90,    91,    90,    14,   114,   114,
+      90,    90,    90,    90,     6,   137,     4,   147,    14,     6,
+      90,   151,     4,     4,     4,   101,    14,   110,   110,     3,
+      99,    99,   114,    99,   112,    90,    90,    99,     6,     4,
+      90,     4,    99,    99,   100,    36,    37,   104,   104,    90,
+     107,    14,    99,    99,   107,   107,   101,    99,    91,    99,
+     110,   107,     4,   114,   107,   115,    90,    90,    99,    99,
+     104
 };
 
 typedef enum {
@@ -922,8 +933,9 @@ static const toketypes yy_type_tab[] =
   toketype_opval, toketype_opval, toketype_opval, toketype_p_tkval, toketype_opval, toketype_opval, toketype_opval,
   toketype_opval, toketype_opval, toketype_opval, toketype_ival, toketype_ival,
   toketype_ival, toketype_opval, toketype_opval, toketype_opval, toketype_opval,
-  toketype_opval, toketype_opval, toketype_opval, toketype_ival, toketype_opval, toketype_opval, toketype_opval, toketype_ival,
-  toketype_opval, toketype_opval, toketype_opval, toketype_opval, toketype_opval, toketype_opval,
+  toketype_opval, toketype_opval, toketype_opval, toketype_ival, toketype_opval, toketype_ival, toketype_opval,
+  toketype_opval, toketype_opval, toketype_ival, toketype_opval, toketype_opval, toketype_opval,
   toketype_opval, toketype_opval, toketype_opval, toketype_opval, toketype_opval, toketype_opval,
-  toketype_opval, toketype_opval, toketype_opval, toketype_opval, toketype_opval, toketype_opval, toketype_opval
+  toketype_opval, toketype_opval, toketype_opval, toketype_opval, toketype_opval, toketype_opval, toketype_opval,
+  toketype_opval, toketype_opval, toketype_opval
 };
diff --git a/perly.y b/perly.y
index a61a6b3..691ae94 100644 (file)
--- a/perly.y
+++ b/perly.y
@@ -92,7 +92,7 @@
 
 %type <opval> decl format subrout mysubrout package use peg
 
-%type <opval> block mblock lineseq line loop cond else
+%type <opval> block package_block mblock lineseq line loop cond else
 %type <opval> expr term subscripted scalar ary hsh arylen star amper sideff
 %type <opval> argexpr nexpr texpr iexpr mexpr mnexpr miexpr
 %type <opval> listexpr listexprcom indirob listop method
@@ -242,6 +242,12 @@ line       :       label cond
                              }
                          })
                        }
+       |       package_block
+                       { $$ = newSTATEOP(0, NULL,
+                                newWHILEOP(0, 1, (LOOP*)(OP*)NULL,
+                                           NOLINE, (OP*)NULL, $1,
+                                           (OP*)NULL, 0));
+                         TOKEN_GETMAD($1,((LISTOP*)$$)->op_first,'L'); }
        |       label PLUGSTMT
                        { $$ = newSTATEOP(0, PVAL($1), $2); }
        ;
@@ -659,6 +665,21 @@ package :  PACKAGE WORD WORD ';'
                        }
        ;
 
+package_block: PACKAGE WORD WORD '{' remember
+                       {
+                         package($3);
+                         if ($2)
+                             package_version($2);
+                       }
+                   lineseq '}'
+                       { if (PL_parser->copline > (line_t)IVAL($4))
+                             PL_parser->copline = (line_t)IVAL($4);
+                         $$ = block_end($5, $7);
+                         TOKEN_GETMAD($4,$$,'{');
+                         TOKEN_GETMAD($8,$$,'}');
+                       }
+       ;
+
 use    :       USE startsub
                        { CvSPECIAL_on(PL_compcv); /* It's a BEGIN {} */ }
                    WORD WORD listexpr ';'
index 5e89035..76bf048 100644 (file)
@@ -4243,10 +4243,19 @@ X<package> X<module> X<namespace> X<version>
 
 =item package NAMESPACE
 
-Declares the compilation unit as being in the given namespace.  The scope
-of the package declaration is from the declaration itself through the end
-of the enclosing block, file, or eval (the same as the C<my> operator).
-All further unqualified dynamic identifiers will be in this namespace.
+=item package NAMESPACE VERSION BLOCK
+X<package> X<module> X<namespace> X<version>
+
+=item package NAMESPACE BLOCK
+
+Declares the BLOCK, or the rest of the compilation unit, as being in
+the given namespace.  The scope of the package declaration is either the
+supplied code BLOCK or, in the absence of a BLOCK, from the declaration
+itself through the end of the enclosing block, file, or eval (the same
+as the C<my> operator).  All unqualified dynamic identifiers in this
+scope will be in the given namespace, except where overridden by another
+C<package> declaration.
+
 A package statement affects dynamic variables only, including those
 you've used C<local> on, but I<not> lexical variables, which are created
 with C<my> (or C<our> (or C<state>)).  Typically it would be the first 
diff --git a/t/comp/package_block.t b/t/comp/package_block.t
new file mode 100644 (file)
index 0000000..8645f1a
--- /dev/null
@@ -0,0 +1,37 @@
+#!./perl
+
+print "1..3\n";
+
+$main::result = "";
+eval q{
+       $main::result .= "a(".__PACKAGE__.")";
+       package Foo {
+               $main::result .= "b(".__PACKAGE__.")";
+               package Bar::Baz {
+                       $main::result .= "c(".__PACKAGE__.")";
+               }
+               $main::result .= "d(".__PACKAGE__.")";
+       }
+       $main::result .= "e(".__PACKAGE__.")";
+};
+print $main::result eq "a(main)b(Foo)c(Bar::Baz)d(Foo)e(main)" ?
+       "ok 1\n" : "not ok 1\n";
+
+$main::result = "";
+eval q{
+       $main::result .= "a($Foo::VERSION)";
+       $main::result .= "b($Bar::VERSION)";
+       package Foo 11 { ; }
+       package Bar 22 { $main::result .= "c(".__PACKAGE__.")"; }
+};
+print $main::result eq "a(11)b(22)c(Bar)" ? "ok 2\n" : "not ok 2\n";
+
+$main::result = "";
+eval q{
+       $main::result .= "a(".__PACKAGE__.")";
+       package Foo { }
+       $main::result .= "b(".__PACKAGE__.")";
+};
+print $main::result eq "a(main)b(main)" ? "ok 3\n" : "not ok 3\n";
+
+1;
diff --git a/toke.c b/toke.c
index dea5274..eac007e 100644 (file)
--- a/toke.c
+++ b/toke.c
@@ -2098,7 +2098,7 @@ S_force_version(pTHX_ char *s, int guessing)
            curmad('X', newSVpvn(s,d-s));
        }
 #endif
-        if (*d == ';' || isSPACE(*d) || *d == '}' || !*d) {
+        if (*d == ';' || isSPACE(*d) || *d == '{' || *d == '}' || !*d) {
            SV *ver;
 #ifdef USE_LOCALE_NUMERIC
            char *loc = setlocale(LC_NUMERIC, "C");
@@ -2167,7 +2167,9 @@ S_force_strict_version(pTHX_ char *s)
        s = (char *)scan_version(s, ver, 0);
        version = newSVOP(OP_CONST, 0, ver);
     }
-    else if ( (*s != ';' && *s != '}' ) && (s = SKIPSPACE1(s), (*s != ';' && *s !='}' ))) {
+    else if ( (*s != ';' && *s != '{' && *s != '}' ) &&
+           (s = SKIPSPACE1(s), (*s != ';' && *s != '{' && *s != '}' )))
+    {
        PL_bufptr = s;
        if (errstr)
            yyerror(errstr); /* version required */
@@ -7271,6 +7273,7 @@ Perl_yylex(pTHX)
            s = force_word(s,WORD,FALSE,TRUE,FALSE);
            s = SKIPSPACE1(s);
            s = force_strict_version(s);
+           PL_lex_expect = XBLOCK;
            OPERATOR(PACKAGE);
 
        case KEY_pipe:
diff --git a/util.c b/util.c
index f1d7d50..5e7a24e 100644 (file)
--- a/util.c
+++ b/util.c
@@ -4482,7 +4482,7 @@ dotted_decimal_version:
            saw_decimal++;
            d++;
        }
-       else if (!*d || *d == ';' || isSPACE(*d) || *d == '}') {
+       else if (!*d || *d == ';' || isSPACE(*d) || *d == '{' || *d == '}') {
            if ( d == s ) {
                /* found nothing */
                BADVERSION(s,errstr,"Invalid version format (version required)");
@@ -4513,7 +4513,7 @@ dotted_decimal_version:
 
        /* scan the fractional part after the decimal point*/
 
-       if (!isDIGIT(*d) && (strict || ! (!*d || *d == ';' || isSPACE(*d) || *d == '}') )) {
+       if (!isDIGIT(*d) && (strict || ! (!*d || *d == ';' || isSPACE(*d) || *d == '{' || *d == '}') )) {
                /* strict or lax-but-not-the-end */
                BADVERSION(s,errstr,"Invalid version format (fractional part required)");
        }
@@ -4551,7 +4551,7 @@ version_prescan_finish:
     while (isSPACE(*d))
        d++;
 
-    if (!isDIGIT(*d) && (! (!*d || *d == ';' || *d == '}') )) {
+    if (!isDIGIT(*d) && (! (!*d || *d == ';' || *d == '{' || *d == '}') )) {
        /* trailing non-numeric data */
        BADVERSION(s,errstr,"Invalid version format (non-numeric data)");
     }