X-Git-Url: http://nsz.repo.hu/git/?p=libc-test;a=blobdiff_plain;f=src%2Fmath%2Flgamma.c;h=ecb1dbb0d77be2ee4f6cba4bbf9a03ad15dc6b8a;hp=cd74903fa736a66f4733a54b9b61f397724c3ca9;hb=c886bb85233e642ca37731de72ad3e1f2f18a2f3;hpb=db87a4c3abf99af95d5dfe27f77b6815ec27a4f4 diff --git a/src/math/lgamma.c b/src/math/lgamma.c index cd74903..ecb1dbb 100644 --- a/src/math/lgamma.c +++ b/src/math/lgamma.c @@ -35,7 +35,7 @@ int main(void) err++; } d = ulperr(y, p->y, p->dy); - if (!checkulp(d, p->r) || yi != p->i) { + if (!checkulp(d, p->r) || (!isnan(p->x) && p->x!=-inf && !(p->e&DIVBYZERO) && yi != p->i)) { printf("%s:%d: %s lgamma(%a) want %a,%lld got %a,%d ulperr %.3f = %a + %a\n", p->file, p->line, rstr(p->r), p->x, p->y, p->i, y, yi, d, d-p->dy, p->dy); err++;