Fix build warnings, but get it right.

This commit is contained in:
slamm%netscape.com 1999-09-18 00:09:24 +00:00
parent c8c9b89f0d
commit 8e12b7890c

View File

@ -128,8 +128,10 @@ static double zero = 0.0;
k += (i>>20);
f = x-1.0;
if((0x000fffff&(2+hx))<3) { /* |f| < 2**-20 */
if(f==zero) { if(k==0) return zero; } else {dk=(double)k;
return dk*ln2_hi+dk*ln2_lo;}
if(f==zero) {
if(k==0) return zero; else {dk=(double)k;
return dk*ln2_hi+dk*ln2_lo;}
}
R = f*f*(0.5-0.33333333333333333*f);
if(k==0) return f-R; else {dk=(double)k;
return dk*ln2_hi-((R-dk*ln2_lo)-f);}