diff --git a/match-test.scm b/match-test.scm
index 340e3f31..594b400d 100644
--- a/match-test.scm
+++ b/match-test.scm
@@ -13,7 +13,11 @@
       (chibi test)))
 )
 
-(test-group
+(display
+  (match "test" ((? string? s) s) (else #f))
+)
+
+#;(test-group
   "predicates"
   ;; Fails on cyclone, works on chibi
   ;(test "test" (match "test" ((? string? s) s) (else #f)))