mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-08 04:30:45 -08:00
Code Issues Projects Releases Wiki Activity

(Flogb): Fix arg names. Don't confuse Lisp_Object with integer.

Browse source
This commit is contained in:
Richard M. Stallman 1993-03-11 07:25:50 +00:00
parent 6628c5eaa0
commit 5bf5416601
1 changed files with 4 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

7
src/floatfns.c
View file

@ -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
}