From: David Vazquez <davazp@gmail.com>
Date: Sat, 15 Dec 2012 23:53:32 +0000 (+0000)
Subject: Fix bug in lambda compilation
X-Git-Url: http://repo.macrolet.net/gitweb/?a=commitdiff_plain;h=bcee72707404142f5ec8dad6c04e9b802ea8ca0b;p=jscl.git

Fix bug in lambda compilation
---

diff --git a/lispstrack.lisp b/lispstrack.lisp
index 705c089..16be306 100644
--- a/lispstrack.lisp
+++ b/lispstrack.lisp
@@ -85,8 +85,8 @@
                   ",")
 	    "){
 "
-            (concat (ls-compile-block (butlast body) env fenv)
-                    "return " (ls-compile (car (last body)) env fenv) ";")
+            (concat (ls-compile-block (butlast body) new-env fenv)
+                    "return " (ls-compile (car (last body)) new-env fenv) ";")
 	    "
 })")))