test str

3 years ago · a79266d421
parent 1f537a1233
commit a79266d421
1 changed files with 1 additions and 1 deletions
--- 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)