Change 14858: SvSetSV() is not returnable, but that's okay since

[Jarkko Hietaniemi]

Change 14858 by jhi@alpha on 2002/02/25 00:01:13

        SvSetSV() is not returnable, but that's okay since
        sv_copypv() returns void.

Affected files ...

.... //depot/perl/sv.c#518 edit

Differences ...

==== //depot/perl/sv.c#518 (text) ====
Index: perl/sv.c
--- perl/sv.c.~1~       Sun Feb 24 17:15:05 2002
+++ perl/sv.c   Sun Feb 24 17:15:05 2002
@@ -3167,9 +3167,9 @@
     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 @@
            SvUTF8_on(tmpsv);
        else
            SvUTF8_off(tmpsv);
-       return SvSetSV(dsv,tmpsv);
+       SvSetSV(dsv,tmpsv);
     }
 }
 
End of Patch.