diff options
Diffstat (limited to 'src/math/scalbnl.c')
| -rw-r--r-- | src/math/scalbnl.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/math/scalbnl.c b/src/math/scalbnl.c index c605b8da..7ad7688b 100644 --- a/src/math/scalbnl.c +++ b/src/math/scalbnl.c @@ -17,7 +17,7 @@ long double scalbnl(long double x, int n) x *= 0x1p16383L; n -= 16383; if (n > 16383) - return x * 0x1p16383L; + n = 16383; } } else if (n < -16382) { x *= 0x1p-16382L; @@ -26,7 +26,7 @@ long double scalbnl(long double x, int n) x *= 0x1p-16382L; n += 16382; if (n < -16382) - return x * 0x1p-16382L; + n = -16382; } } scale.e = 1.0; |