The high part of the mantissa is 64 bits on sparc64.

This commit is contained in:
David Schultz 2008-07-31 20:09:47 +00:00
parent 16608a810d
commit 71da0e146b
Notes: svn2git 2020-12-20 02:59:44 +00:00
svn path=/head/; revision=181063
2 changed files with 2 additions and 2 deletions

View File

@ -132,7 +132,7 @@ fmodl(long double x, long double y)
/* convert back to floating value and restore the sign */
if((hx|lx)==0) /* return sign(x)*0 */
return Zero[sx];
while(hx<(1U<<HFRAC_BITS)) { /* normalize x */
while(hx<(1ULL<<HFRAC_BITS)) { /* normalize x */
hx = hx+hx+(lx>>MANL_SHIFT); lx = lx+lx;
iy -= 1;
}

View File

@ -141,7 +141,7 @@ remquol(long double x, long double y, int *quo)
*quo = (sxy ? -q : q);
return Zero[sx];
}
while(hx<(1U<<HFRAC_BITS)) { /* normalize x */
while(hx<(1ULL<<HFRAC_BITS)) { /* normalize x */
hx = hx+hx+(lx>>MANL_SHIFT); lx = lx+lx;
iy -= 1;
}