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