This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Set PL_expect less often when parsing semicolons
[perl5.git] / perly.h
diff --git a/perly.h b/perly.h
index ae7b1f5..ad117a7 100644 (file)
--- a/perly.h
+++ b/perly.h
      NOAMP = 309,
      LOCAL = 310,
      MY = 311,
-     MYSUB = 312,
-     REQUIRE = 313,
-     COLONATTR = 314,
-     FORMLBRACK = 315,
-     FORMRBRACK = 316,
-     PREC_LOW = 317,
-     DOROP = 318,
-     OROP = 319,
-     ANDOP = 320,
-     NOTOP = 321,
-     ASSIGNOP = 322,
-     DORDOR = 323,
-     OROR = 324,
-     ANDAND = 325,
-     BITOROP = 326,
-     BITANDOP = 327,
-     SHIFTOP = 328,
-     MATCHOP = 329,
-     REFGEN = 330,
-     UMINUS = 331,
-     POWOP = 332,
+     REQUIRE = 312,
+     COLONATTR = 313,
+     FORMLBRACK = 314,
+     FORMRBRACK = 315,
+     PREC_LOW = 316,
+     DOROP = 317,
+     OROP = 318,
+     ANDOP = 319,
+     NOTOP = 320,
+     ASSIGNOP = 321,
+     DORDOR = 322,
+     OROR = 323,
+     ANDAND = 324,
+     BITOROP = 325,
+     BITANDOP = 326,
+     SHIFTOP = 327,
+     MATCHOP = 328,
+     REFGEN = 329,
+     UMINUS = 330,
+     POWOP = 331,
+     POSTJOIN = 332,
      POSTDEC = 333,
      POSTINC = 334,
      PREDEC = 335,
      PREINC = 336,
-     ARROW = 337,
-     PEG = 338
+     ARROW = 337
    };
 #endif
 /* Tokens.  */
 #define NOAMP 309
 #define LOCAL 310
 #define MY 311
-#define MYSUB 312
-#define REQUIRE 313
-#define COLONATTR 314
-#define FORMLBRACK 315
-#define FORMRBRACK 316
-#define PREC_LOW 317
-#define DOROP 318
-#define OROP 319
-#define ANDOP 320
-#define NOTOP 321
-#define ASSIGNOP 322
-#define DORDOR 323
-#define OROR 324
-#define ANDAND 325
-#define BITOROP 326
-#define BITANDOP 327
-#define SHIFTOP 328
-#define MATCHOP 329
-#define REFGEN 330
-#define UMINUS 331
-#define POWOP 332
+#define REQUIRE 312
+#define COLONATTR 313
+#define FORMLBRACK 314
+#define FORMRBRACK 315
+#define PREC_LOW 316
+#define DOROP 317
+#define OROP 318
+#define ANDOP 319
+#define NOTOP 320
+#define ASSIGNOP 321
+#define DORDOR 322
+#define OROR 323
+#define ANDAND 324
+#define BITOROP 325
+#define BITANDOP 326
+#define SHIFTOP 327
+#define MATCHOP 328
+#define REFGEN 329
+#define UMINUS 330
+#define POWOP 331
+#define POSTJOIN 332
 #define POSTDEC 333
 #define POSTINC 334
 #define PREDEC 335
 #define PREINC 336
 #define ARROW 337
-#define PEG 338
 
 
 
@@ -246,16 +244,6 @@ typedef union YYSTYPE
     char *pval;
     OP *opval;
     GV *gvval;
-#ifdef PERL_IN_MADLY_C
-    TOKEN* p_tkval;
-    TOKEN* i_tkval;
-#else
-    char *p_tkval;
-    I32        i_tkval;
-#endif
-#ifdef PERL_MAD
-    TOKEN* tkval;
-#endif
 }
 /* Line 1529 of yacc.c.  */
        YYSTYPE;
@@ -268,6 +256,6 @@ typedef union YYSTYPE
 
 
 /* Generated from:
- * 38ce4bf3d0e9f8cfd35795d89907c7d03583b561b55406230d749c80d62d5e06 perly.y
- * 4a3ced51fe6585f6ec59e65e1ffd74bc976c498b0e6992eaab337219fee72e51 regen_perly.pl
+ * e89acf986fa79bb74d827a4fd4823d07ff25bd99c2087cf4e7a7e6ae41d7a246 perly.y
+ * d1d4df7b8e30ac9dede664af9179e6e5e7ddc7f2ad9c4eff9e2e5b32c9e16a6e regen_perly.pl
  * ex: set ro: */