X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fprint.lisp;h=8cb36bd2db7092f5aff371de226b9ac95355571c;hb=9a76035e648e67afaa118107fe86deaa0d85527f;hp=17c46938a775f9f657e16d2d80a16e3ebdb3aa07;hpb=852666e17ad12f114ab5bb05a9d5ff065f8d72ff;p=jscl.git diff --git a/src/print.lisp b/src/print.lisp index 17c4693..8cb36bd 100644 --- a/src/print.lisp +++ b/src/print.lisp @@ -283,7 +283,7 @@ ((char= next #\~) (concatf res "~")) ((char= next #\%) - (concatf res *newline*)) + (concatf res (string #\newline))) ((char= next #\*) (pop arguments)) (t