X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fread.lisp;h=d513ef33f5a4b65211db0e5560714e6211a9973b;hb=54de4d4abbeb7f99e5f5702ad93e815cae7a0b3b;hp=d642be0c68d24e2724690f5d3dafb7c769a91c21;hpb=b8ba637d2f859227622422089345d29a3c46c3f7;p=jscl.git

diff --git a/src/read.lisp b/src/read.lisp
index d642be0..d513ef3 100644
--- a/src/read.lisp
+++ b/src/read.lisp
@@ -119,7 +119,7 @@
          ((string= feature "common-lisp")
           (ls-read-1 stream)              ;ignore
           (ls-read-1 stream))
-         ((string= feature "ecmalisp")
+         ((string= feature "jscl")
           (ls-read-1 stream))
          (t
           (error "Unknown reader form.")))))))
@@ -270,7 +270,7 @@
           (values (* sign value) index)
           (values nil index)))))
 
-#+ecmalisp
+#+jscl
 (defun parse-integer (string &key junk-allowed)
   (multiple-value-bind (num index)
       (!parse-integer string junk-allowed)