From: David Vazquez <davazp@gmail.com>
Date: Thu, 20 Dec 2012 19:09:16 +0000 (+0000)
Subject: Use *newline* instead of literal strings
X-Git-Url: http://repo.macrolet.net/gitweb/?a=commitdiff_plain;h=154edd7cdae01fd0bd3ebcea05ebc6730f5ee8dd;p=jscl.git

Use *newline* instead of literal strings
---

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