readtable
(readtablep object)
readtables
*readtable
*readtable*
(defun scheme-read (&optional (stream *standard-input*)) (let ((*readtable* *scheme-readtable*)) (read stream nil eof)))
(copy-readtable &optional (from-readtable *readtable*) to-readtable)
(readtable-case readtable)
(babel:set-sharp-backslash-syntax-in-readtable)