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