diff --git a/examples/tests/r4rstest.scm b/examples/tests/r4rstest.scm
index 56e94ef..f6f3ae0 100644
--- a/examples/tests/r4rstest.scm
+++ b/examples/tests/r4rstest.scm
@@ -594,9 +594,12 @@
   (test #f eqv? 0 f0.0)
   (SECTION 6 5 5)
   (test #t inexact? f3.9)
-  (test #t 'inexact? (inexact? (max f3.9 4)))
-  (test f4.0 'max (max f3.9 4))
-  (test f4.0 'exact->inexact (exact->inexact 4))
+  (test #t 'max (inexact? (max f3.9 4)))
+  (test f4.0 max f3.9 4)
+  (test f4.0 exact->inexact 4)
+  (test f4.0 exact->inexact 4.0)
+  (test 4 inexact->exact 4)
+  (test 4 inexact->exact 4.0)
   (test (- f4.0) round (- f4.5))
   (test (- f4.0) round (- f3.5))
   (test (- f4.0) round (- f3.9))