Allow option to treat barewords at start of Unix paths as simple words rather than...

[p5sagit/p5-mst-13.2.git] / perly.h

diff --git a/perly.h b/perly.h
index 1d9f7ad..14f5e92 100644 (file)
--- a/perly.h
+++ b/perly.h
@@ -1,3 +1,4 @@
+#ifdef PERL_CORE
 #define WORD 257
 #define METHOD 258
 #define FUNCMETH 259
@@ -26,41 +27,42 @@
 #define FUNC0 282
 #define FUNC1 283
 #define FUNC 284
-#define RELOP 285
-#define EQOP 286
-#define MULOP 287
-#define ADDOP 288
-#define DOLSHARP 289
-#define DO 290
-#define HASHBRACK 291
-#define NOAMP 292
-#define LOCAL 293
-#define MY 294
-#define OROP 295
-#define ANDOP 296
-#define NOTOP 297
-#define LSTOP 298
-#define ASSIGNOP 299
-#define OROR 300
-#define ANDAND 301
-#define BITOROP 302
-#define BITANDOP 303
-#define UNIOP 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 UNIOP 285
+#define LSTOP 286
+#define RELOP 287
+#define EQOP 288
+#define MULOP 289
+#define ADDOP 290
+#define DOLSHARP 291
+#define DO 292
+#define HASHBRACK 293
+#define NOAMP 294
+#define LOCAL 295
+#define MY 296
+#define PREC_LOW 297
+#define OROP 298
+#define ANDOP 299
+#define NOTOP 300
+#define ASSIGNOP 301
+#define OROR 302
+#define ANDAND 303
+#define BITOROP 304
+#define BITANDOP 305
+#define SHIFTOP 306
+#define MATCHOP 307
+#define UMINUS 308
+#define REFGEN 309
+#define POWOP 310
+#define PREINC 311
+#define PREDEC 312
+#define POSTINC 313
+#define POSTDEC 314
+#define ARROW 315
+#endif /* PERL_CORE */
+
 typedef union {
     I32        ival;
     char *pval;
     OP *opval;
     GV *gvval;
 } YYSTYPE;
-extern YYSTYPE yylval;
-extern YYSTYPE yylval;