This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
[perl #39130] h2ph generates incorrect code for '#if defined A || defined B'
[perl5.git] / perly.y
diff --git a/perly.y b/perly.y
index c81cee3..cbd2f7a 100644 (file)
--- a/perly.y
+++ b/perly.y
@@ -30,6 +30,9 @@
 %union {
     I32        ival;
     char *pval;
+#ifdef PERL_MAD
+    TOKEN* tkval;
+#endif
     OP *opval;
     GV *gvval;
 }
@@ -92,6 +95,8 @@
 %left '('
 %left '[' '{'
 
+%token PEG
+
 %% /* RULES */
 
 /* The whole program */