Commit | Line | Data |
---|---|---|
bae7117f WH |
1 | #define FMAX 40 |
2 | #define EXPMAXDIGS 8 | |
3 | #define EXPMAX 99999999 | |
4 | /* FMAX = max number of nonzero digits passed to atof() */ | |
5 | /* EXPMAX = 10^EXPMAXDIGS - 1 = largest allowed exponent absolute value */ | |
6 | ||
7 | #include "local.h" | |
8 | ||
9 | /* MAXFRACDIGS and MAXINTDIGS are for wrt_F -- bounds (not necessarily | |
10 | tight) on the maximum number of digits to the right and left of | |
11 | * the decimal point. | |
12 | */ | |
13 | ||
14 | #ifdef VAX | |
15 | #define MAXFRACDIGS 56 | |
16 | #define MAXINTDIGS 38 | |
17 | #else | |
18 | #ifdef CRAY | |
19 | #define MAXFRACDIGS 9880 | |
20 | #define MAXINTDIGS 9864 | |
21 | #else | |
22 | /* values that suffice for IEEE double */ | |
23 | #define MAXFRACDIGS 344 | |
24 | #define MAXINTDIGS 308 | |
25 | #endif | |
26 | #endif |