about summary refs log tree commit diff
diff options
context:
space:
mode:
authorUlrich Drepper <drepper@redhat.com>1999-06-11 21:30:13 +0000
committerUlrich Drepper <drepper@redhat.com>1999-06-11 21:30:13 +0000
commit58d33bb594d64a7f48b84c19fb79f4cea0de91cb (patch)
tree54bf76eb303a29481bdbfc9632e0ae26e0d695f5
parent63ad72d21b23bd04996e9ae06387dfd60350fbed (diff)
downloadglibc-58d33bb594d64a7f48b84c19fb79f4cea0de91cb.tar.gz
glibc-58d33bb594d64a7f48b84c19fb79f4cea0de91cb.tar.xz
glibc-58d33bb594d64a7f48b84c19fb79f4cea0de91cb.zip
Update.
1999-06-10  Jakub Jelinek   <jj@ultra.linux.cz>

	* sysdeps/libm-ieee754/s_truncl.c: Subtract exponent
	bias from the raw exponent.
-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)