summaryrefslogtreecommitdiff
path: root/toke.c
diff options
context:
space:
mode:
Diffstat (limited to 'toke.c')
-rw-r--r--toke.c1
1 files changed, 1 insertions, 0 deletions
diff --git a/toke.c b/toke.c
index 42c8119def..13a1831fce 100644
--- a/toke.c
+++ b/toke.c
@@ -690,6 +690,7 @@ Perl_lex_start(pTHX_ SV *line, PerlIO *rsfp, U32 flags)
Perl_croak(aTHX_ "Lexing code internal error (%s)", "lex_start");
/* create and initialise a parser */
+
Newxz(parser, 1, yy_parser);
parser->old_parser = oparser = PL_parser;
PL_parser = parser;