diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2000-03-04 05:31:19 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2000-03-04 05:31:19 +0000 |
| commit | 7b343de7d114e3f3fb28aef9dc2e6f4858d334ad (patch) | |
| tree | d75a3a3fa57e6c2b1194466bd4aa23243c355d3f /perl.h | |
| parent | ea16990f68658117a61203c0f6a4f8843b698007 (diff) | |
| download | perl-7b343de7d114e3f3fb28aef9dc2e6f4858d334ad.tar.gz | |
In HP-UX there is a secret handshake to get strtoll and strtoull.
p4raw-id: //depot/cfgperl@5508
Diffstat (limited to 'perl.h')
| -rw-r--r-- | perl.h | 6 |
1 files changed, 6 insertions, 0 deletions
@@ -3077,6 +3077,9 @@ typedef struct am_table_short AMTS; #if !defined(Atol) && defined(IV_IS_QUAD) && QUADKIND == QUAD_IS_LONG_LONG # if !defined(Atol) && defined(HAS_STRTOLL) +# ifdef __hpux +# define strtoll __strtoll /* secret handshake */ +# endif # define Atol(s) strtoll(s, (char**)NULL, 10) # endif # if !defined(Atol) && defined(HAS_ATOLL) @@ -3089,6 +3092,9 @@ typedef struct am_table_short AMTS; #endif #if !defined(Strtoul) && defined(UV_IS_QUAD) && QUADKIND == QUAD_IS_LONG_LONG +# ifdef __hpux +# define strtoull __strtoull /* secret handshake */ +# endif # if !defined(Strtoul) && defined(HAS_STRTOULL) # define Strtoul strtoull # endif |