Fix ; in the last compiled expression in ls-compile-sexps
authorDavid Vazquez <davazp@gmail.com>
Sat, 15 Dec 2012 00:02:26 +0000 (00:02 +0000)
committerDavid Vazquez <davazp@gmail.com>
Sat, 15 Dec 2012 00:02:26 +0000 (00:02 +0000)
lispstrack.lisp

index ba97bd6..c3b6642 100644 (file)
@@ -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)