Documentation strings in defstruct

[Alan Bawden <ALAN at MIT-MC>]

    Date: Sunday, 3 October 1982  14:03-EDT
    From: Scott E. Fahlman <Fahlman at Cmu-20c>

    Gary Brown noticed that DEFMACRO and DEFSTRUCT are not documented as
    taking documentation strings.  DEFMACRO certainly should, since its form
    parallels that of DEFUN, and adding this to DEFSTRUCT seems to be a good
    idea as well.  Any problems with this?

How about:

(defstruct (spaceman (:include person)
		     (:documentation "A spaceman.
The definition of a spaceman includes the definition of a person.
Additionally a spaceman has a helmit-size and a favorite-beverage.
The default favorite-beverage is Tang (tm)."))
  helmet-size
  (favorite-beverage 'tang))