diff --git a/tests/r7rs-tests.scm b/tests/r7rs-tests.scm
index e2e14dfe..cfbe4ca7 100644
--- a/tests/r7rs-tests.scm
+++ b/tests/r7rs-tests.scm
@@ -674,6 +674,8 @@
 (test 3 (numerator (/ 6 4)))
 (test 2 (denominator (/ 6 4)))
 (test 2.0 (denominator (inexact (/ 6 4))))
+(test 11.0 (numerator 5.5))
+(test 2.0 (denominator 5.5))
 
 (test -5.0 (floor -4.3))
 (test -4.0 (ceiling -4.3))