Modifying constructor for tree-list-tuple4 structures.
(change-tree-list-tuple4 x [:1st <1st>] [:2nd <2nd>] [:3rd <3rd>] [:4th <4th>])
This is an often useful alternative to make-tree-list-tuple4.
We construct a new tree-list-tuple4 structure that is a copy of
This is an ordinary
Macro:
(defmacro abnf::change-tree-list-tuple4 (abnf::x &rest args) (std::change-aggregate 'abnf::tree-list-tuple4 abnf::x args '((:1st . abnf::tree-list-tuple4->1st) (:2nd . abnf::tree-list-tuple4->2nd) (:3rd . abnf::tree-list-tuple4->3rd) (:4th . abnf::tree-list-tuple4->4th)) 'abnf::change-tree-list-tuple4 'nil))