summaryrefslogtreecommitdiff
path: root/perl.c
diff options
context:
space:
mode:
authorDoug MacEachern <dougm@covalent.net>2001-02-07 11:18:52 -0800
committerNick Ing-Simmons <nik@tiuk.ti.com>2001-02-08 19:15:58 +0000
commita0739874a58147af36c59eb6d5d23113ccab3a9e (patch)
tree17b80f13dfbdc83c0fbca6ec852a2443ad2c1c0c /perl.c
parent2eec1a1ed8f4ac423d53f3e0bb68e0581ea99aab (diff)
downloadperl-a0739874a58147af36c59eb6d5d23113ccab3a9e.tar.gz
Re: [patch] Re: PL_ptr_table
Message-Id: <Pine.LNX.4.21.0102071916270.29229-100000@mako.covalent.net> p4raw-id: //depot/perl@8713
Diffstat (limited to 'perl.c')
-rw-r--r--perl.c3
1 files changed, 3 insertions, 0 deletions
diff --git a/perl.c b/perl.c
index 21ca8aa068..c11007ef9a 100644
--- a/perl.c
+++ b/perl.c
@@ -698,6 +698,9 @@ perl_destruct(pTHXx)
}
SvREFCNT_dec(PL_strtab);
+ /* free the pointer table used for cloning */
+ ptr_table_free(PL_ptr_table);
+
/* free special SVs */
SvREFCNT(&PL_sv_yes) = 0;