summaryrefslogtreecommitdiff
path: root/src/floatfns.c
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1993-03-11 07:25:50 +0000
committerRichard M. Stallman <rms@gnu.org>1993-03-11 07:25:50 +0000
commitfbd0a80d7e9ac9322f12677dd321989dd473447a (patch)
treec1d57cc3760611b2c181453de420d308e0eb9d22 /src/floatfns.c
parentdb41c152c968f5b56b1672e0a17f388ba083a5dd (diff)
downloademacs-fbd0a80d7e9ac9322f12677dd321989dd473447a.tar.gz
(Flogb): Fix arg names. Don't confuse Lisp_Object with integer.
Diffstat (limited to 'src/floatfns.c')
-rw-r--r--src/floatfns.c7
1 files changed, 4 insertions, 3 deletions
diff --git a/src/floatfns.c b/src/floatfns.c
index fb6030f69e3..1235dad2f86 100644
--- a/src/floatfns.c
+++ b/src/floatfns.c
@@ -624,10 +624,11 @@ This is the same as the exponent of a float.")
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
}