]> code.delx.au - gnu-emacs/blobdiff - src/floatfns.c
(Ffile_attributes): Use cast to avoid warnings.
[gnu-emacs] / src / floatfns.c
index 614506e7c4f7a2fcab4c6753b81736a34cb6b7b8..29bdccf29890ea73a9fe16d4164a688318ff5f5d 100644 (file)
@@ -47,15 +47,17 @@ Boston, MA 02111-1307, USA.  */
 #include <signal.h>
 
 #include <config.h>
-#include "lisp.h"
-#include "syssignal.h"
-
-#ifdef LISP_FLOAT_TYPE
 
+/* Put this before lisp.h so that lisp.h can define DBL_DIG if not defined.  */
 #if STDC_HEADERS
 #include <float.h>
 #endif
 
+#include "lisp.h"
+#include "syssignal.h"
+
+#ifdef LISP_FLOAT_TYPE
+
 /* If IEEE_FLOATING_POINT isn't defined, default it from FLT_*. */
 #ifndef IEEE_FLOATING_POINT
 #if (FLT_RADIX == 2 && FLT_MANT_DIG == 24 \
@@ -829,7 +831,7 @@ static double
 rint (d)
      double d;
 {
-  return floor(d + 0.5);
+  return floor (d + 0.5);
 }
 #endif