From fb205e7a8791bda7ee1f6f939d96b947f4eb160c Mon Sep 17 00:00:00 2001
From: Dave Mitchell <davem@fdisolutions.com>
Date: Sat, 5 May 2007 00:49:51 +0000
Subject: migrate more variables to PL_parser struct:     PL_nexttoke
 PL_curforce PL_nextval PL_nexttype

p4raw-id: //depot/perl@31148
---
 parser.h | 9 +++++++++
 1 file changed, 9 insertions(+)

(limited to 'parser.h')

diff --git a/parser.h b/parser.h
index 2dfcfa7d42..b9f4ddae9d 100644
--- a/parser.h
+++ b/parser.h
@@ -83,7 +83,16 @@ typedef struct yy_parser {
     SV		*thisstuff;
     SV		*thistoken;
     SV		*thiswhite;
+
+/* What we know when we're in LEX_KNOWNEXT state. */
+    NEXTTOKE	nexttoke[5];	/* value of next token, if any */
+    I32		curforce;
+#else
+    YYSTYPE	nextval[5];	/* value of next token, if any */
+    I32		nexttype[5];	/* type of next token */
+    I32		nexttoke;
 #endif
+
 } yy_parser;
     
 
-- 
cgit v1.2.1