projects
/
platform
/
upstream
/
perl.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
93ef0b4
)
[patch] plug PL_beginav_save leak
author
Doug MacEachern
<dougm@covalent.net>
Sat, 15 Sep 2001 17:02:18 +0000
(10:02 -0700)
committer
Jarkko Hietaniemi
<jhi@iki.fi>
Sat, 15 Sep 2001 23:13:12 +0000
(23:13 +0000)
Message-ID: <Pine.LNX.4.21.
0109151659060
.6089-100000@mako.covalent.net>
p4raw-id: //depot/perl@12036
perl.c
patch
|
blob
|
history
diff --git
a/perl.c
b/perl.c
index
f35a938
..
9843134
100644
(file)
--- a/
perl.c
+++ b/
perl.c
@@
-564,10
+564,12
@@
perl_destruct(pTHXx)
/* startup and shutdown function lists */
SvREFCNT_dec(PL_beginav);
+ SvREFCNT_dec(PL_beginav_save);
SvREFCNT_dec(PL_endav);
SvREFCNT_dec(PL_checkav);
SvREFCNT_dec(PL_initav);
PL_beginav = Nullav;
+ PL_beginav_save = Nullav;
PL_endav = Nullav;
PL_checkav = Nullav;
PL_initav = Nullav;