On page 307 defstruct syntax is defined as
defstruct name-and-options [doc-string] {slot-description}+
we believe it should be
defstruct name-and-options [doc-string] {slot-description}*
since it is perfectly reasonable to have
(defstruct (foo (:include bar (x 33))))
to make foo be like bar but have a different initial value for x.
ken kahn & danny bobrow