original commit: b371dd974dd0e0098befde7252ba5753448fae01
This commit is contained in:
Matthew Flatt 2002-01-02 19:06:05 +00:00
parent 796fd9b0d4
commit d870c1e79c

View File

@ -177,7 +177,7 @@
(check-fn-form (syntax fn) stx)
(with-syntax ([_stx stx])
(syntax/loc stx
(do-include _stx _stx _stx fn
(do-include _stx ctx loc fn
(letrec-syntax ([the-reader (lambda (stx)
(datum->syntax-object
#'here