diff options
Diffstat (limited to 'src/floatfns.c')
-rw-r--r-- | src/floatfns.c | 10 |
1 files changed, 7 insertions, 3 deletions
diff --git a/src/floatfns.c b/src/floatfns.c index 90a2186d3f6..8f0515a84b5 100644 --- a/src/floatfns.c +++ b/src/floatfns.c @@ -635,7 +635,11 @@ This is the same as the exponent of a float.") int value; double f = extract_float (arg); -#ifdef USG +#ifdef HAVE_LOGB + IN_FLOAT (value = logb (f), "logb", arg); + XSET (val, Lisp_Int, value); +#else +#ifdef HAVE_FREXP { int exp; @@ -643,8 +647,8 @@ This is the same as the exponent of a float.") XSET (val, Lisp_Int, exp-1); } #else - IN_FLOAT (value = logb (f), "logb", arg); - XSET (val, Lisp_Int, value); + Well, what *do* you have? +#endif #endif return val; |