diff options
author | Father Chrysostomos <sprout@cpan.org> | 2011-06-22 08:36:45 -0700 |
---|---|---|
committer | Father Chrysostomos <sprout@cpan.org> | 2011-06-22 12:29:21 -0700 |
commit | e178c74424188071a41e23f88a3648fd83276dba (patch) | |
tree | e13cc050eb936c35ccb8b439569dd64bde1e3830 | |
parent | 4f443c3d0f7320f189e57a61fd2963e928884334 (diff) | |
download | perl-e178c74424188071a41e23f88a3648fd83276dba.tar.gz |
Remove another CvLVALUE check from pp_leavesublv
-rw-r--r-- | pp_ctl.c | 2 |
1 files changed, 0 insertions, 2 deletions
@@ -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)) |