summaryrefslogtreecommitdiff
path: root/pp_ctl.c
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2008-01-22 15:27:09 +0000
committerNicholas Clark <nick@ccl4.org>2008-01-22 15:27:09 +0000
commit5c8c4cb2e56f3a0b4e2b54cb9ba6767a30ae85a4 (patch)
tree6539434e74c5058b1e123c81f03a22d8951755b0 /pp_ctl.c
parent1ed74d04861891f5c39302fcdf4cef047509e873 (diff)
downloadperl-5c8c4cb2e56f3a0b4e2b54cb9ba6767a30ae85a4.tar.gz
Remove code obsoleted by change 18.
p4raw-id: //depot/perl@33036
Diffstat (limited to 'pp_ctl.c')
-rw-r--r--pp_ctl.c1
1 files changed, 0 insertions, 1 deletions
diff --git a/pp_ctl.c b/pp_ctl.c
index 50a9df66c0..e4c3f8f497 100644
--- a/pp_ctl.c
+++ b/pp_ctl.c
@@ -1914,7 +1914,6 @@ PP(pp_enteriter)
}
else {
cx->blk_loop.iterary = PL_curstack;
- AvFILLp(PL_curstack) = SP - PL_stack_base;
if (PL_op->op_private & OPpITER_REVERSED) {
cx->blk_loop.itermax = MARK - PL_stack_base + 1;
cx->blk_loop.iterix = cx->blk_oldsp + 1;