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 change-tree-list-tuple10 (x &rest args) (std::change-aggregate 'tree-list-tuple10 x args '((:1st . tree-list-tuple10->1st) (:2nd . tree-list-tuple10->2nd) (:3rd . tree-list-tuple10->3rd) (:4th . tree-list-tuple10->4th) (:5th . tree-list-tuple10->5th) (:6th . tree-list-tuple10->6th) (:7th . tree-list-tuple10->7th) (:8th . tree-list-tuple10->8th) (:9th . tree-list-tuple10->9th) (:10th . tree-list-tuple10->10th)) 'change-tree-list-tuple10 'nil))