(define-macro (my-or a b) `((lambda (x y) (if x x y)) ,a ,b))

>>524 こうですか？　副作用に対してはより良いと思いますが、関数化した時lambdaが二重になって連続使用した時嬉しくないと思います。

>>525 仕様が中途半端という点、gensymのプレフィックスがないこと以外で何か不都合の起きる文があれば知りたいです。それともgensym名の変数は込み入った文や副作用でセットすることが多く、最初に全てのシンボルに値を入れられると不便ということでしょうか？
　ネストが一つ減る程度の関数は不要ですか？