diff --git a/tests/r7rs-tests.scm b/tests/r7rs-tests.scm
index 5cd60159..e2e14dfe 100644
--- a/tests/r7rs-tests.scm
+++ b/tests/r7rs-tests.scm
@@ -725,7 +725,7 @@
 ;; (test undefined (atan 0.0 0.0))
 
 (test 1764 (square 42))
-(test 4.0 (square 2))
+(test 4 (square 2))
 
 (test 3 (sqrt 9))
 (test 1.4142135623731 (sqrt 2))