summaryrefslogtreecommitdiff
path: root/op.c
diff options
context:
space:
mode:
authorRadu Greab <radu@netsoft.ro>2001-07-06 22:48:54 +0300
committerJarkko Hietaniemi <jhi@iki.fi>2001-07-07 15:12:36 +0000
commit83da49e6dc02d11623dc62ca3191fd4694484ce8 (patch)
tree070a0f61db5b9cb34325743d4e0750d5784201d5 /op.c
parentf067b87872dea57cc42e70fbf2574bf4f17ace75 (diff)
downloadperl-83da49e6dc02d11623dc62ca3191fd4694484ce8.tar.gz
Re: bleedperl perl_alloc..free leakage
Message-ID: <15173.60406.308246.456184@ix.netsoft.ro> Leak-be-gone. p4raw-id: //depot/perl@11188
Diffstat (limited to 'op.c')
-rw-r--r--op.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/op.c b/op.c
index 92d15da3a1..bb288a3576 100644
--- a/op.c
+++ b/op.c
@@ -842,12 +842,12 @@ clear_pmop:
lastpmop = pmop;
pmop = pmop->op_pmnext;
}
+ }
#ifdef USE_ITHREADS
- Safefree(PmopSTASHPV(cPMOPo));
+ Safefree(PmopSTASHPV(cPMOPo));
#else
- /* NOTE: PMOP.op_pmstash is not refcounted */
+ /* NOTE: PMOP.op_pmstash is not refcounted */
#endif
- }
}
cPMOPo->op_pmreplroot = Nullop;
ReREFCNT_dec(PM_GETRE(cPMOPo));