notes about running Purify

p4raw-id: //depot/perl@5079

1 files changed, 1 insertions, 1 deletions

diff --git a/sv.c b/sv.c
index 7e791b24c6..e3696b0147 100644
--- a/sv.c
+++ b/sv.c
@@ -1094,7 +1094,7 @@ Perl_sv_grow(pTHX_ register SV *sv, register STRLEN newlen)
 	s = SvPVX(sv);
     if (newlen > SvLEN(sv)) {		/* need more room? */
 	if (SvLEN(sv) && s) {
-#if defined(MYMALLOC) && !defined(PURIFY) && !defined(LEAKTEST)
+#if defined(MYMALLOC) && !defined(LEAKTEST)
 	    STRLEN l = malloced_size((void*)SvPVX(sv));
 	    if (newlen <= l) {
 		SvLEN_set(sv, l);