no documentation method specializing on condition-direct-slot-definition

[Russell Sim]

There is no documentation method specializing on SB-PCL::CONDITION-DIRECT-SLOT-DEFINITION

as shown in this warning.

WARNING:
   unsupported DOCUMENTATION: doc-type T for object of type SB-PCL::CONDITION-DIRECT-SLOT-DEFINITION

I am aware that there is no explicit mention of this in the hyperspec http://www.lispworks.com/documentation/HyperSpec/Body/f_docume.htm#documentation

But condition slot options do have a documentation field http://www.lispworks.com/documentation/HyperSpec/Body/m_defi_5.htm#define-condition so it seems reasonable to assume that it should be exposed.

Given that, I would expect that the following would work

(define-condition my-error (simple-error)
  ((message :documentation "SNAFU")))

CL> (documentation (car (class-direct-slots (find-class 'my-error))) t)
"SNAFU"