diff options
Diffstat (limited to 'src/floatfns.c')
| -rw-r--r-- | src/floatfns.c | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/src/floatfns.c b/src/floatfns.c index 2471731c6d8..33186eaf377 100644 --- a/src/floatfns.c +++ b/src/floatfns.c | |||
| @@ -684,8 +684,9 @@ This is the same as the exponent of a float.") | |||
| 684 | IN_FLOAT (value = logb (f), "logb", arg); | 684 | IN_FLOAT (value = logb (f), "logb", arg); |
| 685 | #else | 685 | #else |
| 686 | #ifdef HAVE_FREXP | 686 | #ifdef HAVE_FREXP |
| 687 | IN_FLOAT (frexp (f, &value), "logb", arg); | 687 | int ivalue; |
| 688 | value--; | 688 | IN_FLOAT (frexp (f, &ivalue), "logb", arg); |
| 689 | value = ivalue - 1; | ||
| 689 | #else | 690 | #else |
| 690 | int i; | 691 | int i; |
| 691 | double d; | 692 | double d; |