diff options
Diffstat (limited to 'sysdeps')
-rw-r--r-- | sysdeps/ieee754/dbl-64/branred.c | 6 | ||||
-rw-r--r-- | sysdeps/ieee754/dbl-64/dosincos.c | 6 | ||||
-rw-r--r-- | sysdeps/ieee754/dbl-64/e_asin.c | 9 | ||||
-rw-r--r-- | sysdeps/ieee754/dbl-64/e_atan2.c | 9 | ||||
-rw-r--r-- | sysdeps/ieee754/dbl-64/e_exp.c | 6 | ||||
-rw-r--r-- | sysdeps/ieee754/dbl-64/e_log.c | 3 | ||||
-rw-r--r-- | sysdeps/ieee754/dbl-64/e_pow.c | 18 | ||||
-rw-r--r-- | sysdeps/ieee754/dbl-64/e_remainder.c | 6 | ||||
-rw-r--r-- | sysdeps/ieee754/dbl-64/s_atan.c | 9 | ||||
-rw-r--r-- | sysdeps/ieee754/dbl-64/s_sin.c | 10 | ||||
-rw-r--r-- | sysdeps/ieee754/dbl-64/s_tan.c | 3 |
11 files changed, 0 insertions, 85 deletions
diff --git a/sysdeps/ieee754/dbl-64/branred.c b/sysdeps/ieee754/dbl-64/branred.c index ecceeca634..524d091dc3 100644 --- a/sysdeps/ieee754/dbl-64/branred.c +++ b/sysdeps/ieee754/dbl-64/branred.c @@ -53,13 +53,7 @@ SECTION __branred(double x, double *a, double *aa) { int i,k; -#if 0 - int n; -#endif mynumber u,gor; -#if 0 - mynumber v; -#endif double r[6],s,t,sum,b,bb,sum1,sum2,b1,bb1,b2,bb2,x1,x2,t1,t2; x*=tm600.x; diff --git a/sysdeps/ieee754/dbl-64/dosincos.c b/sysdeps/ieee754/dbl-64/dosincos.c index bbef186ad1..00726285a9 100644 --- a/sysdeps/ieee754/dbl-64/dosincos.c +++ b/sysdeps/ieee754/dbl-64/dosincos.c @@ -63,9 +63,6 @@ __dubsin(double x, double dx, double v[]) { #ifndef DLA_FMS double p,hx,tx,hy,ty,q; #endif -#if 0 - double xx,y,yy,z,zz; -#endif mynumber u; int4 k; @@ -119,9 +116,6 @@ __dubcos(double x, double dx, double v[]) { #ifndef DLA_FMS double p,hx,tx,hy,ty,q; #endif -#if 0 - double xx,y,yy,z,zz; -#endif mynumber u; int4 k; u.x=x+big.x; diff --git a/sysdeps/ieee754/dbl-64/e_asin.c b/sysdeps/ieee754/dbl-64/e_asin.c index 5585ad1d0d..27cd2a10d3 100644 --- a/sysdeps/ieee754/dbl-64/e_asin.c +++ b/sysdeps/ieee754/dbl-64/e_asin.c @@ -62,9 +62,6 @@ __ieee754_asin(double x){ double x1,x2,xx,s1,s2,res1,p,t,res,r,cor,cc,y,c,z,w[2]; mynumber u,v; int4 k,m,n; -#if 0 - int4 nn; -#endif u.x = x; m = u.i[HIGH_HALF]; @@ -344,14 +341,8 @@ SECTION __ieee754_acos(double x) { double x1,x2,xx,s1,s2,res1,p,t,res,r,cor,cc,y,c,z,w[2],eps; -#if 0 - double fc; -#endif mynumber u,v; int4 k,m,n; -#if 0 - int4 nn; -#endif u.x = x; m = u.i[HIGH_HALF]; k = 0x7fffffff&m; diff --git a/sysdeps/ieee754/dbl-64/e_atan2.c b/sysdeps/ieee754/dbl-64/e_atan2.c index ee3215ed3f..535010e3d8 100644 --- a/sysdeps/ieee754/dbl-64/e_atan2.c +++ b/sysdeps/ieee754/dbl-64/e_atan2.c @@ -67,22 +67,13 @@ SECTION __ieee754_atan2(double y,double x) { int i,de,ux,dx,uy,dy; -#if 0 - int p; -#endif static const int pr[MM]={6,8,10,20,32}; double ax,ay,u,du,u9,ua,v,vv,dv,t1,t2,t3,t7,t8, z,zz,cor,s1,ss1,s2,ss2; #ifndef DLA_FMS double t4,t5,t6; #endif -#if 0 - double z1,z2; -#endif number num; -#if 0 - mp_no mperr,mpt1,mpx,mpy,mpz,mpz1,mpz2; -#endif static const int ep= 59768832, /* 57*16**5 */ em=-59768832; /* -57*16**5 */ diff --git a/sysdeps/ieee754/dbl-64/e_exp.c b/sysdeps/ieee754/dbl-64/e_exp.c index 0f9d87ba59..07cc4a91b6 100644 --- a/sysdeps/ieee754/dbl-64/e_exp.c +++ b/sysdeps/ieee754/dbl-64/e_exp.c @@ -55,9 +55,6 @@ SECTION __ieee754_exp(double x) { double bexp, t, eps, del, base, y, al, bet, res, rem, cor; mynumber junk1, junk2, binexp = {{0,0}}; -#if 0 - int4 k; -#endif int4 i,j,m,n,ex; double retval; @@ -174,9 +171,6 @@ SECTION __exp1(double x, double xx, double error) { double bexp, t, eps, del, base, y, al, bet, res, rem, cor; mynumber junk1, junk2, binexp = {{0,0}}; -#if 0 - int4 k; -#endif int4 i,j,m,n,ex; junk1.x = x; diff --git a/sysdeps/ieee754/dbl-64/e_log.c b/sysdeps/ieee754/dbl-64/e_log.c index 762639bcdf..58c9a8e76b 100644 --- a/sysdeps/ieee754/dbl-64/e_log.c +++ b/sysdeps/ieee754/dbl-64/e_log.c @@ -56,9 +56,6 @@ __ieee754_log(double x) { #define M 4 static const int pr[M]={8,10,18,32}; int i,j,n,ux,dx,p; -#if 0 - int k; -#endif double dbl_n,u,p0,q,r0,w,nln2a,luai,lubi,lvaj,lvbj, sij,ssij,ttij,A,B,B0,y,y1,y2,polI,polII,sa,sb, t1,t2,t7,t8,t,ra,rb,ww, diff --git a/sysdeps/ieee754/dbl-64/e_pow.c b/sysdeps/ieee754/dbl-64/e_pow.c index ee2711322f..f8962a7dce 100644 --- a/sysdeps/ieee754/dbl-64/e_pow.c +++ b/sysdeps/ieee754/dbl-64/e_pow.c @@ -64,9 +64,6 @@ double SECTION __ieee754_pow(double x, double y) { double z,a,aa,error, t,a1,a2,y1,y2; -#if 0 - double gor=1.0; -#endif mynumber u,v; int k; int4 qx,qy; @@ -206,13 +203,7 @@ static double SECTION log1(double x, double *delta, double *error) { int i,j,m; -#if 0 - int n; -#endif double uu,vv,eps,nx,e,e1,e2,t,t1,t2,res,add=0; -#if 0 - double cor; -#endif mynumber u,v; #ifdef BIG_ENDI mynumber @@ -300,13 +291,7 @@ static double SECTION my_log2(double x, double *delta, double *error) { int i,j,m; -#if 0 - int n; -#endif double uu,vv,eps,nx,e,e1,e2,t,t1,t2,res,add=0; -#if 0 - double cor; -#endif double ou1,ou2,lu1,lu2,ov,lv1,lv2,a,a1,a2; double y,yy,z,zz,j1,j2,j7,j8; #ifndef DLA_FMS @@ -397,9 +382,6 @@ SECTION checkint(double x) { union {int4 i[2]; double x;} u; int k,m,n; -#if 0 - int l; -#endif u.x = x; m = u.i[HIGH_HALF]&0x7fffffff; /* no sign */ if (m >= 0x7ff00000) return 0; /* x is +/-inf or NaN */ diff --git a/sysdeps/ieee754/dbl-64/e_remainder.c b/sysdeps/ieee754/dbl-64/e_remainder.c index ac4b55f9d4..c4db9316c7 100644 --- a/sysdeps/ieee754/dbl-64/e_remainder.c +++ b/sysdeps/ieee754/dbl-64/e_remainder.c @@ -42,13 +42,7 @@ double __ieee754_remainder(double x, double y) { double z,d,xx; -#if 0 - double yy; -#endif int4 kx,ky,n,nn,n1,m1,l; -#if 0 - int4 m; -#endif mynumber u,t,w={{0,0}},v={{0,0}},ww={{0,0}},r; u.x=x; t.x=y; diff --git a/sysdeps/ieee754/dbl-64/s_atan.c b/sysdeps/ieee754/dbl-64/s_atan.c index 37442b72e8..aa3564d560 100644 --- a/sysdeps/ieee754/dbl-64/s_atan.c +++ b/sysdeps/ieee754/dbl-64/s_atan.c @@ -62,18 +62,9 @@ double atan(double x) { #ifndef DLA_FMS double t4,t5,t6; #endif -#if 0 - double y1,y2; -#endif int i,ux,dx; -#if 0 - int p; -#endif static const int pr[M]={6,8,10,32}; number num; -#if 0 - mp_no mpt1,mpx,mpy,mpy1,mpy2,mperr; -#endif num.d = x; ux = num.i[HIGH_HALF]; dx = num.i[LOW_HALF]; diff --git a/sysdeps/ieee754/dbl-64/s_sin.c b/sysdeps/ieee754/dbl-64/s_sin.c index 496f1e1917..5038b72612 100644 --- a/sysdeps/ieee754/dbl-64/s_sin.c +++ b/sysdeps/ieee754/dbl-64/s_sin.c @@ -100,14 +100,8 @@ double SECTION __sin(double x){ double xx,res,t,cor,y,s,c,sn,ssn,cs,ccs,xn,a,da,db,eps,xn1,xn2; -#if 0 - double w[2]; -#endif mynumber u,v; int4 k,m,n; -#if 0 - int4 nn; -#endif double retval = 0; SET_RESTORE_ROUND_53BIT (FE_TONEAREST); @@ -902,10 +896,6 @@ SECTION bsloww(double x,double dx, double orig,int n) { static const double th2_36 = 206158430208.0; /* 1.5*2**37 */ double y,x1,x2,xx,r,t,res,cor,w[2]; -#if 0 - double a,da,xn; - union {int4 i[2]; double x;} v; -#endif x1=(x+th2_36)-th2_36; y = aa.x*x1*x1*x1; r=x+y; diff --git a/sysdeps/ieee754/dbl-64/s_tan.c b/sysdeps/ieee754/dbl-64/s_tan.c index c5446a6e56..faa5221e5e 100644 --- a/sysdeps/ieee754/dbl-64/s_tan.c +++ b/sysdeps/ieee754/dbl-64/s_tan.c @@ -64,9 +64,6 @@ tan(double x) { int p; number num,v; mp_no mpa,mpt1,mpt2; -#if 0 - mp_no mpy; -#endif double retval; |