X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=src%2Fmath%2Flgamma_r.c;h=2a5151eecd80d0c903a0732d4b54f2cefcfbfde3;hb=99aee8a0c90251874b0f4725c614f6b0bbaa4011;hp=c2acb998043b6da167cca51e607183ca2898e055;hpb=d22f4f43182fe1cc70b343b6a52cb8e3a54d1f44;p=libc-test diff --git a/src/math/lgamma_r.c b/src/math/lgamma_r.c index c2acb99..2a5151e 100644 --- a/src/math/lgamma_r.c +++ b/src/math/lgamma_r.c @@ -1,9 +1,10 @@ #include #include -#include "util.h" +#include "mtest.h" static struct d_di t[] = { #include "sanity/lgamma_r.h" +#include "special/lgamma_r.h" }; @@ -33,7 +34,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++;