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