Bind variables in lexical order

Fixes #12
2016-02-12 19:28:22 -05:00 · 2016-02-12 19:28:22 -05:00 · a045d54071
parent 817bfd7517
commit a045d54071
1 changed files with 1 additions and 1 deletions
--- a/prospect/actor.rkt
+++ b/prospect/actor.rkt
@ -776,7 +776,7 @@
               (values (cons pr1 pr)
                       (cons g1 g)
                       (cons m1 m)
-                       (append bs1 bs))))
+                       (append bs bs1))))
           (if (identifier? #'ctor)
               (values (cons #'ctor (reverse pr))
                       (cons #'ctor (reverse g))