The reader will ignore expressiones prefixed with #+nil

diff --git a/src/read.lisp b/src/read.lisp
index 7b7518b..e2c5dfd 100644 (file)
--- 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)