Basic constructor macro for long-array structures.
(make-long-array [:components <components>])
This is the usual way to construct long-array structures. It simply conses together a structure with the specified fields.
This macro generates a new long-array structure from scratch. See also change-long-array, which can "change" an existing structure, instead.
This is an ordinary
Macro:
(defmacro make-long-array (&rest args) (std::make-aggregate 'long-array args '((:components)) 'make-long-array nil))
Function:
(defun long-array (components) (declare (xargs :guard (long-value-listp components))) (declare (xargs :guard (< (len components) (expt 2 31)))) (let ((__function__ 'long-array)) (declare (ignorable __function__)) (b* ((components (mbe :logic (long-value-list-fix components) :exec components))) (let ((components (mbe :logic (if (< (len components) (expt 2 31)) components nil) :exec components))) (cons :long-array (list components))))))