diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 1998-03-20 21:39:28 +0200 |
|---|---|---|
| committer | Malcolm Beattie <mbeattie@sable.ox.ac.uk> | 1998-04-02 16:16:26 +0000 |
| commit | 9ae6d45f4f8436644475e9431c4305550cbce91c (patch) | |
| tree | 34f5b94d87390edb8a4041d47b4b178b13dd96b1 | |
| parent | 1930e9396af9d9fc0058435c827d67f591aa4e03 (diff) | |
| download | perl-9ae6d45f4f8436644475e9431c4305550cbce91c.tar.gz | |
Re: [PATCH] 5.004_63: UNICOS 9
p4raw-id: //depot/perl@859
| -rw-r--r-- | hints/unicos.sh | 2 | ||||
| -rw-r--r-- | regcomp.h | 5 |
2 files changed, 5 insertions, 2 deletions
diff --git a/hints/unicos.sh b/hints/unicos.sh index 1d828550cc..7579eed65a 100644 --- a/hints/unicos.sh +++ b/hints/unicos.sh @@ -5,6 +5,6 @@ optimize="-O1" d_setregid='undef' d_setreuid='undef' case "$usemymalloc" in -'') usemymalloc='n' ;; +'') usemymalloc='y' ;; esac @@ -271,7 +271,10 @@ struct regnode_2 { #endif -#define REG_INFTY I16_MAX +/* I16_MAX is no good for REG_INFTY because sizeof(short) > 2 + * is perfectly fine. In Cray C90 sizeof(short) == 4, + * in Cray T90 sizeof(short) == 8. */ +#define REG_INFTY ((1<<15)-1) #ifdef REGALIGN # define ARG_VALUE(arg) (arg) |