diff options
| author | Andy Lester <andy@petdance.com> | 2005-06-23 21:04:00 +0000 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2005-06-23 18:53:04 +0000 |
| commit | 8772537cf6d022a54f738ccb84b65a7f21ccf1b2 (patch) | |
| tree | a17781729c582f324a835278656c8f20a0ce1bfd /pp_ctl.c | |
| parent | 5b35fc8b5884b43fcc53d952f9dc9ad629b742f1 (diff) | |
| download | perl-8772537cf6d022a54f738ccb84b65a7f21ccf1b2.tar.gz | |
Pre-YAPC consting fun
Message-ID: <20050623190423.GA13835@petdance.com>
p4raw-id: //depot/perl@24965
Diffstat (limited to 'pp_ctl.c')
| -rw-r--r-- | pp_ctl.c | 3 |
1 files changed, 2 insertions, 1 deletions
@@ -2055,12 +2055,13 @@ PP(pp_last) register PERL_CONTEXT *cx; I32 pop2 = 0; I32 gimme; - I32 optype = 0; + I32 optype; OP *nextop; SV **newsp; PMOP *newpm; SV **mark; SV *sv = Nullsv; + PERL_UNUSED_VAR(optype); if (PL_op->op_flags & OPf_SPECIAL) { cxix = dopoptoloop(cxstack_ix); |