From: Andrea Griffini <agriff@tin.it>
Date: Fri, 3 May 2013 21:34:20 +0000 (+0200)
Subject: bugfix for reading uninterned symbols in repl
X-Git-Url: http://repo.macrolet.net/gitweb/?a=commitdiff_plain;h=36d1f3d6b1b8fced7394f8bee8baeb5abd375211;p=jscl.git

bugfix for reading uninterned symbols in repl
---

diff --git a/src/compiler.lisp b/src/compiler.lisp
index aa2f821..e870dce 100644
--- a/src/compiler.lisp
+++ b/src/compiler.lisp
@@ -580,7 +580,7 @@
   #+jscl
   (let ((package (symbol-package symbol)))
     (if (null package)
-        (code "{name: " (dump-symbol (symbol-name symbol)) "}")
+        (code "{name: " (dump-string (symbol-name symbol)) "}")
         (ls-compile `(intern ,(symbol-name symbol) ,(package-name package))))))
 
 (defun dump-cons (cons)