diff options
author | Dave Mitchell <davem@fdisolutions.com> | 2007-05-05 17:38:12 +0000 |
---|---|---|
committer | Dave Mitchell <davem@fdisolutions.com> | 2007-05-05 17:38:12 +0000 |
commit | bc177e6b66d4907a90c81f2862ce55ad78b6496f (patch) | |
tree | c5d5a48ea379b96c206696e7091532a97420284c /toke.c | |
parent | 7c1f70cbf29b1c0cfc4cf8a13260aa01453de093 (diff) | |
download | perl-bc177e6b66d4907a90c81f2862ce55ad78b6496f.tar.gz |
move PL_lex_state into the PL_parser struct
p4raw-id: //depot/perl@31154
Diffstat (limited to 'toke.c')
-rw-r--r-- | toke.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -60,6 +60,7 @@ #define PL_last_uni (PL_parser->last_uni) #define PL_last_lop (PL_parser->last_lop) #define PL_last_lop_op (PL_parser->last_lop_op) +#define PL_lex_state (PL_parser->lex_state) #ifdef PERL_MAD # define PL_endwhite (PL_parser->endwhite) @@ -663,7 +664,6 @@ Perl_lex_start(pTHX_ SV *line) /* initialise lexer state */ - SAVEI8(PL_lex_state); SAVECOPLINE(PL_curcop); SAVEDESTRUCTOR_X(restore_rsfp, PL_rsfp); |