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