Orz日記 by Akio Morita

_ [SAD]\$Immediate = 0で Class.nの定義が失敗する

Class生成子のdelegator

 (c1_ = Class[parents_,classv_,instv_,
   CompoundExpression[me__]])^:=(
     c1 = Class[parents,classv,instv,{me}]);

の定義時に、シンボルCompoundExpressionが CompoundExpressionオペレータに還元されていないために、 Class[{...}, {...}, {...}, foo[...]:=bar; zoo[...]:=...]とのマッチングに 失敗し、別のdelegator経由で Class[{...}, {...}, {...}, {foo[...]:=bar; zoo[...]:=...}]が評価される (c1_ = Class[parents_,classv_,instv_, me___]の meに CompoundExpression[]全体がマッチするため)

シンボルCompoundExpressionをWithで評価しておけば、 Class[]の第4引数がCompoundExpressionオペレータ式の delegatorを定義できる。