Mercurial > emacs

changeset 2129:6741f5f8ed54

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(Flogb): Fix arg names. Don't confuse Lisp_Object with integer.
author Richard M. Stallman <rms@gnu.org>
date Thu, 11 Mar 1993 07:25:50 +0000
parents 28d83027277f
children e5971e883f67
files src/floatfns.c
diffstat 1 files changed, 4 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/src/floatfns.c	Thu Mar 11 07:22:49 1993 +0000
+++ b/src/floatfns.c	Thu Mar 11 07:25:50 1993 +0000
@@ -624,10 +624,11 @@
   error ("SYSV apparently doesn't have a logb function; what to do?");
 #else
   Lisp_Object val;
-  double f = extract_float (num);
+  int value;
+  double f = extract_float (arg);
 
-  IN_FLOAT (val = logb (f), "logb", num);
-  XSET (val, Lisp_Int, val);
+  IN_FLOAT (value = logb (f), "logb", arg);
+  XSET (val, Lisp_Int, value);
   return val;
 #endif
 }