X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=test.lisp;h=1ab9640aaea3e6394a566404211beb66c8711866;hb=154edd7cdae01fd0bd3ebcea05ebc6730f5ee8dd;hp=3676a9116601d8750620c9d86a3c97cc7bbcd579;hpb=e8a034b49431197ff7bf5707a2b364e6c2f4944c;p=jscl.git

diff --git a/test.lisp b/test.lisp
index 3676a91..1ab9640 100644
--- a/test.lisp
+++ b/test.lisp
@@ -516,8 +516,8 @@
    (remove nil (mapcar (lambda (x)
                          (ls-compile x env fenv))
                        sexps))
-                 ";
-"))
+   (concat ";" *newline*)))
+
 (defmacro define-compilation (name args &rest body)
   ;; Creates a new primitive `name' with parameters args and
   ;; @body. The body can access to the local environment through the