Stas Boukarev

``` (pprint-logical-block (*standard-output* nil) (the stream *standard-output*)) #: Debugger invoked on condition of type TYPE-ERROR The value # is not of type STREAM. ```

SBCL internals changed

1

SBCL internals related to structures have changed, breaking cl-store, in particular, the struct-class.1 test.

read-char does not work at the repl

8

(read-char) immediately returns #\LINEFEED

Can't load cl-opengl/es2 from fasls if cl-opengl was previously compiled.

1

``` ./run-sbcl.sh --load ~/quicklisp/setup.lisp --eval '(ql:quickload "cl-opengl/es2")' ./run-sbcl.sh --load ~/quicklisp/setup.lisp --eval '(ql:quickload "cl-opengl")' ./run-sbcl.sh --load ~/quicklisp/setup.lisp --eval '(ql:quickload "cl-opengl/es2")' The function COMMON-LISP:NIL is undefined. ```

Adding a character macro on digits breaks #x

2

``` (let ((*readtable* (copy-readtable))) (set-macro-character #\1 (lambda (s char) 1) t) ;; just imagine a more complete reader (read-from-string "#x1")) ``` Eclector says "The character 1 is not a digit...

Custom #\( reader macro breaks #1=

1

``` (let ((*readtable* (copy-readtable))) (set-macro-character #\( (lambda (stream ignore) (declare (ignore ignore)) (loop for peek = (peek-char t stream t nil t) do (when (eq peek #\)) (read-char stream) (loop-finish))...

``` (declaim (declaration x)) (compile nil `(lambda (a) (declare (x a)) a)) ; caught STYLE-WARNING: ; STYLE-WARNING during compiler-macro-expansion: ; Undefined type X ; at unknown location ```

`(defstruct (s (:constructor make-s (&key a &aux (a (or a *))))) a) ` Unclear why it needs a warning, but it should be at most a style-warning.

Can't read #.(values ...)

1

``` Clozure Common Lisp Version 1.13 (v1.13-20-gcc834499) LinuxX8664 ? (funcall #.(compile nil `(lambda () ))) > Error: (# NIL NIL) can't be destructured against the lambda list (CCL::FORM &OPTIONAL CCL::NESTED-SOURCE-NOTES),...