X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=av.c;h=adc65496a16a1ad868fbafd85c3d731c725e7b06;hb=c13fdd862cdcd2a9001523a3b81e435228302b74;hp=29afaff7ee3a7e9ff2a13a1e7e4fd0ed086c5caa;hpb=1761cee512762c09b2a848d3c6cbd5a3b4232ffa;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/av.c b/av.c
index 29afaff..adc6549 100644
--- a/av.c
+++ b/av.c
@@ -104,7 +104,7 @@ Perl_av_extend(pTHX_ AV *av, I32 key)
 		IV itmp;
 #endif
 
-#if defined(MYMALLOC) && !defined(PURIFY) && !defined(LEAKTEST)
+#if defined(MYMALLOC) && !defined(LEAKTEST)
 		newmax = malloced_size((void*)AvALLOC(av))/sizeof(SV*) - 1;
 
 		if (key <= newmax)