(declare (ignore environment))
(if (member :sb-xc-host *features*)
;; we're still building the cross-compiler, so use the host's
(declare (ignore environment))
(if (member :sb-xc-host *features*)
;; we're still building the cross-compiler, so use the host's
;; target's MAKE-LOAD-FORM-SAVING-SLOTS; it would be nice to
;; share code with that if possible. -- CSR, 2002-05-30
(if slot-names
;; target's MAKE-LOAD-FORM-SAVING-SLOTS; it would be nice to
;; share code with that if possible. -- CSR, 2002-05-30
(if slot-names