diff options
| author | Rich Felker <dalias@aerifal.cx> | 2012-03-16 21:16:32 -0400 |
|---|---|---|
| committer | Rich Felker <dalias@aerifal.cx> | 2012-03-16 21:16:32 -0400 |
| commit | de7db6e927e568c52eaffeb51d7726a094ed0180 (patch) | |
| tree | 8c144d5ad32b3061ce34a01eb5d346d5a409b95c /src/math/lgammal.c | |
| parent | 93a50a26cd0f9efc59cc83daae7b2d916b327ab1 (diff) | |
| download | musl-de7db6e927e568c52eaffeb51d7726a094ed0180.tar.gz | |
fix namespace issues for lgamma, etc.
standard functions cannot depend on nonstandard symbols
Diffstat (limited to 'src/math/lgammal.c')
| -rw-r--r-- | src/math/lgammal.c | 18 |
1 files changed, 10 insertions, 8 deletions
diff --git a/src/math/lgammal.c b/src/math/lgammal.c index a33707ad..5dd851a6 100644 --- a/src/math/lgammal.c +++ b/src/math/lgammal.c @@ -88,15 +88,10 @@ #define _GNU_SOURCE #include "libm.h" -long double lgammal(long double x) -{ - return lgammal_r(x, &signgam); -} - #if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024 -long double lgammal_r(long double x, int *sg) +long double __lgammal_r(long double x, int *sg) { - return lgamma_r(x, sg); + return __lgamma_r(x, sg); } #elif LDBL_MANT_DIG == 64 && LDBL_MAX_EXP == 16384 static const long double @@ -266,7 +261,7 @@ static long double sin_pi(long double x) return -y; } -long double lgammal_r(long double x, int *sg) { +long double __lgammal_r(long double x, int *sg) { long double t, y, z, nadj, p, p1, p2, q, r, w; int i, ix; uint32_t se, i0, i1; @@ -392,3 +387,10 @@ long double lgammal_r(long double x, int *sg) { return r; } #endif + +long double lgammal(long double x) +{ + return __lgammal_r(x, &signgam); +} + +weak_alias(__lgammal_r, lgammal_r); |