In perl.git, the branch blead has been updated
<http://perl5.git.perl.org/perl.git/commitdiff/2ff402b77dbfaa8fc14230271f1a86423a26c0f8?hp=09dcfa7d12b25dc89ac02dc0f060ecc80d0335b2>
- Log -----------------------------------------------------------------
commit 2ff402b77dbfaa8fc14230271f1a86423a26c0f8
Author: Karl Williamson <pub...@khwilliamson.com>
Date: Fri May 20 10:54:22 2011 -0600
regcomp.c: Another memory leak regression
The reference count should be decremented upon freeing.
-----------------------------------------------------------------------
Summary of changes:
regcomp.c | 1 +
1 files changed, 1 insertions(+), 0 deletions(-)
diff --git a/regcomp.c b/regcomp.c
index a1183d5..d2a60fa 100644
--- a/regcomp.c
+++ b/regcomp.c
@@ -5980,6 +5980,7 @@ S_invlist_destroy(pTHX_ HV* const invlist)
UV *list = INT2PTR(UV *, SvUV(*list_ptr)); /* PERL_POISON needs lvalue
*/
Safefree(list);
}
+ SvREFCNT_dec(invlist);
}
STATIC void
--
Perl5 Master Repository
