X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=src%2Fmath%2Fj0.c;h=7a455ea3d7ff044acee4996d10d80dea33edbfb8;hb=3bd0bf0bc472f257e65a16d990ff131d1fe518b6;hp=0eecc56a3ca7a3670478de3c70aeb2300399b441;hpb=cfa23cc1bd01f5c44d7746b8b1839f84d5e1b6eb;p=libc-test

diff --git a/src/math/j0.c b/src/math/j0.c
index 0eecc56..7a455ea 100644
--- a/src/math/j0.c
+++ b/src/math/j0.c
@@ -1,3 +1,6 @@
+#define _DEFAULT_SOURCE 1
+#define _BSD_SOURCE 1
+#define _XOPEN_SOURCE 700
 #include <stdint.h>
 #include <stdio.h>
 #include "mtest.h"
@@ -34,9 +37,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);
+//			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;
 		}
 	}
 	return !!err;