From: Nicholas Clark <nick@ccl4.org>
Date: Fri, 10 Jun 2005 10:06:30 +0000 (+0000)
Subject: Change 24531 broke DEBUG_LEAKING_SCALARS.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=f34d064265539eae4e15437b48bf9db7bfe04ff9;p=p5sagit%2Fp5-mst-13.2.git

Change 24531 broke DEBUG_LEAKING_SCALARS.

p4raw-id: //depot/perl@24785
---

diff --git a/sv.c b/sv.c
index fb3e7dc..077a27d 100644
--- a/sv.c
+++ b/sv.c
@@ -5796,6 +5796,7 @@ Perl_sv_replace(pTHX_ register SV *sv, register SV *nsv)
     sv->sv_flags  = nsv->sv_flags;
     sv->sv_any    = nsv->sv_any;
     sv->sv_refcnt = nsv->sv_refcnt;
+    sv->sv_u      = nsv->sv_u;
 #else
     StructCopy(nsv,sv,SV);
 #endif