diff options
| author | Dave Mitchell <davem@fdisolutions.com> | 2007-05-21 21:02:50 +0000 |
|---|---|---|
| committer | Dave Mitchell <davem@fdisolutions.com> | 2007-05-21 21:02:50 +0000 |
| commit | 670a9cb260d5f37076650f3eb5aa6c305796b0f7 (patch) | |
| tree | b046c644553ddb33cff4c97acbf31e31461fdc15 /op.c | |
| parent | 8d8376c624c0059bc9da5e4cfa799a20c1846647 (diff) | |
| download | perl-670a9cb260d5f37076650f3eb5aa6c305796b0f7.tar.gz | |
move PL_multi_end into the PL_parser struct
p4raw-id: //depot/perl@31254
Diffstat (limited to 'op.c')
| -rw-r--r-- | op.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -3494,8 +3494,8 @@ Perl_pmruntime(pTHX_ OP *o, OP *expr, bool isreg) OP *curop; if (pm->op_pmflags & PMf_EVAL) { curop = NULL; - if (CopLINE(PL_curcop) < (line_t)PL_multi_end) - CopLINE_set(PL_curcop, (line_t)PL_multi_end); + if (CopLINE(PL_curcop) < (line_t)PL_parser->multi_end) + CopLINE_set(PL_curcop, (line_t)PL_parser->multi_end); } else if (repl->op_type == OP_CONST) curop = repl; |