From: David Vázquez <davazp@gmail.com>
Date: Sat, 4 May 2013 16:07:46 +0000 (+0100)
Subject: The reader will ignore expressiones prefixed with #+nil
X-Git-Url: http://repo.macrolet.net/gitweb/?a=commitdiff_plain;h=04801719d1bfb6183c241c859b574ab66d91a481;p=jscl.git

The reader will ignore expressiones prefixed with #+nil
---

diff --git a/src/read.lisp b/src/read.lisp
index 7b7518b..e2c5dfd 100644
--- a/src/read.lisp
+++ b/src/read.lisp
@@ -170,6 +170,9 @@
           (ls-read stream)
           (ls-read stream eof-error-p eof-value))
          (:jscl
+          (ls-read stream eof-error-p eof-value))
+         (:nil
+          (ls-read stream)
           (ls-read stream eof-error-p eof-value)))))))
 
 (defun unescape-token (x)