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