summaryrefslogtreecommitdiff
path: root/sv.c
diff options
context:
space:
mode:
authorIlya Zakharevich <ilya@math.berkeley.edu>1998-07-20 17:20:21 -0400
committerGurusamy Sarathy <gsar@cpan.org>1998-07-21 04:59:19 +0000
commit1fe09876906e5c02d44f66bddcb676b572676eef (patch)
tree985f9fb435b3db69a71040a830bfabc83f7d2da1 /sv.c
parentf1c73faff486d8cc820539ef43970bf49c246509 (diff)
downloadperl-1fe09876906e5c02d44f66bddcb676b572676eef.tar.gz
disable malloced_size() feedback with -DLEAKTEST
Message-Id: <199807210120.VAA15031@monk.mps.ohio-state.edu> Subject: [PATCH 5.004_75] -DLEAKTEST broken p4raw-id: //depot/perl@1603
Diffstat (limited to 'sv.c')
-rw-r--r--sv.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/sv.c b/sv.c
index db77f72d09..3652b9d83d 100644
--- a/sv.c
+++ b/sv.c
@@ -1118,7 +1118,7 @@ sv_grow(SV* sv, unsigned long newlen)
s = SvPVX(sv);
if (newlen > SvLEN(sv)) { /* need more room? */
if (SvLEN(sv) && s) {
-#if defined(MYMALLOC) && !defined(PURIFY)
+#if defined(MYMALLOC) && !defined(PURIFY) && !defined(LEAKTEST)
STRLEN l = malloced_size((void*)SvPVX(sv));
if (newlen <= l) {
SvLEN_set(sv, l);