Reconstruct let bindings in the right order when unboxing let.

original commit: a0d55d4ab82bd700a191720edfd5506692a8851a
This commit is contained in:
Vincent St-Amour 2012-06-22 17:34:46 -04:00
parent d2e69a68dc
commit d398754fef

View File

@ -148,9 +148,9 @@
(quasisyntax/loc/origin
this-syntax #'letk.kw
(letk.key ...
(opt-candidates.bindings ... ...
opt-functions.res ...
opt-others.res ...)
(opt-functions.res ...
opt-others.res ...
opt-candidates.bindings ... ...)
#,@(syntax-map (optimize) #'(body ...)))))))
(define-splicing-syntax-class let-like-keyword