Replace SvRELEASE_IVX(dstr) with SvOOK_off(dstr) in sv_setsv_flags(),

because it's not possible for dstr to be COW at this point, due to an
earlier force_normal.

p4raw-id: //depot/perl@29855

diff --git a/sv.c b/sv.c
index 787b0c5..6417439 100644 (file)
--- a/sv.c
+++ b/sv.c
@@ -3705,7 +3705,7 @@ Perl_sv_setsv_flags(pTHX_ SV *dstr, register SV *sstr, I32 flags)
            SvNV_set(dstr, SvNVX(sstr));
        }
        if (sflags & SVp_IOK) {
-           SvRELEASE_IVX(dstr);
+           SvOOK_off(dstr);
            SvIV_set(dstr, SvIVX(sstr));
            /* Must do this otherwise some other overloaded use of 0x80000000
               gets confused. I guess SVpbm_VALID */