jyapayne/musl
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

math: fix tgamma to raise underflow for large negative values

Browse source
This commit is contained in:
Szabolcs Nagy 2013-08-15 10:13:02 +00:00
commit cd18dc8525
1 changed files with 1 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

1
src/math/tgamma.c
View file

@ -137,6 +137,7 @@ double tgamma(double x)
/* x =< -184: tgamma(x)=+-0 with underflow */ /* x =< -184: tgamma(x)=+-0 with underflow */
if (absx >= 184) { if (absx >= 184) {
if (x < 0) { if (x < 0) {
FORCE_EVAL((float)(0x1p-126/x));
if (floor(x) * 0.5 == floor(x * 0.5)) if (floor(x) * 0.5 == floor(x * 0.5))
return 0; return 0;
return -0.0; return -0.0;