summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorFather Chrysostomos <sprout@cpan.org>2011-06-22 08:36:45 -0700
committerFather Chrysostomos <sprout@cpan.org>2011-06-22 12:29:21 -0700
commite178c74424188071a41e23f88a3648fd83276dba (patch)
treee13cc050eb936c35ccb8b439569dd64bde1e3830
parent4f443c3d0f7320f189e57a61fd2963e928884334 (diff)
downloadperl-e178c74424188071a41e23f88a3648fd83276dba.tar.gz
Remove another CvLVALUE check from pp_leavesublv
-rw-r--r--pp_ctl.c2
1 files changed, 0 insertions, 2 deletions
diff --git a/pp_ctl.c b/pp_ctl.c
index c358734b01..9f7c52a1bf 100644
--- a/pp_ctl.c
+++ b/pp_ctl.c
@@ -2437,8 +2437,6 @@ PP(pp_leavesublv)
goto rvalue;
if (gimme == G_ARRAY) {
mark = newsp + 1;
- if (!CvLVALUE(cx->blk_sub.cv))
- goto rvalue_array;
EXTEND_MORTAL(SP - newsp);
for (mark = newsp + 1; mark <= SP; mark++) {
if (SvTEMP(*mark))