# HG changeset patch
# User Karl Heuer <kwzh@gnu.org>
# Date 800941013 0
# Node ID 8d57babf4b36721e49d6319593df3ee078b58b78
# Parent  343ec791e9bea9db1bfd4914283e6b11cf5799ea
(Flogb): frexp needs a pointer to int, not EMACS_INT.

diff -r 343ec791e9be -r 8d57babf4b36 src/floatfns.c
--- a/src/floatfns.c	Fri May 19 21:53:18 1995 +0000
+++ b/src/floatfns.c	Sat May 20 03:36:53 1995 +0000
@@ -684,8 +684,9 @@
       IN_FLOAT (value = logb (f), "logb", arg);
 #else
 #ifdef HAVE_FREXP
-      IN_FLOAT (frexp (f, &value), "logb", arg);
-      value--;
+      int ivalue;
+      IN_FLOAT (frexp (f, &ivalue), "logb", arg);
+      value = ivalue - 1;
 #else
       int i;
       double d;