From 41fb8b4964e83af7b0321683b8ff286596286e07 Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Fri, 19 Jul 2019 04:39:29 -0600 Subject: [PATCH] cs: fix math test suite Adjust a recent addition to be guarded by a `(single-flonum-available?)` check. Closes #2747 --- pkgs/racket-test-core/tests/racket/math.rktl | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) diff --git a/pkgs/racket-test-core/tests/racket/math.rktl b/pkgs/racket-test-core/tests/racket/math.rktl index 264e7de9da..fce2674b71 100644 --- a/pkgs/racket-test-core/tests/racket/math.rktl +++ b/pkgs/racket-test-core/tests/racket/math.rktl @@ -341,10 +341,11 @@ (test #t single=? tanh+1 (tanh 1.0f0)) (test 1.0f0 tanh 20.0f0) (test 1.0f0 tanh +inf.f) - (test #t single-flonum? (tanh -0.11100646f0)) - (test #t single-flonum? (tanh 0.11100646f0)) - (test #t single-flonum? (tanh 0.61100646f0)) - (test #t single-flonum? (tanh 20.61100646f0))) + (when (single-flonum-available?) + (test #t single-flonum? (tanh -0.11100646f0)) + (test #t single-flonum? (tanh 0.11100646f0)) + (test #t single-flonum? (tanh 0.61100646f0)) + (test #t single-flonum? (tanh 20.61100646f0)))) (test +nan.0 tanh +nan.0) (test -1.0 tanh -inf.0)