* sysdeps/ieee754/flt-32/e_hypotf.c (__ieee754_hypotf): Remove the

exponent bias from the increment value for scaling by 2^60.
This commit is contained in:
Ulrich Drepper 2005-09-06 05:38:04 +00:00
parent bf017034fb
commit 643377d674
2 changed files with 8 additions and 3 deletions

View File

@ -1,3 +1,8 @@
2005-08-31 Bob Wilson <bob.wilson@acm.org>
* sysdeps/ieee754/flt-32/e_hypotf.c (__ieee754_hypotf): Remove the
exponent bias from the increment value for scaling by 2^60.
2005-09-05 Alexandre Oliva <aoliva@redhat.com> 2005-09-05 Alexandre Oliva <aoliva@redhat.com>
* configure.in: Compile source test file with -fPIC for -shared. * configure.in: Compile source test file with -fPIC for -shared.

View File

@ -47,7 +47,7 @@ static char rcsid[] = "$NetBSD: e_hypotf.c,v 1.5 1995/05/12 04:57:30 jtc Exp $";
return w; return w;
} }
/* scale a and b by 2**-60 */ /* scale a and b by 2**-60 */
ha -= 0x5d800000; hb -= 0x5d800000; k += 60; ha -= 0x1e000000; hb -= 0x1e000000; k += 60;
SET_FLOAT_WORD(a,ha); SET_FLOAT_WORD(a,ha);
SET_FLOAT_WORD(b,hb); SET_FLOAT_WORD(b,hb);
} }
@ -59,8 +59,8 @@ static char rcsid[] = "$NetBSD: e_hypotf.c,v 1.5 1995/05/12 04:57:30 jtc Exp $";
a *= t1; a *= t1;
k -= 126; k -= 126;
} else { /* scale a and b by 2^60 */ } else { /* scale a and b by 2^60 */
ha += 0x5d800000; /* a *= 2^60 */ ha += 0x1e000000; /* a *= 2^60 */
hb += 0x5d800000; /* b *= 2^60 */ hb += 0x1e000000; /* b *= 2^60 */
k -= 60; k -= 60;
SET_FLOAT_WORD(a,ha); SET_FLOAT_WORD(a,ha);
SET_FLOAT_WORD(b,hb); SET_FLOAT_WORD(b,hb);