Cause FUNCTION to be called whenever the reader reads DISP-CHAR followed by SUB-CHAR.
(sb-impl::disp-char sb-impl::sub-char function &optional sb-impl::rt-designator)