[cells-devel] Re: [cello-devel] Constructor syntax

Thomas F. Burdick tfb at OCF.Berkeley.EDU
Tue May 11 22:58:00 UTC 2004

Thomas F. Burdick writes:
 >   (let ((slot-value (etypecase slot-c
 >                       (null (bd-slot-value self slot-spec))
 >                       (c-variable (c-value slot-c))
 >                       (c-ruled (c-ruled-slot-value slot-c)))))
 >     (format *debug-io* "slot ~S of ~S is ~S" self slot-spec slot-value)
 >     (when (eql slot-value +unbound+)
 >       (error 'unbound-cell :instance self :name slot-spec))

*sigh* I thought I'd gotten all my debugging notes out of there.

More information about the cello-devel mailing list