diff --git a/tests/base.scm b/tests/base.scm
index 63e6dd91..4fd5496d 100644
--- a/tests/base.scm
+++ b/tests/base.scm
@@ -71,6 +71,11 @@
   ;(test +inf.0 (exact +inf.0))
 )
 
+(test-group
+  "rationals"
+  (test 3.0 (expt 81 1/4))
+)
+
 (test-group
   "records"
   (define-record-type employee