develooper Front page | perl.perl5.porters | Postings from July 2001

Re: bleedperl perl_alloc..free leakage

Thread Previous | Thread Next
From:
Radu Greab
Date:
July 6, 2001 09:49
Subject:
Re: bleedperl perl_alloc..free leakage
Message ID:
15173.60406.308246.456184@ix.netsoft.ro

On Sat, 30 Jun 2001 08:29 -0500, Jarkko Hietaniemi wrote:
 > The leak is real, here's, courtesy Alan Burlison, the Purify log.
 > Happens only under -Dusethreads -Duseithreads.

And here's the patch that stops this leak.


Thanks,
Radu Greab


--- op.c~	Fri Jul  6 04:20:33 2001
+++ op.c	Fri Jul  6 19:27:39 2001
@@ -842,12 +842,12 @@
 		    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));

Thread Previous | Thread Next


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About