Update schemified

racket · Jan 17, 2022 · 480eb48 · 480eb48
1 parent 90e731b
commit 480eb48
Showing 1 changed file with 3 additions and 4 deletions.
diff --git a/racket/src/cs/schemified/expander.scm b/racket/src/cs/schemified/expander.scm
@@ -69225,17 +69225,16 @@
                                                         config_0
                                                         temp43_1
                                                         (list temp44_0)))))))
-                                             (if (if (eqv? ec_0 '#\x75)
+                                             (if (if (eqv? ec_0 '#\x61)
                                                    #t
-                                                   (eqv? ec_0 '#\x55))
+                                                   (eqv? ec_0 '#\x41))
                                                (begin
                                                  (accum-string-add!
                                                   accum-str_0
                                                   c_0)
-                                                 (get-next!_0 '#\x61 '#\x41)
                                                  (get-next!_0 '#\x6c '#\x4c)
                                                  (get-next!_0 '#\x77 '#\x57)
-                                                 (if (eq? mode_0 'eq)
+                                                 (if (eq? mode_0 'equal)
                                                    (loop_0 'equal-always)
                                                    (let ((temp49_0
                                                           "bad syntax `~a`"))