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