X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=src%2Fmath%2Fy1.c;h=4aaf032ba05f8a48e9fb0721299b7b70f5a2332a;hb=b3580f11bf7b91afd597e6224c2f265d6d0b087f;hp=95d971c80eb82853174a316b0b0cd60c415ee456;hpb=f3f0ff4782fc90bd0f3e48fd541ee431f76aaed1;p=libc-test

diff --git a/src/math/y1.c b/src/math/y1.c
index 95d971c..4aaf032 100644
--- a/src/math/y1.c
+++ b/src/math/y1.c
@@ -33,7 +33,7 @@ int main(void)
 			err++;
 		}
 		d = ulperr(y, p->y, p->dy);
-		if (!checkulp(d, p->r)) {
+		if ((!(p->x < 0) && !checkulp(d, p->r)) || (p->x < 0 && !isnan(y) && y != -inf)) {
 			printf("%s:%d: %s y1(%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++;