Re: list, vectors, and stucts



Oops, forgot to post my updated macro code, sorry:

(defmacro make-initialized-array (specifications &rest values)
"Make an array to hold the values specified."
(let ((num (length values))
(var (gensym)))
`(let ((,var (make-array ,num ,@specifications)))
(setf ,@(loop for v in values
for i from 0
append (list `(aref ,var ,i) v)))
,var)))

.