suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

cs: fix math test suite

Browse Source 
Adjust a recent addition to be guarded by a
`(single-flonum-available?)` check.

Closes #2747
This commit is contained in:
Matthew Flatt 2019-07-19 04:39:29 -06:00
parent 43ba15ca38
commit 41fb8b4964
1 changed files with 5 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
pkgs/racket-test-core/tests/racket/math.rktl
View File

@ -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)