summaryrefslogtreecommitdiff
path: root/pp_ctl.c
diff options
context:
space:
mode:
authorFather Chrysostomos <sprout@cpan.org>2011-12-27 10:09:01 -0800
committerFather Chrysostomos <sprout@cpan.org>2011-12-28 22:58:51 -0800
commitae917476d21d843e7a5fcaff458c5ff8cad96328 (patch)
treef239b3b8763e6c61d86929e5480a2f6dba290e51 /pp_ctl.c
parenta84828f3d678aa901130999bcf125ea17d27cce5 (diff)
downloadperl-ae917476d21d843e7a5fcaff458c5ff8cad96328.tar.gz
diag_listed_as for another lv sub error
Diffstat (limited to 'pp_ctl.c')
-rw-r--r--pp_ctl.c1
1 files changed, 1 insertions, 0 deletions
diff --git a/pp_ctl.c b/pp_ctl.c
index bcefceb0ee..3b7a0791d3 100644
--- a/pp_ctl.c
+++ b/pp_ctl.c
@@ -2395,6 +2395,7 @@ S_return_lvalues(pTHX_ SV **mark, SV **sp, SV **newsp, I32 gimme,
POPSUB(cx,sv);
PL_curpm = newpm;
LEAVESUB(sv);
+ /* diag_listed_as: Can't return %s from lvalue subroutine */
Perl_croak(aTHX_
"Can't return a %s from lvalue subroutine",
SvREADONLY(TOPs) ? "readonly value" : "temporary");