X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=src%2Fmath%2Flgammaf_r.c;h=278bfcf0764ecae314b0c3c9703e212a51c6a201;hb=d5fe2f139f48684f2e0f99a3c95ce63581e24740;hp=11ca8e37bc93e7a3f912d2090dba37fcedd18885;hpb=d22f4f43182fe1cc70b343b6a52cb8e3a54d1f44;p=libc-test diff --git a/src/math/lgammaf_r.c b/src/math/lgammaf_r.c index 11ca8e3..278bfcf 100644 --- a/src/math/lgammaf_r.c +++ b/src/math/lgammaf_r.c @@ -1,9 +1,12 @@ +#define _BSD_SOURCE 1 +#define _GNU_SOURCE 1 #include #include -#include "util.h" +#include "mtest.h" static struct f_fi t[] = { #include "sanity/lgammaf_r.h" +#include "special/lgammaf_r.h" }; @@ -33,7 +36,7 @@ int main(void) err++; } d = ulperrf(y, p->y, p->dy); - if (!checkulp(d, p->r)) { + if (!checkulp(d, p->r) || (!isnan(p->x) && p->x!=-inf && !(p->e&DIVBYZERO) && yi != p->i)) { printf("%s:%d: %s lgammaf_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++;