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

more tests for (inexact->exact +inf.0)

Browse Source 
Add test where the expression is not in tail position, to ensure that the optimizer doesn't remove it.
This commit is contained in:
Gustavo Massaccesi 2019-06-05 22:45:00 -03:00 committed by Matthew Flatt
parent d136245e3b
commit 589bd920a9
1 changed files with 3 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
pkgs/racket-test-core/tests/racket/number.rktl
View File

@ -739,6 +739,9 @@
(err/rt-test (inexact->exact +inf.0))
(err/rt-test (inexact->exact -inf.0))
(err/rt-test (inexact->exact +nan.0))
(err/rt-test (begin (inexact->exact +inf.0) 'not-an-error))
(err/rt-test (begin (inexact->exact -inf.0) 'not-an-error))
(err/rt-test (begin (inexact->exact +nan.0) 'not-an-error))
#reader "maybe-single.rkt"
(when has-single-flonum?