aboutsummaryrefslogtreecommitdiff
path: root/libf2c/libI77/fp.h
diff options
context:
space:
mode:
authorJeff Law <law@gcc.gnu.org>1998-01-31 18:37:08 -0700
committerJeff Law <law@gcc.gnu.org>1998-01-31 18:37:08 -0700
commit81fea2b1d147752f431b46c08f4c12a18a2d78bc (patch)
tree4b30cdf598ee6a8b24903fba52bb3e0c06bf459b /libf2c/libI77/fp.h
parent0dfb6849ef1d4c8b5bf178d7add69ab297fab8fa (diff)
downloadgcc-81fea2b1d147752f431b46c08f4c12a18a2d78bc.zip
gcc-81fea2b1d147752f431b46c08f4c12a18a2d78bc.tar.gz
gcc-81fea2b1d147752f431b46c08f4c12a18a2d78bc.tar.bz2
* Previous contents of gcc/f/runtime moved into toplevel
"libf2c" directory. From-SVN: r17568
Diffstat (limited to 'libf2c/libI77/fp.h')
-rw-r--r--libf2c/libI77/fp.h28
1 files changed, 28 insertions, 0 deletions
diff --git a/libf2c/libI77/fp.h b/libf2c/libI77/fp.h
new file mode 100644
index 0000000..40743d7
--- /dev/null
+++ b/libf2c/libI77/fp.h
@@ -0,0 +1,28 @@
+#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