Fix visibility of arity-raised bindings.
original commit: b536445cdee2ad256284a780d4b1187ac3322dd9
This commit is contained in:
parent
fb381b7dfd
commit
4ec5413e5f
|
@ -155,7 +155,9 @@
|
|||
#:literal-sets (kernel-literals)
|
||||
#:attributes ([key 1] kw)
|
||||
(pattern (~and kw (~literal let-values))
|
||||
#:with (key ...) #'(kw))
|
||||
;; we need let*-values because we bind intermediate unboxed results,
|
||||
;; and the bindings for the final results refer to them
|
||||
#:with (key ...) #'(let*-values))
|
||||
(pattern (~and kw (~literal letrec-values))
|
||||
#:with (key ...) #'(kw))
|
||||
(pattern (~seq (~and kw (~literal letrec-syntaxes+values)) stx-bindings)
|
||||
|
|
Loading…
Reference in New Issue
Block a user