(obj-data-printer :type (or function null) :initform nil
:initarg :obj-data-printer
:accessor obj-data-printer)
(obj-data-printer :type (or function null) :initform nil
:initarg :obj-data-printer
:accessor obj-data-printer)
:initarg :obj-data-print-code
:accessor obj-data-print-code)
(obj-data-start-printer :type (or function string null) :initform nil
:initarg :obj-data-print-code
:accessor obj-data-print-code)
(obj-data-start-printer :type (or function string null) :initform nil