X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=src%2Fmath%2Facosf.c;h=8a35f06b420d3b9b2d046702f668777423d767eb;hb=21dd45c44f745d3b85afab304362d01b3b45a5e4;hp=fb20f893a6ce5e3965a2cc5aa692e0bb3172c631;hpb=457b0dbfc1d72080f6ba9fe47cd712e0f090732a;p=libc-test diff --git a/src/math/acosf.c b/src/math/acosf.c index fb20f89..8a35f06 100644 --- a/src/math/acosf.c +++ b/src/math/acosf.c @@ -10,6 +10,7 @@ static struct f_f t[] = { int main(void) { + #pragma STDC FENV_ACCESS ON float y; float d; int e, i, err = 0; @@ -17,9 +18,14 @@ int main(void) for (i = 0; i < sizeof t/sizeof *t; i++) { p = t + i; - setupfenv(p->r); + + if (p->r < 0) + continue; + fesetround(p->r); + feclearexcept(FE_ALL_EXCEPT); y = acosf(p->x); - e = getexcept(); + e = fetestexcept(INEXACT|INVALID|DIVBYZERO|UNDERFLOW|OVERFLOW); + if (!checkexcept(e, p->e, p->r)) { printf("%s:%d: bad fp exception: %s acosf(%a)=%a, want %s", p->file, p->line, rstr(p->r), p->x, p->y, estr(p->e));