From a79266d421d4f37d4d403e487ebf1f8d074c1894 Mon Sep 17 00:00:00 2001
From: Matthew Butterick <mb@mbtype.com>
Date: Sun, 15 May 2022 13:46:46 -0700
Subject: [PATCH] test str

---
 quad2/main.rkt | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/quad2/main.rkt b/quad2/main.rkt
index fcf88b3c..df682e02 100644
--- a/quad2/main.rkt
+++ b/quad2/main.rkt
@@ -76,7 +76,7 @@
                    [current-use-postconditions? #t])
       (quad-compile (bootstrap-input x))))
 
-  (match (test-compile "X")
+  (match (test-compile "WHO")
     [(? string? insts)
      (displayln insts)
      #;(render insts #:using text-renderer)