Source-Changes-HG archive

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index][Old Index]

[src/trunk]: src/tests/lib/libm Happiness of VAX implies ugliness of the code.



details:   https://anonhg.NetBSD.org/src/rev/a4d7eed80ba5
branches:  trunk
changeset: 769503:a4d7eed80ba5
user:      jruoho <jruoho%NetBSD.org@localhost>
date:      Mon Sep 12 16:28:37 2011 +0000

description:
Happiness of VAX implies ugliness of the code.

diffstat:

 tests/lib/libm/t_ldexp.c  |  24 ++++++++++++++++++++++--
 tests/lib/libm/t_scalbn.c |  34 ++++++++++++++++++++++++++++++++--
 tests/lib/libm/t_tanh.c   |  24 ++++++++++++++++++++++--
 3 files changed, 76 insertions(+), 6 deletions(-)

diffs (truncated from 574 to 300 lines):

diff -r bab65e64d687 -r a4d7eed80ba5 tests/lib/libm/t_ldexp.c
--- a/tests/lib/libm/t_ldexp.c  Mon Sep 12 16:08:42 2011 +0000
+++ b/tests/lib/libm/t_ldexp.c  Mon Sep 12 16:28:37 2011 +0000
@@ -1,4 +1,4 @@
-/* $NetBSD: t_ldexp.c,v 1.2 2011/09/12 15:47:14 jruoho Exp $ */
+/* $NetBSD: t_ldexp.c,v 1.3 2011/09/12 16:28:37 jruoho Exp $ */
 
 /*-
  * Copyright (c) 2011 The NetBSD Foundation, Inc.
@@ -29,7 +29,7 @@
  * POSSIBILITY OF SUCH DAMAGE.
  */
 #include <sys/cdefs.h>
-__RCSID("$NetBSD: t_ldexp.c,v 1.2 2011/09/12 15:47:14 jruoho Exp $");
+__RCSID("$NetBSD: t_ldexp.c,v 1.3 2011/09/12 16:28:37 jruoho Exp $");
 
 #include <math.h>
 #include <limits.h>
@@ -49,6 +49,7 @@
 
 ATF_TC_BODY(ldexp_nan, tc)
 {
+#ifndef __vax__
        const double x = 0.0L / 0.0L;
        double y;
        size_t i;
@@ -59,6 +60,7 @@
                y = ldexp(x, exps[i]);
                ATF_CHECK(isnan(y) != 0);
        }
+#endif
 }
 
 ATF_TC(ldexp_inf_neg);
@@ -69,11 +71,13 @@
 
 ATF_TC_BODY(ldexp_inf_neg, tc)
 {
+#ifndef __vax__
        const double x = -1.0L / 0.0L;
        size_t i;
 
        for (i = 0; i < __arraycount(exps); i++)
                ATF_CHECK(ldexp(x, exps[i]) == x);
+#endif
 }
 
 ATF_TC(ldexp_inf_pos);
@@ -84,11 +88,13 @@
 
 ATF_TC_BODY(ldexp_inf_pos, tc)
 {
+#ifndef __vax__
        const double x = 1.0L / 0.0L;
        size_t i;
 
        for (i = 0; i < __arraycount(exps); i++)
                ATF_CHECK(ldexp(x, exps[i]) == x);
+#endif
 }
 
 ATF_TC(ldexp_zero_neg);
@@ -99,6 +105,7 @@
 
 ATF_TC_BODY(ldexp_zero_neg, tc)
 {
+#ifndef __vax__
        const double x = -0.0L;
        double y;
        size_t i;
@@ -110,6 +117,7 @@
                ATF_CHECK(x == y);
                ATF_CHECK(signbit(y) != 0);
        }
+#endif
 }
 
 ATF_TC(ldexp_zero_pos);
@@ -120,6 +128,7 @@
 
 ATF_TC_BODY(ldexp_zero_pos, tc)
 {
+#ifndef __vax__
        const double x = 0.0L;
        double y;
        size_t i;
@@ -131,6 +140,7 @@
                ATF_CHECK(x == y);
                ATF_CHECK(signbit(y) == 0);
        }
+#endif
 }
 
 ATF_TC(ldexpf_nan);
@@ -141,6 +151,7 @@
 
 ATF_TC_BODY(ldexpf_nan, tc)
 {
+#ifndef __vax__
        const float x = 0.0L / 0.0L;
        float y;
        size_t i;
@@ -151,6 +162,7 @@
                y = ldexpf(x, exps[i]);
                ATF_CHECK(isnan(y) != 0);
        }
