Reorder the external regexp flags to get RXf_PMf_STD_PMMOD into the

[perl5.git] / perly.h

diff --git a/perly.h b/perly.h
index cadd593..f442416 100644 (file)
--- a/perly.h
+++ b/perly.h
@@ -187,19 +187,23 @@
 #if ! defined YYSTYPE && ! defined YYSTYPE_IS_DECLARED
 typedef union YYSTYPE
 {
-    I32        ival;
+    I32        ival; /* __DEFAULT__ (marker for regen_perly.pl;
+                               must always be 1st union member) */
     char *pval;
     OP *opval;
     GV *gvval;
 #ifdef PERL_IN_MADLY_C
     TOKEN* p_tkval;
-    TOKEN* tkval;
+    TOKEN* i_tkval;
 #else
     char *p_tkval;
-    I32        tkval;
+    I32        i_tkval;
+#endif
+#ifdef PERL_MAD
+    TOKEN* tkval;
 #endif
 }
-/* Line 1529 of yacc.c.  */
+/* Line 1489 of yacc.c.  */
        YYSTYPE;
 # define yystype YYSTYPE /* obsolescent; will be withdrawn */
 # define YYSTYPE_IS_DECLARED 1