summaryrefslogtreecommitdiff
path: root/sv.c
diff options
context:
space:
mode:
authorFather Chrysostomos <sprout@cpan.org>2011-12-27 00:53:21 -0800
committerFather Chrysostomos <sprout@cpan.org>2011-12-27 00:53:21 -0800
commit043c750c4e1a47be8effe0df70ccd1714aff0460 (patch)
tree3d2723b132b7475f705131df9d5fab0e958df6b1 /sv.c
parentde6f7947b44879bbebfed2608d00b04515a09859 (diff)
downloadperl-043c750c4e1a47be8effe0df70ccd1714aff0460.tar.gz
perldiag: Remove ‘in %s’ from bizarre copy msg
so that splain can find the message even when there is no op mentioned.
Diffstat (limited to 'sv.c')
-rw-r--r--sv.c1
1 files changed, 1 insertions, 0 deletions
diff --git a/sv.c b/sv.c
index d94cf2c63a..e972476239 100644
--- a/sv.c
+++ b/sv.c
@@ -4047,6 +4047,7 @@ Perl_sv_setsv_flags(pTHX_ SV *dstr, register SV* sstr, const I32 flags)
{
const char * const type = sv_reftype(sstr,0);
if (PL_op)
+ /* diag_listed_as: Bizarre copy of %s */
Perl_croak(aTHX_ "Bizarre copy of %s in %s", type, OP_DESC(PL_op));
else
Perl_croak(aTHX_ "Bizarre copy of %s", type);