+#endif
 }
 
 /*
@@ -165,11 +177,13 @@
 
 ATF_TC_BODY(ldexpf_inf_neg, tc)
 {
+#ifndef __vax__
        const float x = -1.0L / 0.0L;
        size_t i;
 
        for (i = 0; i < __arraycount(exps); i++)
                ATF_CHECK(ldexpf(x, exps[i]) == x);
+#endif
 }
 
 ATF_TC(ldexpf_inf_pos);
@@ -180,11 +194,13 @@
 
 ATF_TC_BODY(ldexpf_inf_pos, tc)
 {
+#ifndef __vax__
        const float x = 1.0L / 0.0L;
        size_t i;
 
        for (i = 0; i < __arraycount(exps); i++)
                ATF_CHECK(ldexpf(x, exps[i]) == x);
+#endif
 }
 
 ATF_TC(ldexpf_zero_neg);
@@ -195,6 +211,7 @@
 
 ATF_TC_BODY(ldexpf_zero_neg, tc)
 {
+#ifndef __vax__
        const float x = -0.0L;
        float y;
        size_t i;
@@ -206,6 +223,7 @@
                ATF_CHECK(x == y);
                ATF_CHECK(signbit(y) != 0);
        }
+#endif
 }
 
 ATF_TC(ldexpf_zero_pos);
@@ -216,6 +234,7 @@
 
 ATF_TC_BODY(ldexpf_zero_pos, tc)
 {
+#ifndef __vax__
        const float x = 0.0L;
        float y;
        size_t i;
@@ -227,6 +246,7 @@
                ATF_CHECK(x == y);
                ATF_CHECK(signbit(y) == 0);
        }
+#endif
 }
 
 ATF_TP_ADD_TCS(tp)
diff -r bab65e64d687 -r a4d7eed80ba5 tests/lib/libm/t_scalbn.c
--- a/tests/lib/libm/t_scalbn.c Mon Sep 12 16:08:42 2011 +0000
+++ b/tests/lib/libm/t_scalbn.c Mon Sep 12 16:28:37 2011 +0000
@@ -1,4 +1,4 @@
-/* $NetBSD: t_scalbn.c,v 1.2 2011/09/12 15:47:14 jruoho Exp $ */
+/* $NetBSD: t_scalbn.c,v 1.3 2011/09/12 16:28:37 jruoho Exp $ */
 
 /*-
  * Copyright (c) 2011 The NetBSD Foundation, Inc.
@@ -29,7 +29,7 @@
  * POSSIBILITY OF SUCH DAMAGE.
  */
 #include <sys/cdefs.h>
-__RCSID("$NetBSD: t_scalbn.c,v 1.2 2011/09/12 15:47:14 jruoho Exp $");
+__RCSID("$NetBSD: t_scalbn.c,v 1.3 2011/09/12 16:28:37 jruoho Exp $");
 
 #include <math.h>
 #include <limits.h>
@@ -49,6 +49,7 @@
 
 ATF_TC_BODY(scalbn_nan, tc)
 {
+#ifndef __vax__
        const double x = 0.0L / 0.0L;
        double y;
        size_t i;
@@ -59,6 +60,7 @@
                y = scalbn(x, exps[i]);
                ATF_CHECK(isnan(y) != 0);
        }
+#endif
 }
 
 ATF_TC(scalbn_inf_neg);
@@ -69,11 +71,13 @@
 
 ATF_TC_BODY(scalbn_inf_neg, tc)
 {
+#ifndef __vax__
        const double x = -1.0L / 0.0L;
        size_t i;
 
        for (i = 0; i < __arraycount(exps); i++)
                ATF_CHECK(scalbn(x, exps[i]) == x);
+#endif
 }
 
 ATF_TC(scalbn_inf_pos);
@@ -84,11 +88,13 @@
 
 ATF_TC_BODY(scalbn_inf_pos, tc)
 {
+#ifndef __vax__
        const double x = 1.0L / 0.0L;
        size_t i;
 
        for (i = 0; i < __arraycount(exps); i++)
                ATF_CHECK(scalbn(x, exps[i]) == x);
+#endif
 }
 
 ATF_TC(scalbn_zero_neg);
@@ -99,6 +105,7 @@
 
 ATF_TC_BODY(scalbn_zero_neg, tc)
 {
+#ifndef __vax__
        const double x = -0.0L;
        double y;
        size_t i;
@@ -110,6 +117,7 @@
                ATF_CHECK(x == y);
                ATF_CHECK(signbit(y) != 0);
        }
+#endif
 }
 
 ATF_TC(scalbn_zero_pos);
@@ -120,6 +128,7 @@
 
 ATF_TC_BODY(scalbn_zero_pos, tc)
 {
+#ifndef __vax__
        const double x = 0.0L;
        double y;
        size_t i;
@@ -131,6 +140,7 @@
                ATF_CHECK(x == y);
                ATF_CHECK(signbit(y) == 0);
        }
+#endif
 }
 
 /*
@@ -144,6 +154,7 @@
 
 ATF_TC_BODY(scalbnf_nan, tc)
 {
+#ifndef __vax__
        const float x = 0.0L / 0.0L;
        float y;
        size_t i;
@@ -154,6 +165,7 @@
                y = scalbnf(x, exps[i]);
                ATF_CHECK(isnan(y) != 0);
        }
+#endif
 }
 
 ATF_TC(scalbnf_inf_neg);
@@ -164,11 +176,13 @@
 
 ATF_TC_BODY(scalbnf_inf_neg, tc)
 {
+#ifndef __vax__
        const float x = -1.0L / 0.0L;
        size_t i;
 
        for (i = 0; i < __arraycount(exps); i++)
                ATF_CHECK(scalbnf(x, exps[i]) == x);
+#endif
 }
 
 ATF_TC(scalbnf_inf_pos);
@@ -179,11 +193,13 @@
 
 ATF_TC_BODY(scalbnf_inf_pos, tc)
 {
+#ifndef __vax__
        const float x = 1.0L / 0.0L;



Home | Main Index | Thread Index | Old Index