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