simpler

8 years ago · 96a5875e7c
parent 0dd59d8c13
commit 96a5875e7c
1 changed files with 1 additions and 1 deletions
--- a/brag/brag/codegen/codegen.rkt
+++ b/brag/brag/codegen/codegen.rkt
@ -158,7 +158,7 @@
               (let loop ([x (syntax->datum (parse x))])
                 (cond
                   [(list? x) (map loop x)]
-                   [(char? x) (format "~a" x)]
+                   [(char? x) (string x)]
                   [else x])))))))]))