diff options
Diffstat (limited to 'libc/sysdeps/ieee754/ldbl-128ibm')
-rw-r--r-- | libc/sysdeps/ieee754/ldbl-128ibm/e_atanhl.c | 2 | ||||
-rw-r--r-- | libc/sysdeps/ieee754/ldbl-128ibm/e_powl.c | 14 | ||||
-rw-r--r-- | libc/sysdeps/ieee754/ldbl-128ibm/e_rem_pio2l.c | 3 | ||||
-rw-r--r-- | libc/sysdeps/ieee754/ldbl-128ibm/s_isnanl.c | 3 | ||||
-rw-r--r-- | libc/sysdeps/ieee754/ldbl-128ibm/s_logbl.c | 3 | ||||
-rw-r--r-- | libc/sysdeps/ieee754/ldbl-128ibm/s_nextafterl.c | 3 | ||||
-rw-r--r-- | libc/sysdeps/ieee754/ldbl-128ibm/x2y2m1l.c | 1 |
7 files changed, 17 insertions, 12 deletions
diff --git a/libc/sysdeps/ieee754/ldbl-128ibm/e_atanhl.c b/libc/sysdeps/ieee754/ldbl-128ibm/e_atanhl.c index 075855b5f..f35182f03 100644 --- a/libc/sysdeps/ieee754/ldbl-128ibm/e_atanhl.c +++ b/libc/sysdeps/ieee754/ldbl-128ibm/e_atanhl.c @@ -40,7 +40,7 @@ __ieee754_atanhl(long double x) { long double t; int64_t hx,ix; - u_int64_t lx; + u_int64_t lx __attribute__ ((unused)); GET_LDOUBLE_WORDS64(hx,lx,x); ix = hx&0x7fffffffffffffffLL; if (ix >= 0x3ff0000000000000LL) { /* |x|>=1 */ diff --git a/libc/sysdeps/ieee754/ldbl-128ibm/e_powl.c b/libc/sysdeps/ieee754/ldbl-128ibm/e_powl.c index 8216c4906..8bd35d0c8 100644 --- a/libc/sysdeps/ieee754/ldbl-128ibm/e_powl.c +++ b/libc/sysdeps/ieee754/ldbl-128ibm/e_powl.c @@ -324,13 +324,13 @@ __ieee754_powl (long double x, long double y) o.value = s_h; o.parts32.w3 = 0; - o.parts32.w2 &= 0xffff8000; + o.parts32.w2 = 0; s_h = o.value; /* t_h=ax+bp[k] High */ t_h = ax + bp[k]; o.value = t_h; o.parts32.w3 = 0; - o.parts32.w2 &= 0xffff8000; + o.parts32.w2 = 0; t_h = o.value; t_l = ax - (t_h - bp[k]); s_l = v * ((u - s_h * t_h) - s_h * t_l); @@ -344,7 +344,7 @@ __ieee754_powl (long double x, long double y) t_h = 3.0 + s2 + r; o.value = t_h; o.parts32.w3 = 0; - o.parts32.w2 &= 0xffff8000; + o.parts32.w2 = 0; t_h = o.value; t_l = r - ((t_h - 3.0) - s2); /* u+v = s*(1+...) */ @@ -354,7 +354,7 @@ __ieee754_powl (long double x, long double y) p_h = u + v; o.value = p_h; o.parts32.w3 = 0; - o.parts32.w2 &= 0xffff8000; + o.parts32.w2 = 0; p_h = o.value; p_l = v - (p_h - u); z_h = cp_h * p_h; /* cp_h+cp_l = 2/(3*log2) */ @@ -364,7 +364,7 @@ __ieee754_powl (long double x, long double y) t1 = (((z_h + z_l) + dp_h[k]) + t); o.value = t1; o.parts32.w3 = 0; - o.parts32.w2 &= 0xffff8000; + o.parts32.w2 = 0; t1 = o.value; t2 = z_l - (((t1 - t) - dp_h[k]) - z_h); @@ -377,7 +377,7 @@ __ieee754_powl (long double x, long double y) y1 = y; o.value = y1; o.parts32.w3 = 0; - o.parts32.w2 &= 0xffff8000; + o.parts32.w2 = 0; y1 = o.value; p_l = (y - y1) * t1 + y * t2; p_h = y1 * t1; @@ -421,7 +421,7 @@ __ieee754_powl (long double x, long double y) t = p_l + p_h; o.value = t; o.parts32.w3 = 0; - o.parts32.w2 &= 0xffff8000; + o.parts32.w2 = 0; t = o.value; u = t * lg2_h; v = (p_l - (t - p_h)) * lg2 + t * lg2_l; diff --git a/libc/sysdeps/ieee754/ldbl-128ibm/e_rem_pio2l.c b/libc/sysdeps/ieee754/ldbl-128ibm/e_rem_pio2l.c index 5352de945..a3d141de3 100644 --- a/libc/sysdeps/ieee754/ldbl-128ibm/e_rem_pio2l.c +++ b/libc/sysdeps/ieee754/ldbl-128ibm/e_rem_pio2l.c @@ -200,7 +200,8 @@ int32_t __ieee754_rem_pio2l(long double x, long double *y) double tx[8]; int exp; int64_t n, ix, hx, ixd; - u_int64_t lx, lxd; + u_int64_t lx __attribute__ ((unused)); + u_int64_t lxd; GET_LDOUBLE_WORDS64 (hx, lx, x); ix = hx & 0x7fffffffffffffffLL; diff --git a/libc/sysdeps/ieee754/ldbl-128ibm/s_isnanl.c b/libc/sysdeps/ieee754/ldbl-128ibm/s_isnanl.c index d448d604a..aa4eb7132 100644 --- a/libc/sysdeps/ieee754/ldbl-128ibm/s_isnanl.c +++ b/libc/sysdeps/ieee754/ldbl-128ibm/s_isnanl.c @@ -29,7 +29,8 @@ static char rcsid[] = "$NetBSD: $"; int ___isnanl (long double x) { - int64_t hx,lx; + int64_t hx; + int64_t lx __attribute__ ((unused)); GET_LDOUBLE_WORDS64(hx,lx,x); hx &= 0x7fffffffffffffffLL; hx = 0x7ff0000000000000LL - hx; diff --git a/libc/sysdeps/ieee754/ldbl-128ibm/s_logbl.c b/libc/sysdeps/ieee754/ldbl-128ibm/s_logbl.c index 92ce2c189..6cbfcfa1c 100644 --- a/libc/sysdeps/ieee754/ldbl-128ibm/s_logbl.c +++ b/libc/sysdeps/ieee754/ldbl-128ibm/s_logbl.c @@ -26,7 +26,8 @@ long double __logbl (long double x) { - int64_t lx, hx, rhx; + int64_t hx, rhx; + int64_t lx __attribute__ ((unused)); GET_LDOUBLE_WORDS64 (hx, lx, x); hx &= 0x7fffffffffffffffLL; /* high |x| */ diff --git a/libc/sysdeps/ieee754/ldbl-128ibm/s_nextafterl.c b/libc/sysdeps/ieee754/ldbl-128ibm/s_nextafterl.c index 994e287c9..ff5d7d32b 100644 --- a/libc/sysdeps/ieee754/ldbl-128ibm/s_nextafterl.c +++ b/libc/sysdeps/ieee754/ldbl-128ibm/s_nextafterl.c @@ -31,7 +31,8 @@ static char rcsid[] = "$NetBSD: $"; long double __nextafterl(long double x, long double y) { int64_t hx,hy,ihx,ihy,ilx; - u_int64_t lx,ly; + u_int64_t lx; + u_int64_t ly __attribute__ ((unused)); GET_LDOUBLE_WORDS64(hx,lx,x); GET_LDOUBLE_WORDS64(hy,ly,y); diff --git a/libc/sysdeps/ieee754/ldbl-128ibm/x2y2m1l.c b/libc/sysdeps/ieee754/ldbl-128ibm/x2y2m1l.c index 4379b68c3..9631b07a5 100644 --- a/libc/sysdeps/ieee754/ldbl-128ibm/x2y2m1l.c +++ b/libc/sysdeps/ieee754/ldbl-128ibm/x2y2m1l.c @@ -19,6 +19,7 @@ #include <math.h> #include <math_private.h> #include <float.h> +#include <stdlib.h> /* Calculate X + Y exactly and store the result in *HI + *LO. It is given that |X| >= |Y| and the values are small enough that no |