(handler-bind ((sb-int:standard-readtable-modified-error #'continue))
(let ((fun (lambda (&rest args) 'ok)))
;; NIL means the standard readtable.
(handler-bind ((sb-int:standard-readtable-modified-error #'continue))
(let ((fun (lambda (&rest args) 'ok)))
;; NIL means the standard readtable.