fix argument order in the error message of jnf, yn, ynf

diff --git a/src/math/jnf.c b/src/math/jnf.c
index e5ae728..5bdf52f 100644 (file)
--- a/src/math/jnf.c
+++ b/src/math/jnf.c
@@ -28,15 +28,15 @@ int main(void)
                e = fetestexcept(INEXACT|INVALID|DIVBYZERO|UNDERFLOW|OVERFLOW);
 
                if (!checkexcept(e, p->e, p->r)) {
                e = fetestexcept(INEXACT|INVALID|DIVBYZERO|UNDERFLOW|OVERFLOW);
 
                if (!checkexcept(e, p->e, p->r)) {

-                       printf("%s:%d: bad fp exception: %s jnf(%a, %lld)=%a, want %s",
-                               p->file, p->line, rstr(p->r), p->x, p->i, p->y, estr(p->e));
+                       printf("%s:%d: bad fp exception: %s jnf(%lld, %a)=%a, want %s",
+                               p->file, p->line, rstr(p->r), p->i, p->x, p->y, estr(p->e));

                        printf(" got %s\n", estr(e));
                        err++;
                }
                d = ulperrf(y, p->y, p->dy);
                if (!checkulp(d, p->r)) {
                        printf(" got %s\n", estr(e));
                        err++;
                }
                d = ulperrf(y, p->y, p->dy);
                if (!checkulp(d, p->r)) {

-                       printf("%s:%d: %s jnf(%a, %lld) want %a got %a, ulperr %.3f = %a + %a\n",
-                               p->file, p->line, rstr(p->r), p->x, p->i, p->y, y, d, d-p->dy, p->dy);
+                       printf("%s:%d: %s jnf(%lld, %a) want %a got %a, ulperr %.3f = %a + %a\n",
+                               p->file, p->line, rstr(p->r), p->i, p->x, p->y, y, d, d-p->dy, p->dy);

                        err++;
                }
        }
                        err++;
                }
        }

diff --git a/src/math/yn.c b/src/math/yn.c
index 9dcaa61..29eda08 100644 (file)
--- a/src/math/yn.c
+++ b/src/math/yn.c
@@ -28,15 +28,15 @@ int main(void)
                e = fetestexcept(INEXACT|INVALID|DIVBYZERO|UNDERFLOW|OVERFLOW);
 
                if (!checkexcept(e, p->e, p->r)) {
                e = fetestexcept(INEXACT|INVALID|DIVBYZERO|UNDERFLOW|OVERFLOW);
 
                if (!checkexcept(e, p->e, p->r)) {

-                       printf("%s:%d: bad fp exception: %s yn(%a, %lld)=%a, want %s",
-                               p->file, p->line, rstr(p->r), p->x, p->i, p->y, estr(p->e));
+                       printf("%s:%d: bad fp exception: %s yn(%lld, %a)=%a, want %s",
+                               p->file, p->line, rstr(p->r), p->i, p->x, p->y, estr(p->e));

                        printf(" got %s\n", estr(e));
                        err++;
                }
                d = ulperr(y, p->y, p->dy);
                if ((!(p->x < 0) && !checkulp(d, p->r)) || (p->x < 0 && !isnan(y) && y != -inf)) {
                        printf(" got %s\n", estr(e));
                        err++;
                }
                d = ulperr(y, p->y, p->dy);
                if ((!(p->x < 0) && !checkulp(d, p->r)) || (p->x < 0 && !isnan(y) && y != -inf)) {

-                       printf("%s:%d: %s yn(%a, %lld) want %a got %a, ulperr %.3f = %a + %a\n",
-                               p->file, p->line, rstr(p->r), p->x, p->i, p->y, y, d, d-p->dy, p->dy);
+                       printf("%s:%d: %s yn(%lld, %a) want %a got %a, ulperr %.3f = %a + %a\n",
+                               p->file, p->line, rstr(p->r), p->i, p->x, p->y, y, d, d-p->dy, p->dy);

                        err++;
                }
        }
                        err++;
                }
        }

diff --git a/src/math/ynf.c b/src/math/ynf.c
index f3c2b14..1a2e7c7 100644 (file)
--- a/src/math/ynf.c
+++ b/src/math/ynf.c
@@ -28,15 +28,15 @@ int main(void)
                e = fetestexcept(INEXACT|INVALID|DIVBYZERO|UNDERFLOW|OVERFLOW);
 
                if (!checkexcept(e, p->e, p->r)) {
                e = fetestexcept(INEXACT|INVALID|DIVBYZERO|UNDERFLOW|OVERFLOW);
 
                if (!checkexcept(e, p->e, p->r)) {

-                       printf("%s:%d: bad fp exception: %s ynf(%a, %lld)=%a, want %s",
-                               p->file, p->line, rstr(p->r), p->x, p->i, p->y, estr(p->e));
+                       printf("%s:%d: bad fp exception: %s ynf(%lld, %a)=%a, want %s",
+                               p->file, p->line, rstr(p->r), p->i, p->x, p->y, estr(p->e));

                        printf(" got %s\n", estr(e));
                        err++;
                }
                d = ulperrf(y, p->y, p->dy);
                if ((!(p->x < 0) && !checkulp(d, p->r)) || (p->x < 0 && !isnan(y) && y != -inf)) {
                        printf(" got %s\n", estr(e));
                        err++;
                }
                d = ulperrf(y, p->y, p->dy);
                if ((!(p->x < 0) && !checkulp(d, p->r)) || (p->x < 0 && !isnan(y) && y != -inf)) {

-                       printf("%s:%d: %s ynf(%a, %lld) want %a got %a, ulperr %.3f = %a + %a\n",
-                               p->file, p->line, rstr(p->r), p->x, p->i, p->y, y, d, d-p->dy, p->dy);
+                       printf("%s:%d: %s ynf(%lld, %a) want %a got %a, ulperr %.3f = %a + %a\n",
+                               p->file, p->line, rstr(p->r), p->i, p->x, p->y, y, d, d-p->dy, p->dy);

                        err++;
                }
        }
                        err++;
                }
        }