diff options
author | Dave Mitchell <davem@fdisolutions.com> | 2002-05-04 00:51:10 +0100 |
---|---|---|
committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2002-05-04 13:22:41 +0000 |
commit | b412ba13de1aba05d1c6879f79a05afb87caff24 (patch) | |
tree | 79f3486fb74ffe906983042b7f22567caafd2bd9 /scope.c | |
parent | 70a63e5f3c7f94ba3250f14cfab6845bafe96a42 (diff) | |
download | perl-b412ba13de1aba05d1c6879f79a05afb87caff24.tar.gz |
Re: [PATCH scope.c] Re: local($tied->{foo}) leaks
Message-ID: <20020503235110.E22026@fdgroup.com>
p4raw-id: //depot/perl@16386
Diffstat (limited to 'scope.c')
-rw-r--r-- | scope.c | 6 |
1 files changed, 0 insertions, 6 deletions
@@ -206,12 +206,6 @@ S_save_scalar_at(pTHX_ SV **sptr) PL_localizing = 1; SvSETMAGIC(sv); PL_localizing = 0; - /* If we're localizing a tied array/hash element, this new sv - * won't actually be stored in the array/hash - so it won't get - * reaped when the localize ends. Ensure it gets reaped by - * mortifying it instead. DAPM */ - if (SvTIED_mg(sv, PERL_MAGIC_tiedelem)) - sv_2mortal(sv); } return sv; } |