diff options
Diffstat (limited to 'sysdeps/libm-ieee754')
-rw-r--r-- | sysdeps/libm-ieee754/e_pow.c | 2 | ||||
-rw-r--r-- | sysdeps/libm-ieee754/s_expm1.c | 1 | ||||
-rw-r--r-- | sysdeps/libm-ieee754/s_signgam.c | 3 | ||||
-rw-r--r-- | sysdeps/libm-ieee754/w_gamma.c | 4 | ||||
-rw-r--r-- | sysdeps/libm-ieee754/w_gammaf.c | 4 | ||||
-rw-r--r-- | sysdeps/libm-ieee754/w_gammal.c | 4 | ||||
-rw-r--r-- | sysdeps/libm-ieee754/w_lgamma.c | 10 | ||||
-rw-r--r-- | sysdeps/libm-ieee754/w_lgammaf.c | 10 | ||||
-rw-r--r-- | sysdeps/libm-ieee754/w_lgammal.c | 10 |
9 files changed, 23 insertions, 25 deletions
diff --git a/sysdeps/libm-ieee754/e_pow.c b/sysdeps/libm-ieee754/e_pow.c index 02b16c5171..1e1496f00d 100644 --- a/sysdeps/libm-ieee754/e_pow.c +++ b/sysdeps/libm-ieee754/e_pow.c @@ -266,7 +266,7 @@ C[] = { r2 = C[8]+s2*C[9]; s24=s22*s22; r3 = C[6]+s2*C[7]; s26=s24*s22; r = r3*s22 + r2*s24 + r1*s26; -#endfi +#endif r += s_l*(s_h+s); s2 = s_h*s_h; t_h = 3.0+s2+r; diff --git a/sysdeps/libm-ieee754/s_expm1.c b/sysdeps/libm-ieee754/s_expm1.c index ed1aba527b..df6b1e4df0 100644 --- a/sysdeps/libm-ieee754/s_expm1.c +++ b/sysdeps/libm-ieee754/s_expm1.c @@ -120,7 +120,6 @@ static const double #else static double #endif -one = 1.0, huge = 1.0e+300, tiny = 1.0e-300, o_threshold = 7.09782712893383973096e+02,/* 0x40862E42, 0xFEFA39EF */ diff --git a/sysdeps/libm-ieee754/s_signgam.c b/sysdeps/libm-ieee754/s_signgam.c index 2ab5924a2a..021b0ffca1 100644 --- a/sysdeps/libm-ieee754/s_signgam.c +++ b/sysdeps/libm-ieee754/s_signgam.c @@ -1,4 +1,3 @@ #include "math.h" #include "math_private.h" -int __signgam = 0; -weak_alias (__signgam, signgam) +int signgam; diff --git a/sysdeps/libm-ieee754/w_gamma.c b/sysdeps/libm-ieee754/w_gamma.c index 7629503744..02a3d47669 100644 --- a/sysdeps/libm-ieee754/w_gamma.c +++ b/sysdeps/libm-ieee754/w_gamma.c @@ -22,8 +22,6 @@ static char rcsid[] = "$NetBSD: w_gamma.c,v 1.7 1995/11/20 22:06:43 jtc Exp $"; #include "math.h" #include "math_private.h" -extern int __signgam; - #ifdef __STDC__ double __gamma(double x) #else @@ -34,7 +32,7 @@ extern int __signgam; double y; #ifndef _IEEE_LIBM if (_LIB_VERSION == _SVID_) - y = __ieee754_lgamma_r(x,&__signgam); + y = __ieee754_lgamma_r(x,&signgam); else { #endif diff --git a/sysdeps/libm-ieee754/w_gammaf.c b/sysdeps/libm-ieee754/w_gammaf.c index fc28a975da..7d78a52908 100644 --- a/sysdeps/libm-ieee754/w_gammaf.c +++ b/sysdeps/libm-ieee754/w_gammaf.c @@ -20,8 +20,6 @@ static char rcsid[] = "$NetBSD: w_gammaf.c,v 1.4 1995/11/20 22:06:48 jtc Exp $"; #include "math.h" #include "math_private.h" -extern int __signgam; - #ifdef __STDC__ float __gammaf(float x) #else @@ -32,7 +30,7 @@ extern int __signgam; float y; #ifndef _IEEE_LIBM if (_LIB_VERSION == _SVID_) - y = __ieee754_lgammaf_r(x,&__signgam); + y = __ieee754_lgammaf_r(x,&signgam); else { #endif diff --git a/sysdeps/libm-ieee754/w_gammal.c b/sysdeps/libm-ieee754/w_gammal.c index 88c681b40b..1b4ae2cc7b 100644 --- a/sysdeps/libm-ieee754/w_gammal.c +++ b/sysdeps/libm-ieee754/w_gammal.c @@ -25,8 +25,6 @@ static char rcsid[] = "$NetBSD: $"; #include "math.h" #include "math_private.h" -extern int __signgam; - #ifdef __STDC__ long double __gammal(long double x) #else @@ -37,7 +35,7 @@ extern int __signgam; long double y; #ifndef _IEEE_LIBM if (_LIB_VERSION == _SVID_) - y = __ieee754_lgammal_r(x,&__signgam); + y = __ieee754_lgammal_r(x,&signgam); else { #endif diff --git a/sysdeps/libm-ieee754/w_lgamma.c b/sysdeps/libm-ieee754/w_lgamma.c index fbb933f9fc..bbb53f53e8 100644 --- a/sysdeps/libm-ieee754/w_lgamma.c +++ b/sysdeps/libm-ieee754/w_lgamma.c @@ -23,8 +23,6 @@ static char rcsid[] = "$NetBSD: w_lgamma.c,v 1.6 1995/05/10 20:49:24 jtc Exp $"; #include "math.h" #include "math_private.h" -extern int __signgam; - #ifdef __STDC__ double __lgamma(double x) #else @@ -33,10 +31,14 @@ extern int __signgam; #endif { #ifdef _IEEE_LIBM - return __ieee754_lgamma_r(x,&__signgam); + return __ieee754_lgamma_r(x,&signgam); #else double y; - y = __ieee754_lgamma_r(x,&__signgam); + int local_signgam; + y = __ieee754_lgamma_r(x,&local_signgam); + if (_LIB_VERSION != _ISOC_) + /* ISO C 9x does not define the global variable. */ + signgam = local_signgam; if(_LIB_VERSION == _IEEE_) return y; if(!__finite(y)&&__finite(x)) { if(__floor(x)==x&&x<=0.0) diff --git a/sysdeps/libm-ieee754/w_lgammaf.c b/sysdeps/libm-ieee754/w_lgammaf.c index e05660284f..369dee6749 100644 --- a/sysdeps/libm-ieee754/w_lgammaf.c +++ b/sysdeps/libm-ieee754/w_lgammaf.c @@ -20,8 +20,6 @@ static char rcsid[] = "$NetBSD: w_lgammaf.c,v 1.3 1995/05/10 20:49:30 jtc Exp $" #include "math.h" #include "math_private.h" -extern int __signgam; - #ifdef __STDC__ float __lgammaf(float x) #else @@ -30,10 +28,14 @@ extern int __signgam; #endif { #ifdef _IEEE_LIBM - return __ieee754_lgammaf_r(x,&__signgam); + return __ieee754_lgammaf_r(x,&signgam); #else float y; - y = __ieee754_lgammaf_r(x,&__signgam); + int local_signgam; + y = __ieee754_lgammaf_r(x,&local_signgam); + if (_LIB_VERSION != _ISOC_) + /* ISO C 9x does not define the global variable. */ + signgam = local_signgam; if(_LIB_VERSION == _IEEE_) return y; if(!__finitef(y)&&__finitef(x)) { if(__floorf(x)==x&&x<=(float)0.0) diff --git a/sysdeps/libm-ieee754/w_lgammal.c b/sysdeps/libm-ieee754/w_lgammal.c index aab8417e31..9db2ce2693 100644 --- a/sysdeps/libm-ieee754/w_lgammal.c +++ b/sysdeps/libm-ieee754/w_lgammal.c @@ -27,8 +27,6 @@ static char rcsid[] = "$NetBSD: $"; #include "math.h" #include "math_private.h" -extern int __signgam; - #ifdef __STDC__ long double __lgammal(long double x) #else @@ -37,10 +35,14 @@ extern int __signgam; #endif { #ifdef _IEEE_LIBM - return __ieee754_lgammal_r(x,&__signgam); + return __ieee754_lgammal_r(x,&signgam); #else long double y; - y = __ieee754_lgammal_r(x,&__signgam); + int local_signgam; + y = __ieee754_lgammal_r(x,&local_signgam); + if (_LIB_VERSION != _ISOC_) + /* ISO C 9x does not define the global variable. */ + signgam = local_signgam; if(_LIB_VERSION == _IEEE_) return y; if(!__finitel(y)&&__finitel(x)) { if(__floorl(x)==x&&x<=0.0) |