summaryrefslogtreecommitdiff
path: root/scope.c
diff options
context:
space:
mode:
authorIlya Zakharevich <ilya@math.berkeley.edu>2000-12-04 19:40:25 -0500
committerJarkko Hietaniemi <jhi@iki.fi>2000-12-05 15:52:34 +0000
commit840a7b70755d06740715e982aa756f9d77203c4e (patch)
tree41e2a532a3c399c925ded4bdcf51a1beb2fec50d /scope.c
parent4c80c0b28d91ade6a9768a49b70f648aabec579b (diff)
downloadperl-840a7b70755d06740715e982aa756f9d77203c4e.tar.gz
Re: [PATCH] The largest hoax of all times?
Date: Tue, 5 Dec 2000 00:40:25 -0500 Message-ID: <20001205004025.A4050@monk.mps.ohio-state.edu> Subject: Re: [PATCH] The largest hoax of all times? From: Ilya Zakharevich <ilya@math.ohio-state.edu> Date: Mon, 4 Dec 2000 23:55:53 -0500 Message-ID: <20001204235553.A1140@monk.mps.ohio-state.edu> Subject: Re: [PATCH] The largest hoax of all times? From: Ilya Zakharevich <ilya@math.ohio-state.edu> Date: Tue, 5 Dec 2000 01:28:45 -0500 Message-ID: <20001205012844.A4227@monk.mps.ohio-state.edu> Fix the unpredictable order of DESTROYs. p4raw-id: //depot/perl@7991
Diffstat (limited to 'scope.c')
-rw-r--r--scope.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/scope.c b/scope.c
index 0713fa7e78..3f41a4e56b 100644
--- a/scope.c
+++ b/scope.c
@@ -809,7 +809,7 @@ Perl_leave_scope(pTHX_ I32 base)
/* Can clear pad variable in place? */
if (SvREFCNT(sv) <= 1 && !SvOBJECT(sv)) {
if (SvTHINKFIRST(sv))
- sv_force_normal(sv);
+ sv_force_normal_flags(sv, SV_IMMEDIATE_UNREF);
if (SvMAGICAL(sv))
mg_free(sv);