Mercurial > emacs

changeset 5495:87f9165f5b14

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[MSDOS]: Don't define HAVE_MATHERR.
author Richard M. Stallman <rms@gnu.org>
date Sat, 08 Jan 1994 09:16:45 +0000
parents 1ea2b4351945
children 24f0d2908e61
files src/floatfns.c
diffstat 1 files changed, 13 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/src/floatfns.c	Sat Jan 08 09:15:49 1994 +0000
+++ b/src/floatfns.c	Sat Jan 08 09:16:45 1994 +0000
@@ -53,6 +53,16 @@
 
 #ifdef LISP_FLOAT_TYPE
 
+#if 0 /* That is untrue--XINT is used below, and it uses INTBITS.
+	 What in the world is values.h, anyway?  */
+#ifdef MSDOS
+/* These are redefined in <values.h> and not used here */
+#undef INTBITS
+#undef LONGBITS
+#undef SHORTBITS
+#endif
+#endif
+
 /* Work around a problem that happens because math.h on hpux 7
    defines two static variables--which, in Emacs, are not really static,
    because `static' is defined as nothing.  The problem is that they are
@@ -70,12 +80,14 @@
 extern double logb ();
 #endif /* !hpux && HAVE_LOGB */
 
+#ifndef MSDOS
 #if defined(DOMAIN) && defined(SING) && defined(OVERFLOW)
     /* If those are defined, then this is probably a `matherr' machine. */
 # ifndef HAVE_MATHERR
 #  define HAVE_MATHERR
 # endif
 #endif
+#endif
 
 #ifdef NO_MATHERR
 #undef HAVE_MATHERR
@@ -813,7 +825,7 @@
   if (d >= 0.0)
     IN_FLOAT (d = floor (d), "ftruncate", arg);
   else
-    IN_FLOAT (d = ceil (d), arg);
+    IN_FLOAT (d = ceil (d), "ftruncate", arg);
   return make_float (d);
 }
 #endif