diff options
| author | Andy Lester <andy@petdance.com> | 2005-06-02 07:19:43 -0500 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2005-06-03 08:31:26 +0000 |
| commit | b464bac0b70c4876af1296864220315edde8461d (patch) | |
| tree | 9d2088559b19bbf0fbf64591f1dcd7df4961be5b /perl.c | |
| parent | 2d706fb2bbfd21eac5cd2efc341a42f1caed2490 (diff) | |
| download | perl-b464bac0b70c4876af1296864220315edde8461d.tar.gz | |
Random consting
Message-ID: <20050602171943.GA16553@petdance.com>
p4raw-id: //depot/perl@24689
Diffstat (limited to 'perl.c')
| -rw-r--r-- | perl.c | 2 |
1 files changed, 0 insertions, 2 deletions
@@ -2282,7 +2282,6 @@ Perl_eval_sv(pTHX_ SV *sv, I32 flags) UNOP myop; /* fake syntax tree node */ volatile I32 oldmark = SP - PL_stack_base; volatile I32 retval = 0; - I32 oldscope; int ret; OP* oldop = PL_op; dJMPENV; @@ -2297,7 +2296,6 @@ Perl_eval_sv(pTHX_ SV *sv, I32 flags) Zero(PL_op, 1, UNOP); EXTEND(PL_stack_sp, 1); *++PL_stack_sp = sv; - oldscope = PL_scopestack_ix; if (!(flags & G_NOARGS)) myop.op_flags = OPf_STACKED; |