* libm/math/ef_hypot.c: Increase scale factor to 68.

This commit is contained in:
Richard Sandiford 2002-03-22 11:25:15 +00:00
parent 2f3126f6ec
commit a485d93f10
2 changed files with 10 additions and 6 deletions

View File

@ -1,3 +1,7 @@
2002-03-22 Richard Sandiford <rsandifo@redhat.com>
* libm/math/ef_hypot.c: Increase scale factor to 68.
2002-03-13 Alexandre Oliva <aoliva@redhat.com>
* libc/machine/mips/strlen.c (strlen) [__mips16]: Fix off-by-two

View File

@ -41,8 +41,8 @@
if(FLT_UWORD_IS_INFINITE(hb)) w = b;
return w;
}
/* scale a and b by 2**-60 */
ha -= 0x5d800000L; hb -= 0x5d800000L; k += 60;
/* scale a and b by 2**-68 */
ha -= 0x22000000L; hb -= 0x22000000L; k += 68;
SET_FLOAT_WORD(a,ha);
SET_FLOAT_WORD(b,hb);
}
@ -54,10 +54,10 @@
b *= t1;
a *= t1;
k -= 126;
} else { /* scale a and b by 2^60 */
ha += 0x5d800000; /* a *= 2^60 */
hb += 0x5d800000; /* b *= 2^60 */
k -= 60;
} else { /* scale a and b by 2^68 */
ha += 0x22000000; /* a *= 2^68 */
hb += 0x22000000; /* b *= 2^68 */
k -= 68;
SET_FLOAT_WORD(a,ha);
SET_FLOAT_WORD(b,hb);
}