X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=src%2Fmath%2Flgamma_r.c;h=0324815dd13816bee4d180a4fce50fee1a2c517d;hb=8dc17fa12d0ed5d041e6521ebf3249ffd192c31b;hp=0645feb469d175ad255dca8f545836fbb4f75b56;hpb=f3f0ff4782fc90bd0f3e48fd541ee431f76aaed1;p=libc-test diff --git a/src/math/lgamma_r.c b/src/math/lgamma_r.c index 0645feb..0324815 100644 --- a/src/math/lgamma_r.c +++ b/src/math/lgamma_r.c @@ -1,6 +1,8 @@ +#define _BSD_SOURCE 1 +#define _GNU_SOURCE 1 #include #include -#include "util.h" +#include "mtest.h" static struct d_di t[] = { #include "sanity/lgamma_r.h" @@ -34,7 +36,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_r(%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++;