This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Integrate change #9064 from maintperl into mainline.
authorJarkko Hietaniemi <jhi@iki.fi>
Wed, 7 Mar 2001 14:17:44 +0000 (14:17 +0000)
committerJarkko Hietaniemi <jhi@iki.fi>
Wed, 7 Mar 2001 14:17:44 +0000 (14:17 +0000)
fix memory leak in pack("Bb",...)

p4raw-link: @9064 on //depot/maint-5.6/perl: 58108105c16130ce852e73f8543b2ccc8bf2388f

p4raw-id: //depot/perl@9065
p4raw-integrated: from //depot/maint-5.6/perl@9063 'merge in' perl.c
(@8986..)

perl.c

diff --git a/perl.c b/perl.c
index b1d70b1..03b2ec1 100644 (file)
--- a/perl.c
+++ b/perl.c
@@ -745,6 +745,7 @@ perl_destruct(pTHXx)
     Safefree(PL_op_mask);
     Safefree(PL_psig_ptr);
     Safefree(PL_psig_name);
+    Safefree(PL_bitcount);
     Safefree(PL_psig_pend);
     nuke_stacks();
     PL_hints = 0;              /* Reset hints. Should hints be per-interpreter ? */