From d34febbe3e9bc213868c0235195a37a1eef49cb3 Mon Sep 17 00:00:00 2001 From: "H.Merijn Brand" Date: Thu, 13 Jun 2002 11:58:30 +0200 Subject: [ PATCH ] mymalloc on HP-UX From: "H.Merijn Brand" Message-Id: <20020613095503.2BB2.H.M.BRAND@hccnet.nl> p4raw-id: //depot/perl@17217 --- hints/hpux.sh | 21 ++++++++++++++++++++- 1 file changed, 20 insertions(+), 1 deletion(-) diff --git a/hints/hpux.sh b/hints/hpux.sh index 1cd190eb5b..71705163d4 100644 --- a/hints/hpux.sh +++ b/hints/hpux.sh @@ -553,7 +553,26 @@ EOM EOCBU # The mysterious io_xs memory corruption in 11.00 32bit seems to get -# fixed by not using Perl's malloc. +# fixed by not using Perl's malloc. Flip side is performance loss. +# So we want mymalloc for all situations possible +usemymalloc='y' +case "$usethreads" in + $define|true|[yY]*) usemymalloc='n' ;; + *) case "$ccisgcc" in + $undef|false|[nN]*) + case "$use64bitint" in + $undef|false|[nN]*) + case "$ccflags" in + *-DDEBUGGING*) ;; + *) usemymalloc='n' ;; + esac + ;; + esac + ;; + esac + ;; + esac + usemymalloc='n' case "$useperlio" in $undef|false|[nN]*) usemymalloc='y' ;; -- cgit v1.2.1