summaryrefslogtreecommitdiff
path: root/pp_hot.c
diff options
context:
space:
mode:
authorFather Chrysostomos <sprout@cpan.org>2012-04-21 23:25:33 -0700
committerFather Chrysostomos <sprout@cpan.org>2012-05-21 16:51:28 -0700
commitde290e1f6850f9240f165cc786940b0ff682718b (patch)
tree4795adffbec92ccb9a436d89487bac637b27fa52 /pp_hot.c
parent1fce104d6f70f36a801dc0b64bcaae533ff61171 (diff)
downloadperl-de290e1f6850f9240f165cc786940b0ff682718b.tar.gz
pp_hot.c:pp_entersub: Rmv comment about setting PL_compcv
PL_compcv is meant to point to the currently compiling sub, even dur- ing an eval’s run time. (See commit 676a678.) Therefore, this com- ment’s suggestion is incorrect.
Diffstat (limited to 'pp_hot.c')
-rw-r--r--pp_hot.c5
1 files changed, 0 insertions, 5 deletions
diff --git a/pp_hot.c b/pp_hot.c
index 89165d90a3..d0cf006b46 100644
--- a/pp_hot.c
+++ b/pp_hot.c
@@ -2685,11 +2685,6 @@ try_autoload:
PUSHSUB(cx);
cx->blk_sub.retop = PL_op->op_next;
CvDEPTH(cv)++;
- /* XXX This would be a natural place to set C<PL_compcv = cv> so
- * that eval'' ops within this sub know the correct lexical space.
- * Owing the speed considerations, we choose instead to search for
- * the cv using find_runcv() when calling doeval().
- */
if (CvDEPTH(cv) >= 2) {
PERL_STACK_OVERFLOW_CHECK();
pad_push(padlist, CvDEPTH(cv));