Readtables and prin1

[Timothy.Freeman@theory.cs.cmu.edu]

When prin1 is used to print something out, should it look at the current
value of *readtable* and produce text that can be read in assuming that
readtable is in effect, or should it produce text that can be read in with
the standard readtable?  The manual says the following about the
*print-escape* flag:
   "When this flag is not nil, then an attempt is made to print an
    expression in such a way that it can be read again to produce an equal
    structure."
(page 370, near the bottom)

Maybe Common Lisp needs a *print-readtable* variable that is analogous to
the *print-base* variable.