(defun make-defstruct-allocation-function (name)
;; FIXME: Why don't we go class->layout->info == dd
(let ((dd (find-defstruct-description name)))
(defun make-defstruct-allocation-function (name)
;; FIXME: Why don't we go class->layout->info == dd
(let ((dd (find-defstruct-description name)))