Change 33815 by [EMAIL PROTECTED] on 2008/05/10 19:57:59
Subject: [PATCH] Call SvMAGICAL_off in mg_free
From: Bram <[EMAIL PROTECTED]>
Date: Mon, 05 May 2008 16:18:56 +0200
Message-ID: <[EMAIL PROTECTED]>
Affected files ...
... //depot/perl/mg.c#528 edit
... //depot/perl/sv.c#1540 edit
Differences ...
==== //depot/perl/mg.c#528 (text) ====
Index: perl/mg.c
--- perl/mg.c#527~33741~ 2008-04-24 13:54:50.000000000 -0700
+++ perl/mg.c 2008-05-10 12:57:59.000000000 -0700
@@ -532,6 +532,7 @@
SvMAGIC_set(sv, moremagic);
}
SvMAGIC_set(sv, NULL);
+ SvMAGICAL_off(sv);
return 0;
}
==== //depot/perl/sv.c#1540 (text) ====
Index: perl/sv.c
--- perl/sv.c#1539~33807~ 2008-05-10 08:58:32.000000000 -0700
+++ perl/sv.c 2008-05-10 12:57:59.000000000 -0700
@@ -3553,7 +3553,6 @@
{
/* need to nuke the magic */
mg_free(dstr);
- SvRMAGICAL_off(dstr);
}
/* There's a lot of redundancy below but we're going for speed here */
End of Patch.
