[ruby-dev:3158] Re: experimental release 1.1b9_28

永井＠知能．九工大です．

>>>>> "M" == Takahiro Maebashi <[e-mail]> writes:
M>   def initialize
M>     @after = TkAfter.new(0, 1, proc {go})
M>   end

M>   def go
M>     game.nextgen
M>     update
M>     if @goflag
M>       @after.start
M>     end
M>   end
M> としてみたのですが、動かないのです。何か考え違いをしているでしょうか?

調べてみました．
これですと次のような理由で確かに動きません．

TkAfter では，callback 本体の実行の後に
次のループのための設定を行うようになってます．
上記の例の場合，callback 本体の実行の際に
start 設定を行いはするのですが，
その直後の次のループのための設定の際にこれがクリアされてしまい，
反復を継続することができなくなってしまっていました．

loop proc を設定せずに，init proc だけを用いるようにするという方針で
回避できるようにはしてみたのですが，処理が増えるので
ちょっとイヤかなという感じです．

＃ 上記のような方法は，従来の after メソッドを使えばいいだろうと
＃ 思っていたもので，ほとんど想定していませんでした．

修正を少なくということであれば，

def initialize
  @after = TkAfter.new(0, -1, proc {go})
end

def go
  game.nextgen
  update
  if @goflag && !@after.running?
    @after.start
  elsif !@goflag && @after.running?
    @after.stop
  end
end

というのでは駄目ですか？

-- 
                                         永井 秀利 （九工大 知能情報）
                                             [e-mail]