diff options
| author | Gurusamy Sarathy <gsar@cpan.org> | 1998-07-09 11:07:42 +0000 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 1998-07-09 11:07:42 +0000 |
| commit | aafb16c143b5a73b46307523883bd0548ff26277 (patch) | |
| tree | 36e03183548882edec9d6cd60399af1a3ab46e13 /pp_ctl.c | |
| parent | 72b5445bd8dae616be2d969c596f57ff003832e2 (diff) | |
| download | perl-aafb16c143b5a73b46307523883bd0548ff26277.tar.gz | |
undo problematic change#1367
p4raw-link: @1367 on //depot/perl: d426b052dee31c20224ef2893d5c969ad5a2c617
p4raw-id: //depot/perl@1398
Diffstat (limited to 'pp_ctl.c')
| -rw-r--r-- | pp_ctl.c | 1 |
1 files changed, 0 insertions, 1 deletions
@@ -1388,7 +1388,6 @@ PP(pp_enteriter) croak("Range iterator outside integer range"); cx->blk_loop.iterix = SvIV(sv); cx->blk_loop.itermax = SvIV((SV*)cx->blk_loop.iterary); - sv_setiv(*svp, 0); /* make sure index SV is IV capable */ } else cx->blk_loop.iterlval = newSVsv(sv); |