407c72cb29
* libF77/*: Fix formatting. * libI77/*: Likewise. * libU77/*: Likewise. From-SVN: r54145
29 lines
667 B
C
29 lines
667 B
C
#define FMAX 40
|
|
#define EXPMAXDIGS 8
|
|
#define EXPMAX 99999999
|
|
/* FMAX = max number of nonzero digits passed to atof() */
|
|
/* EXPMAX = 10^EXPMAXDIGS - 1 = largest allowed exponent absolute value */
|
|
|
|
#ifdef V10 /* Research Tenth-Edition Unix */
|
|
#include "local.h"
|
|
#endif
|
|
|
|
/* MAXFRACDIGS and MAXINTDIGS are for wrt_F -- bounds (not necessarily
|
|
tight) on the maximum number of digits to the right and left of
|
|
* the decimal point.
|
|
*/
|
|
|
|
#ifdef VAX
|
|
#define MAXFRACDIGS 56
|
|
#define MAXINTDIGS 38
|
|
#else
|
|
#ifdef CRAY
|
|
#define MAXFRACDIGS 9880
|
|
#define MAXINTDIGS 9864
|
|
#else
|
|
/* values that suffice for IEEE double */
|
|
#define MAXFRACDIGS 344
|
|
#define MAXINTDIGS 308
|
|
#endif
|
|
#endif
|