Basic constructor macro for vl-elabkey-index structures.
(make-vl-elabkey-index [:val <val>])
This is the usual way to construct vl-elabkey-index structures. It simply conses together a structure with the specified fields.
This macro generates a new vl-elabkey-index structure from scratch. See also change-vl-elabkey-index, which can "change" an existing structure, instead.
This is an ordinary
Macro:
(defmacro make-vl-elabkey-index (&rest args) (std::make-aggregate 'vl-elabkey-index args '((:val)) 'make-vl-elabkey-index nil))
Function:
(defun vl-elabkey-index (val) (declare (xargs :guard (integerp val))) (declare (xargs :guard t)) (let ((__function__ 'vl-elabkey-index)) (declare (ignorable __function__)) (b* ((val (mbe :logic (ifix val) :exec val))) (hons :index val))))