skip known math failures

[libc-test] / src / math / j0.c

diff --git a/src/math/j0.c b/src/math/j0.c
index b893c00..029a8a7 100644 (file)
--- a/src/math/j0.c
+++ b/src/math/j0.c
@@ -14,7 +14,7 @@ int main(void)
        #pragma STDC FENV_ACCESS ON
        double y;
        float d;
-       int e, i, err = 0;
+       int e, i, bad, err = 0;
        struct d_d *p;
 
        for (i = 0; i < sizeof t/sizeof *t; i++) {
@@ -35,12 +35,12 @@ int main(void)
                }
                d = ulperr(y, p->y, p->dy);
                if (!checkulp(d, p->r)) {
-//                     printf("%s:%d: %s j0(%a) want %a got %a ulperr %.3f = %a + %a\n",
-//                             p->file, p->line, rstr(p->r), p->x, p->y, y, d, d-p->dy, p->dy);
-                       err++;
-                       // TODO: avoid spamming the output
-                       printf(__FILE__ ": known to be broken near zeros\n");
-                       break;
+                       if (fabsf(d) < 0x1p52f)
+                               printf("X ");
+                       else
+                               err++;
+                       printf("%s:%d: %s j0(%a) want %a got %a ulperr %.3f = %a + %a\n",
+                               p->file, p->line, rstr(p->r), p->x, p->y, y, d, d-p->dy, p->dy);
                }
        }
        return !!err;