fix the expansion of beginner-true and beginner-false so
they don't throw away source locations. related to PR 12253
This commit is contained in:
parent
c44d138ed1
commit
25413a4c05
|
@ -477,7 +477,7 @@
|
|||
#'id
|
||||
"expected a function after the open parenthesis, but found ~a"
|
||||
(syntax-e #'id))]
|
||||
[_ (datum->syntax stx val)]))))
|
||||
[_ (datum->syntax stx val stx)]))))
|
||||
|
||||
(define beginner-true/proc (make-constant-expander #t))
|
||||
(define beginner-false/proc (make-constant-expander #f))
|
||||
|
|
Loading…
Reference in New Issue
Block a user