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