fix typo in in-value change

Thanks to @yjqww6
This commit is contained in:
Matthew Flatt 2021-04-28 20:29:46 -06:00
parent bd94ac6b27
commit cfa10d5f30

View File

@ -2309,7 +2309,7 @@
(lambda () #'in-value)
(lambda (stx)
(syntax-case stx ()
[[<(id) (_ expr)]
[[(id) (_ expr)]
#'[(id) (:do-in ([(id*) expr]) #t () #t ([(id) id*]) #t #f ())]]
[_ #f])))