RosettaCodeData/Task/Multiple-distinct-objects/Common-Lisp/multiple-distinct-objects-1.lisp

(make-list n :initial-element (make-the-distinct-thing))
(make-array n :initial-element (make-the-distinct-thing))