diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 2002-02-25 00:01:13 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2002-02-25 00:01:13 +0000 |
commit | 7adcf7db342e2a16c8b5be92bd750017f3629b95 (patch) | |
tree | 7dd775a0ffe9f2209b70e461aa6dd4d90dc3cafd /sv.c | |
parent | 6050d10e6008e3d6e86de76c85d93bf5c06336aa (diff) | |
download | perl-7adcf7db342e2a16c8b5be92bd750017f3629b95.tar.gz |
SvSetSV() is not returnable, but that's okay since
sv_copypv() returns void.
p4raw-id: //depot/perl@14858
Diffstat (limited to 'sv.c')
-rw-r--r-- | sv.c | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -3167,9 +3167,9 @@ Perl_sv_copypv(pTHX_ SV *dsv, register SV *ssv) SV *tmpsv = sv_newmortal(); if ( SvTHINKFIRST(ssv) && SvROK(ssv) && SvAMAGIC(ssv) ) { - tmpsv=AMG_CALLun(ssv,string); + tmpsv = AMG_CALLun(ssv,string); if (SvTYPE(tmpsv) != SVt_RV || (SvRV(tmpsv) != SvRV(ssv))) - return SvSetSV(dsv,tmpsv); + SvSetSV(dsv,tmpsv); } { STRLEN len; @@ -3180,7 +3180,7 @@ Perl_sv_copypv(pTHX_ SV *dsv, register SV *ssv) SvUTF8_on(tmpsv); else SvUTF8_off(tmpsv); - return SvSetSV(dsv,tmpsv); + SvSetSV(dsv,tmpsv); } } |