diff options
Diffstat (limited to 'sysdeps/libm-ieee754')
| -rw-r--r-- | sysdeps/libm-ieee754/e_acoshl.c | 8 | ||||
| -rw-r--r-- | sysdeps/libm-ieee754/s_cbrtl.c | 1 |
2 files changed, 4 insertions, 5 deletions
diff --git a/sysdeps/libm-ieee754/e_acoshl.c b/sysdeps/libm-ieee754/e_acoshl.c index 8af7c27aa7..7b7bea7054 100644 --- a/sysdeps/libm-ieee754/e_acoshl.c +++ b/sysdeps/libm-ieee754/e_acoshl.c @@ -52,17 +52,17 @@ ln2 = 6.931471805599453094287e-01L; /* 0x3FFE, 0xB17217F7, 0xD1CF79AC */ { long double t; u_int32_t se,i0,i1; - EXTRACT_LDOUBLE_WORDS(se,i0,i1,x); + GET_LDOUBLE_WORDS(se,i0,i1,x); if(se<0x3fff) { /* x < 1 */ return (x-x)/(x-x); - } else if(hx >=0x401b) { /* x > 2**28 */ - if(hx >=0x7fff) { /* x is inf of NaN */ + } else if(se >=0x401b) { /* x > 2**28 */ + if(se >=0x7fff) { /* x is inf of NaN */ return x+x; } else return __ieee754_logl(x)+ln2; /* acoshl(huge)=logl(2x) */ } else if(((se-0x3fff)|i0|i1)==0) { return 0.0; /* acosh(1) = 0 */ - } else if (hx > 0x4000) { /* 2**28 > x > 2 */ + } else if (se > 0x4000) { /* 2**28 > x > 2 */ t=x*x; return __ieee754_logl(2.0*x-one/(x+__ieee754_sqrtl(t-one))); } else { /* 1<x<2 */ diff --git a/sysdeps/libm-ieee754/s_cbrtl.c b/sysdeps/libm-ieee754/s_cbrtl.c index 03ebfe7eb8..9f45faa00c 100644 --- a/sysdeps/libm-ieee754/s_cbrtl.c +++ b/sysdeps/libm-ieee754/s_cbrtl.c @@ -53,7 +53,6 @@ G = 3.57142857142857150787e-01L; /* 5/14 */ long double x; #endif { - int32_t hx; long double r,s,t=0.0,w; u_int32_t sign, se, x0, x1; |