This is in SBCL 1.0.12. If I do a defun (setf foo) with a docstring,
the docstring "should" (for reasonable values of should) be available
via a call to (documentation 'foo 'setf) but it is not. Observe.
> This is SBCL 1.0.12, an implementation of ANSI Common Lisp.
> More information about SBCL is available at <http://www.sbcl.org/>.
> SBCL is free software, provided as is, with absolutely no warranty.
> It is mostly in the public domain; some portions are provided under
> BSD-style licenses. See the CREDITS and COPYING files in the
> distribution for more information.
> ; loading preferences for asdf-binary-locations/load-op from
> ; /Users/gwking/.asdf/asdf-binary-locations.lisp
> * (defun foo () "foo is better than bread" 2)
> * (documentation 'foo 'function)
> "foo is better than bread"
> * (defun (setf foo) (x) "foo is better than bread" x)
> (SETF FOO)
> * (documentation 'foo 'setf)
Gary Warren King, metabang.com
Cell: (413) 559 8738
Fax: (206) 338-4052
gwkkwg on Skype * garethsan on AIM