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