X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=perly.h;h=f442416599ca8b7c651449b3c9d41979abea1928;hb=cf6c151c4d1b7ed05e154d608f547018d54674bc;hp=0c19d29aa70d4c03d2d808e9ed7d196554fe24a9;hpb=123d08c9856c0c1cfafae2a631dd18e9539aaf13;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/perly.h b/perly.h
index 0c19d29..f442416 100644
--- a/perly.h
+++ b/perly.h
@@ -187,7 +187,8 @@
 #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;
@@ -202,7 +203,7 @@ typedef union YYSTYPE
     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