diff options
author | H.Merijn Brand <h.m.brand@xs4all.nl> | 2002-09-23 20:33:12 +0200 |
---|---|---|
committer | hv <hv@crypt.org> | 2002-09-26 08:16:43 +0000 |
commit | 7bab3ede7bf671f54f0d8f3d55d015d9c9882812 (patch) | |
tree | c955efd9da330d34eed618bb2ab9ac7e8a9e6034 /ext/GDBM_File | |
parent | e6604a4dbe27f47e1c7f869847acedb8b382cb8f (diff) | |
download | perl-7bab3ede7bf671f54f0d8f3d55d015d9c9882812.tar.gz |
LEAKTEST is dead, RIP
Subject: Re: [perl #17197] SIGSEGV in perl 5.8.0 multithread build with -DLEAKTEST
From: "H.Merijn Brand" <h.m.brand@hccnet.nl>
Message-Id: <20020923182824.C7B6.H.M.BRAND@hccnet.nl>
p4raw-id: //depot/perl@17920
Diffstat (limited to 'ext/GDBM_File')
-rw-r--r-- | ext/GDBM_File/GDBM_File.xs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ext/GDBM_File/GDBM_File.xs b/ext/GDBM_File/GDBM_File.xs index 22350fd692..34acd79536 100644 --- a/ext/GDBM_File/GDBM_File.xs +++ b/ext/GDBM_File/GDBM_File.xs @@ -39,7 +39,7 @@ not_here(char *s) static void output_datum(pTHX_ SV *arg, char *str, int size) { -#if (!defined(MYMALLOC) || (defined(MYMALLOC) && defined(PERL_POLLUTE_MALLOC))) && !defined(LEAKTEST) +#if (!defined(MYMALLOC) || (defined(MYMALLOC) && defined(PERL_POLLUTE_MALLOC))) sv_usepvn(arg, str, size); #else sv_setpvn(arg, str, size); |