aboutsummaryrefslogtreecommitdiff
path: root/sysdeps/libm-ieee754
diff options
context:
space:
mode:
Diffstat (limited to 'sysdeps/libm-ieee754')
-rw-r--r--sysdeps/libm-ieee754/e_pow.c2
-rw-r--r--sysdeps/libm-ieee754/s_expm1.c1
-rw-r--r--sysdeps/libm-ieee754/s_signgam.c3
-rw-r--r--sysdeps/libm-ieee754/w_gamma.c4
-rw-r--r--sysdeps/libm-ieee754/w_gammaf.c4
-rw-r--r--sysdeps/libm-ieee754/w_gammal.c4
-rw-r--r--sysdeps/libm-ieee754/w_lgamma.c10
-rw-r--r--sysdeps/libm-ieee754/w_lgammaf.c10
-rw-r--r--sysdeps/libm-ieee754/w_lgammal.c10
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)