|
@@ -90,8 +90,6 @@
|
|
|
#include "libc.h"
|
|
|
|
|
|
#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
|
|
|
-double __lgamma_r(double x, int *sg);
|
|
|
-
|
|
|
long double __lgammal_r(long double x, int *sg)
|
|
|
{
|
|
|
return __lgamma_r(x, sg);
|
|
@@ -342,16 +340,12 @@ long double __lgammal_r(long double x, int *sg) {
|
|
|
}
|
|
|
#elif LDBL_MANT_DIG == 113 && LDBL_MAX_EXP == 16384
|
|
|
// TODO: broken implementation to make things compile
|
|
|
-double __lgamma_r(double x, int *sg);
|
|
|
-
|
|
|
long double __lgammal_r(long double x, int *sg)
|
|
|
{
|
|
|
return __lgamma_r(x, sg);
|
|
|
}
|
|
|
#endif
|
|
|
|
|
|
-extern int __signgam;
|
|
|
-
|
|
|
long double lgammal(long double x)
|
|
|
{
|
|
|
return __lgammal_r(x, &__signgam);
|