Change 20574 by [EMAIL PROTECTED] on 2003/08/09 07:11:32
Subject: [ PATCH] Re: strange destruction problem on VMS
From: Dave Mitchell <[EMAIL PROTECTED]>
Date: Fri, 8 Aug 2003 22:28:48 +0100
Message-ID: <[EMAIL PROTECTED]>
Affected files ...
... //depot/perl/sv.c#683 edit
Differences ...
==== //depot/perl/sv.c#683 (text) ====
Index: perl/sv.c
--- perl/sv.c#682~20315~ Tue Jul 29 07:47:04 2003
+++ perl/sv.c Sat Aug 9 00:11:32 2003
@@ -5309,6 +5309,7 @@
#endif
SvREFCNT(sv) = refcnt;
SvFLAGS(nsv) |= SVTYPEMASK; /* Mark as freed */
+ SvREFCNT(nsv) = 0;
del_SV(nsv);
}
End of Patch.
