aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--ChangeLog5
-rw-r--r--sysdeps/libm-ieee754/s_truncl.c4
2 files changed, 7 insertions, 2 deletions
diff --git a/ChangeLog b/ChangeLog
index 64935409da..ce50cdd84b 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -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)