X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=perly.h;h=54d137250f1250b8d3a6379bcca31d155268da9e;hb=363c40c40eaf5d0cfd92f460a3f838c41f9756ad;hp=990772700116776f1487a566a044f693f79842a5;hpb=36477c247f3c188fb8cc7e276c87b739d3e6ab7c;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/perly.h b/perly.h
index 9907727..54d1372 100644
--- a/perly.h
+++ b/perly.h
@@ -1,3 +1,4 @@
+#ifdef PERL_CORE
 #define WORD 257
 #define METHOD 258
 #define FUNCMETH 259
@@ -38,29 +39,34 @@
 #define NOAMP 294
 #define LOCAL 295
 #define MY 296
-#define OROP 297
-#define ANDOP 298
-#define NOTOP 299
-#define ASSIGNOP 300
-#define OROR 301
-#define ANDAND 302
-#define BITOROP 303
-#define BITANDOP 304
-#define SHIFTOP 305
-#define MATCHOP 306
-#define UMINUS 307
-#define REFGEN 308
-#define POWOP 309
-#define PREINC 310
-#define PREDEC 311
-#define POSTINC 312
-#define POSTDEC 313
-#define ARROW 314
+#define MYSUB 297
+#define COLONATTR 298
+#define PREC_LOW 299
+#define OROP 300
+#define DOROP 301
+#define ANDOP 302
+#define NOTOP 303
+#define ASSIGNOP 304
+#define OROR 305
+#define DORDOR 306
+#define ANDAND 307
+#define BITOROP 308
+#define BITANDOP 309
+#define SHIFTOP 310
+#define MATCHOP 311
+#define UMINUS 312
+#define REFGEN 313
+#define POWOP 314
+#define PREINC 315
+#define PREDEC 316
+#define POSTINC 317
+#define POSTDEC 318
+#define ARROW 319
+#endif /* PERL_CORE */
+
 typedef union {
     I32	ival;
     char *pval;
     OP *opval;
     GV *gvval;
 } YYSTYPE;
-extern YYSTYPE yylval;
-extern YYSTYPE yylval;