From 1f87c98fe86a4965a29c79a382b4633abb9fd2f0 Mon Sep 17 00:00:00 2001
From: Justin Ethier <justin.ethier@gmail.com>
Date: Wed, 24 Jan 2018 19:04:56 -0500
Subject: [PATCH] Targetted test case, why is this broken?

---
 match-test.scm | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

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)))