From 8855548413bb7568cd0b6c06c2c53dee0725b869 Mon Sep 17 00:00:00 2001
From: Nicholas Clark <nick@ccl4.org>
Date: Wed, 17 Jan 2007 19:22:47 +0000
Subject: [PATCH] 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
---
 sv.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/sv.c b/sv.c
index 787b0c5..6417439 100644
--- 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 */
-- 
2.7.4