Modifying constructor for pnumber-number-upcase-e-sign structures.
(change-pnumber-number-upcase-e-sign x
[:number <number>]
[:sign <sign>])
This is an often useful alternative to make-pnumber-number-upcase-e-sign.
We construct a new pnumber-number-upcase-e-sign structure that is a copy of
This is an ordinary
Macro:
(defmacro change-pnumber-number-upcase-e-sign (x &rest args) (std::change-aggregate 'pnumber-number-upcase-e-sign x args '((:number . pnumber-number-upcase-e-sign->number) (:sign . pnumber-number-upcase-e-sign->sign)) 'change-pnumber-number-upcase-e-sign 'nil))