Last change
on this file was 2, checked in by bird, 22 years ago |
Initial revision
|
-
Property cvs2svn:cvs-rev
set to
1.1
-
Property svn:eol-style
set to
native
-
Property svn:executable
set to
*
|
File size:
665 bytes
|
Line | |
---|
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 | #ifdef V10 /* Research Tenth-Edition Unix */
|
---|
8 | #include "local.h"
|
---|
9 | #endif
|
---|
10 |
|
---|
11 | /* MAXFRACDIGS and MAXINTDIGS are for wrt_F -- bounds (not necessarily
|
---|
12 | tight) on the maximum number of digits to the right and left of
|
---|
13 | * the decimal point.
|
---|
14 | */
|
---|
15 |
|
---|
16 | #ifdef VAX
|
---|
17 | #define MAXFRACDIGS 56
|
---|
18 | #define MAXINTDIGS 38
|
---|
19 | #else
|
---|
20 | #ifdef CRAY
|
---|
21 | #define MAXFRACDIGS 9880
|
---|
22 | #define MAXINTDIGS 9864
|
---|
23 | #else
|
---|
24 | /* values that suffice for IEEE double */
|
---|
25 | #define MAXFRACDIGS 344
|
---|
26 | #define MAXINTDIGS 308
|
---|
27 | #endif
|
---|
28 | #endif
|
---|
Note:
See
TracBrowser
for help on using the repository browser.