split parser stack from parser object

p4raw-id: //depot/perl@29649

1 files changed, 3 insertions, 2 deletions

diff --git a/parser.h b/parser.h
index 51bcf88ccf..9a61a52164 100644
--- a/parser.h
+++ b/parser.h
@@ -18,7 +18,8 @@ typedef struct {
 #endif
 } yy_stack_frame;
 
-typedef struct {
+typedef struct yy_parser {
+    struct yy_parser *old_parser; /* previous value of PL_parser */
     int		    yychar;	/* The lookahead symbol.  */
     YYSTYPE	    yylval;	/* value of lookahead symbol, set by yylex() */
 
@@ -27,8 +28,8 @@ typedef struct {
 
     int		    stack_size;
     int		    yylen;	/* length of active reduction */
+    yy_stack_frame  *stack;	/* base of stack */
     yy_stack_frame  *ps;	/* current stack frame */
-    yy_stack_frame  stack[1];	/* will actually be as many as needed */
 } yy_parser;