diff --git a/newlib/libm/mathfp/er_gamma.c b/newlib/libm/mathfp/er_gamma.c index 0060ed031..63758bb43 100644 --- a/newlib/libm/mathfp/er_gamma.c +++ b/newlib/libm/mathfp/er_gamma.c @@ -30,8 +30,3 @@ { return exp (lgamma_r(x,signgamp)); } - -double gamma(double x) -{ - return gamma_r(x, &(_REENT_SIGNGAM(_REENT))); -} diff --git a/newlib/libm/mathfp/er_lgamma.c b/newlib/libm/mathfp/er_lgamma.c index fd49c252e..65d60026e 100644 --- a/newlib/libm/mathfp/er_lgamma.c +++ b/newlib/libm/mathfp/er_lgamma.c @@ -422,9 +422,3 @@ static double zero= 0.00000000000000000000e+00; if(hx<0) r = nadj - r; return r; } - -double -lgamma(double x) -{ - return lgamma_r(x, &(_REENT_SIGNGAM(_REENT))); -} diff --git a/newlib/libm/mathfp/erf_gamma.c b/newlib/libm/mathfp/erf_gamma.c index 246645d25..16be0d040 100644 --- a/newlib/libm/mathfp/erf_gamma.c +++ b/newlib/libm/mathfp/erf_gamma.c @@ -16,7 +16,7 @@ /* gammaf_r(x, signgamp) * Reentrant version of the logarithm of the Gamma function - * with user provided pointer for the sign of Gamma(x). + * with user provide pointer for the sign of Gamma(x). * * Method: See lgammaf_r */ @@ -32,8 +32,3 @@ { return expf (lgammaf_r(x,signgamp)); } - -float gammaf(float x) -{ - return gammaf_r(x, &(_REENT_SIGNGAM(_REENT))); -} diff --git a/newlib/libm/mathfp/erf_lgamma.c b/newlib/libm/mathfp/erf_lgamma.c index 4f092147b..64bec0aca 100644 --- a/newlib/libm/mathfp/erf_lgamma.c +++ b/newlib/libm/mathfp/erf_lgamma.c @@ -244,8 +244,3 @@ static float zero= 0.0000000000e+00; if(hx<0) r = nadj - r; return r; } - -float lgammaf(float x) -{ - return lgammaf_r(x, &(_REENT_SIGNGAM(_REENT))); -}