diff options
Diffstat (limited to 'sysdeps/generic/w_tgammal.c')
| -rw-r--r-- | sysdeps/generic/w_tgammal.c | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/sysdeps/generic/w_tgammal.c b/sysdeps/generic/w_tgammal.c index 9efce2bb95..793fa17ac1 100644 --- a/sysdeps/generic/w_tgammal.c +++ b/sysdeps/generic/w_tgammal.c @@ -42,8 +42,10 @@ static char rcsid[] = "$NetBSD: $"; if(_LIB_VERSION == _IEEE_) return y; if(!__finitel(y)&&__finitel(x)) { - if(__floorl(x)==x&&x<=0.0) - return __kernel_standard(x,x,241); /* tgamma pole */ + if(x==0.0) + return __kernel_standard(x,x,250); /* tgamma pole */ + else if(__floorl(x)==x&&x<0.0) + return __kernel_standard(x,x,241); /* tgamma domain */ else return __kernel_standard(x,x,240); /* tgamma overflow */ } |