From d398754fefe40ebfff152a9f95094da96af3f347 Mon Sep 17 00:00:00 2001 From: Vincent St-Amour Date: Fri, 22 Jun 2012 17:34:46 -0400 Subject: [PATCH] Reconstruct let bindings in the right order when unboxing let. original commit: a0d55d4ab82bd700a191720edfd5506692a8851a --- collects/typed-racket/optimizer/unboxed-let.rkt | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/collects/typed-racket/optimizer/unboxed-let.rkt b/collects/typed-racket/optimizer/unboxed-let.rkt index 8892ddaa..6ffcdb80 100644 --- a/collects/typed-racket/optimizer/unboxed-let.rkt +++ b/collects/typed-racket/optimizer/unboxed-let.rkt @@ -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