[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

non-standard printing



CC: (BUG LISPM) at MIT-AI

Two suggestions:

The wrong way- save the function definition of PRIN1 in a way that can't fail:
  (and (not (fboundp 'original-prin1)) (fset 'original-prin1 (fsymeval 'prin1)))
then redefine PRIN1 and don't use the value cell of PRIN1.

The right way- make your structures named-structures (see DEFSTRUCT in the manual)
or flavor instances (see the file LMMAN;FLAVOR) so you can control how they print
and stop redefining PRIN1.