(defmacro define-description (name &optional superdescriptions &body options)
(let ((description-name (defining-description name)))
(defmacro define-description (name &optional superdescriptions &body options)
(let ((description-name (defining-description name)))