diff options
-rw-r--r-- | ChangeLog | 5 | ||||
-rw-r--r-- | sysdeps/libm-ieee754/s_truncl.c | 4 |
2 files changed, 7 insertions, 2 deletions
@@ -1,3 +1,8 @@ +1999-06-10 Jakub Jelinek <jj@ultra.linux.cz> + + * sysdeps/libm-ieee754/s_truncl.c: Subtract exponent + bias from the raw exponent. + 1999-06-11 Ulrich Drepper <drepper@cygnus.com> * inet/arpa/tftp.h: Move attribute declaration in right position. diff --git a/sysdeps/libm-ieee754/s_truncl.c b/sysdeps/libm-ieee754/s_truncl.c index 206eab2f22..59c3b9c173 100644 --- a/sysdeps/libm-ieee754/s_truncl.c +++ b/sysdeps/libm-ieee754/s_truncl.c @@ -1,5 +1,5 @@ /* Truncate argument to nearest integral value not larger than the argument. - Copyright (C) 1997 Free Software Foundation, Inc. + Copyright (C) 1997, 1999 Free Software Foundation, Inc. This file is part of the GNU C Library. Contributed by Ulrich Drepper <drepper@cygnus.com>, 1997. @@ -32,7 +32,7 @@ __truncl (long double x) GET_LDOUBLE_WORDS (se, i0, i1, x); sx = se & 0x8000; - j0 = se & 0x7fff; + j0 = (se & 0x7fff) - 0x3fff; if (j0 < 31) { if (j0 < 0) |