From: David Vazquez <davazp@gmail.com>
Date: Sat, 15 Dec 2012 00:02:26 +0000 (+0000)
Subject: Fix ; in the last compiled expression in ls-compile-sexps
X-Git-Url: http://repo.macrolet.net/gitweb/?a=commitdiff_plain;h=32874353beb0212d92d943041aab68db59ea13dd;p=jscl.git

Fix ; in the last compiled expression in ls-compile-sexps
---

diff --git a/lispstrack.lisp b/lispstrack.lisp
index ba97bd6..c3b6642 100644
--- a/lispstrack.lisp
+++ b/lispstrack.lisp
@@ -34,9 +34,9 @@
 
 (defun ls-compile-sexps (sexps env)
   (concat (join (mapcar (lambda (x)
-                          (ls-compile x env))
+                          (concat (ls-compile x env) ";"))
                         sexps)
-                ";
+                "
 ")))
 
 (defun ls-compile-block (sexps env)