summaryrefslogtreecommitdiff
path: root/pp_ctl.c
diff options
context:
space:
mode:
authorZefram <zefram@fysh.org>2017-11-29 21:51:11 +0000
committerZefram <zefram@fysh.org>2017-11-29 21:51:11 +0000
commite98c3eae7b9c9628400af33f6ac77a6feebb4f3f (patch)
tree4b1e5a82e9163369ff45add5825ac6cb7c7e8c10 /pp_ctl.c
parentb4904f80ff3e727173a3d8a9856827695e1af0ad (diff)
downloadperl-e98c3eae7b9c9628400af33f6ac77a6feebb4f3f.tar.gz
remove unused CXp_FOR_DEF and OPpITER_DEF
These were used to identify foreach loops that qualify as topicalizers. That's no longer a relevant classification.
Diffstat (limited to 'pp_ctl.c')
-rw-r--r--pp_ctl.c4
1 files changed, 0 insertions, 4 deletions
diff --git a/pp_ctl.c b/pp_ctl.c
index 9e21fde1fb..f378eccfec 100644
--- a/pp_ctl.c
+++ b/pp_ctl.c
@@ -2160,8 +2160,6 @@ PP(pp_enteriter)
itersave = GvSV(sv);
SvREFCNT_inc_simple_void(itersave);
cxflags = CXp_FOR_GV;
- if (PL_op->op_private & OPpITER_DEF)
- cxflags |= CXp_FOR_DEF;
}
else { /* LV ref: for \$foo (...) */
assert(SvTYPE(sv) == SVt_PVMG);
@@ -2171,8 +2169,6 @@ PP(pp_enteriter)
cxflags = CXp_FOR_LVREF;
}
}
- /* OPpITER_DEF (implicit $_) should only occur with a GV iter var */
- assert((cxflags & CXp_FOR_GV) || !(PL_op->op_private & OPpITER_DEF));
/* Note that this context is initially set as CXt_NULL. Further on
* down it's changed to one of the CXt_LOOP_*. Before it's changed,