summaryrefslogtreecommitdiff
path: root/parser.h
diff options
context:
space:
mode:
authorDave Mitchell <davem@fdisolutions.com>2007-05-04 00:41:51 +0000
committerDave Mitchell <davem@fdisolutions.com>2007-05-04 00:41:51 +0000
commit53a7735b62aee14640bc8ca619b4267f07d686b9 (patch)
treeeb7cf7f4d631f6b83cd24d9c98ce0cc2821df29f /parser.h
parentd932daed4961bf485d739adcee3fa2136d8ca8ca (diff)
downloadperl-53a7735b62aee14640bc8ca619b4267f07d686b9.tar.gz
move PL_expect and PL_copline into the PL_parser structure
p4raw-id: //depot/perl@31134
Diffstat (limited to 'parser.h')
-rw-r--r--parser.h2
1 files changed, 2 insertions, 0 deletions
diff --git a/parser.h b/parser.h
index f0a1710ce8..847e50a5f9 100644
--- a/parser.h
+++ b/parser.h
@@ -45,6 +45,7 @@ typedef struct yy_parser {
U8 lex_defer; /* state after determined token */
bool lex_dojoin; /* doing an array interpolation */
U8 lex_expect; /* expect after determined token */
+ U8 expect; /* how to interpret ambiguous tokens */
I32 lex_formbrack; /* bracket count at outer format level */
OP *lex_inpat; /* in pattern $) and $| are special */
OP *lex_op; /* extra info to pass back on op */
@@ -59,6 +60,7 @@ typedef struct yy_parser {
bool preambled;
SUBLEXINFO sublex_info;
SV *linestr; /* current chunk of src text */
+ line_t copline; /* current line number */
#ifdef PERL_MAD
SV *endwhite;