fix r7rs-tests. rational literal is not required to generate an exact value

2014-07-18 11:55:43 +09:00 · 2014-07-18 11:55:43 +09:00 · 5c6e7f16c0
parent 10462f2b7f
commit 5c6e7f16c0
1 changed files with 1 additions and 1 deletions
--- a/t/r7rs-tests.scm
+++ b/t/r7rs-tests.scm
@ -827,7 +827,7 @@
 (test 3.0 (truncate 3.5))
 (test 4.0 (round 3.5))

-(test 4 (round 7/2))
+(test 4 (exact (round 7/2)))
 (test 7 (round 7))

 ;; (test 1/3 (rationalize (exact .3) 1/10))