diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2000-03-12 05:08:29 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2000-03-12 05:08:29 +0000 |
| commit | 76b882ba4faa83b05d415f2a5e986b1de22b0311 (patch) | |
| tree | a67c10276dc91564e734f7f4d08500fdcdc42f66 /perl.h | |
| parent | 4be7d554b608099813565f63187a1a4420035998 (diff) | |
| download | perl-76b882ba4faa83b05d415f2a5e986b1de22b0311.tar.gz | |
continue flogging the string->int conversion ifdefs
p4raw-id: //depot/cfgperl@5675
Diffstat (limited to 'perl.h')
| -rw-r--r-- | perl.h | 6 |
1 files changed, 5 insertions, 1 deletions
@@ -3091,7 +3091,11 @@ typedef struct am_table_short AMTS; /* It would be more fashionable to use Strtol() to define atol() * (as is done for Atoul(), see below) but for backward compatibility * we just assume atol(). */ -# define Atol atol +# if defined(USE_64_BIT_INT) && defined(IV_IS_QUAD) && QUADKIND == QUAD_IS_LONG_LONG && defined(HAS_ATOLL) +# define Atol atoll +# else +# define Atol atol +# endif #endif #if !defined(Strtoul) && defined(USE_64_BIT_INT) && defined(UV_IS_QUAD) && QUADKIND == QUAD_IS_LONG_LONG |