Integrate change #9064 from maintperl into mainline.
Jarkko Hietaniemi [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 ? */