summaryrefslogtreecommitdiff
path: root/sysdeps/generic/w_tgammal.c
diff options
context:
space:
mode:
authorUlrich Drepper <drepper@redhat.com>2004-11-21 19:58:34 +0000
committerUlrich Drepper <drepper@redhat.com>2004-11-21 19:58:34 +0000
commit52495f29a2e8519da83cbda0c21ad95405364705 (patch)
tree1ece157b55f4df330c2cbdc2b6cb276c57959476 /sysdeps/generic/w_tgammal.c
parent250ecb48d516b08be7d0fdba0a7ba5146e148a77 (diff)
[BZ #552]
Update. 2004-11-20 Jakub Jelinek <jakub@redhat.com> * sysdeps/ieee754/k_standard.c: Document code 50. (__kernel_standard) <case 50>: Avoid raising div-by-zero exception again. 2004-11-19 H.J. Lu <hongjiu.lu@intel.com> [BZ #552] * math/libm-test.inc (tgamma_test): Update tgamma (0) and tgamma (-0). * sysdeps/generic/w_tgamma.c (__tgamma): Properly handle |x| == 0. * sysdeps/generic/w_tgammaf.c (__tgammaf): Likewise. * sysdeps/generic/w_tgammal.c (__tgammal): Likewise. * sysdeps/ieee754/dbl-64/e_gamma_r.c (__ieee754_gamma_r): Likewise. * sysdeps/ieee754/flt-32/e_gammaf_r.c: Likewise. * sysdeps/ieee754/ldbl-128/e_gammal_r.c: Likewise. * sysdeps/ieee754/ldbl-96/e_gammal_r.c: Likewise. * sysdeps/ieee754/k_standard.c (__kernel_standard): Handle tgamma (0) and tgamma (-0).
Diffstat (limited to 'sysdeps/generic/w_tgammal.c')
-rw-r--r--sysdeps/generic/w_tgammal.c6
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 */
}