OpenE2K
/
glibc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Update. 

* sysdeps/alpha/fpu/fsetexcptflg.c: Avoid -Wparentheses warning. 
 
	* sysdeps/libm-ieee754/s_expm1.c (__expm1): Avoid -Wparentheses 
	warning. 
	* sysdeps/libm-ieee754/s_log1p.c (__log1p): Likewise. 
	* sysdeps/libm-ieee754/e_logf.c (__ieee754_logf): Likewise. 
	* sysdeps/libm-ieee754/s_expm1f.c (__expm1f): Likewise. 
	* sysdeps/libm-ieee754/e_log.c (__ieee754_log): Likewise. 
	* sysdeps/libm-ieee754/s_log1pf.c (__log1pf): Likewise. 

1998-12-13  Andreas Jaeger  <aj@arthur.rhein-neckar.de>
This commit is contained in:
Ulrich Drepper 1998-12-13 12:14:18 +00:00
parent 70b0abbaa2
commit 3bb266e010
8 changed files with 33 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
ChangeLog
View File

@ -1,3 +1,15 @@
1998-12-13 Andreas Jaeger <aj@arthur.rhein-neckar.de>
* sysdeps/alpha/fpu/fsetexcptflg.c: Avoid -Wparentheses warning.
* sysdeps/libm-ieee754/s_expm1.c (__expm1): Avoid -Wparentheses
warning.
* sysdeps/libm-ieee754/s_log1p.c (__log1p): Likewise.
* sysdeps/libm-ieee754/e_logf.c (__ieee754_logf): Likewise.
* sysdeps/libm-ieee754/s_expm1f.c (__expm1f): Likewise.
* sysdeps/libm-ieee754/e_log.c (__ieee754_log): Likewise.
* sysdeps/libm-ieee754/s_log1pf.c (__log1pf): Likewise.
1998-12-13 Andreas Jaeger <aj@arthur.rhein-neckar.de>
* sunrpc/svc_udp.c (svcudp_bufcreate): Declare len as socklen_t.

4
sysdeps/alpha/fpu/fsetexcptflg.c
View File

@ -1,5 +1,5 @@
/* Set floating-point environment exception handling.
Copyright (C) 1997 Free Software Foundation, Inc.
Copyright (C) 1997, 1998 Free Software Foundation, Inc.
This file is part of the GNU C Library.
Contributed by Richard Henderson <rth@tamu.edu>, 1997.
@ -29,7 +29,7 @@ fesetexceptflag (const fexcept_t *flagp, int excepts)
tmp = __ieee_get_fp_control();
/* Set all the bits that were called for. */
tmp = tmp & ~FE_ALL_EXCEPT | *flagp & excepts & FE_ALL_EXCEPT;
tmp = (tmp & ~FE_ALL_EXCEPT) | (*flagp & excepts & FE_ALL_EXCEPT);
/* And store it back. */
__ieee_set_fp_control(tmp);

6
sysdeps/libm-ieee754/e_log.c
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*(half-0.33333333333333333*f);
if(k==0) return f-R; else {dk=(double)k;
return dk*ln2_hi-((R-dk*ln2_lo)-f);}

6
sysdeps/libm-ieee754/e_logf.c
View File

@ -70,8 +70,10 @@ static float zero = 0.0;
k += (i>>23);
f = x-(float)1.0;
if((0x007fffff&(15+ix))<16) { /* |f| < 2**-20 */
if(f==zero) if(k==0) return zero; else {dk=(float)k;
return dk*ln2_hi+dk*ln2_lo;}
if(f==zero) {
if(k==0) return zero; else {dk=(float)k;
return dk*ln2_hi+dk*ln2_lo;}
}
R = f*f*((float)0.5-(float)0.33333333333333333*f);
if(k==0) return f-R; else {dk=(float)k;
return dk*ln2_hi-((R-dk*ln2_lo)-f);}

3
sysdeps/libm-ieee754/s_expm1.c
View File

@ -207,9 +207,10 @@ Q[] = {1.0, -3.33333333333331316428e-02, /* BFA11111 111110F4 */
e = (x*(e-c)-c);
e -= hxs;
if(k== -1) return 0.5*(x-e)-0.5;
if(k==1)
if(k==1) {
if(x < -0.25) return -2.0*(e-(x+0.5));
else return one+2.0*(x-e);
}
if (k <= -2 || k>56) { /* suffice to return exp(x)-1 */
u_int32_t high;
y = one-(e-x);

3
sysdeps/libm-ieee754/s_expm1f.c
View File

@ -103,9 +103,10 @@ Q5 = -2.0109921195e-07; /* 0xb457edbb */
e = (x*(e-c)-c);
e -= hxs;
if(k== -1) return (float)0.5*(x-e)-(float)0.5;
if(k==1)
if(k==1) {
if(x < (float)-0.25) return -(float)2.0*(e-(x+(float)0.5));
else return one+(float)2.0*(x-e);
}
if (k <= -2 || k>56) { /* suffice to return exp(x)-1 */
int32_t i;
y = one-(e-x);

4
sysdeps/libm-ieee754/s_log1p.c
View File

@ -162,8 +162,10 @@ static double zero = 0.0;
}
hfsq=0.5*f*f;
if(hu==0) { /* |f| < 2**-20 */
if(f==zero) if(k==0) return zero;
if(f==zero) {
if(k==0) return zero;
else {c += k*ln2_lo; return k*ln2_hi+c;}
}
R = hfsq*(1.0-0.66666666666666666*f);
if(k==0) return f-R; else
return k*ln2_hi-((R-(k*ln2_lo+c))-f);

6
sysdeps/libm-ieee754/s_log1pf.c
View File

@ -98,8 +98,10 @@ static float zero = 0.0;
}
hfsq=(float)0.5*f*f;
if(hu==0) { /* |f| < 2**-20 */
if(f==zero) if(k==0) return zero;
else {c += k*ln2_lo; return k*ln2_hi+c;}
if(f==zero) {
if(k==0) return zero;
else {c += k*ln2_lo; return k*ln2_hi+c;}
}
R = hfsq*((float)1.0-(float)0.66666666666666666*f);
if(k==0) return f-R; else
return k*ln2_hi-((R-(k*ln2_lo+c))-f);