[ruby-dev:26747] Re: TkCheckbutton#variable as getter?

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

From: H.Yamamoto <[e-mail]>
Subject: [ruby-dev:26745] TkCheckbutton#variable as getter?
Date: Fri, 5 Aug 2005 10:46:50 +0900
Message-ID: <[e-mail]>
> tile/demo.rb を書いているときに引っかかったのですが、
> TkCheckbutton などから variable を取得する簡便な方法が
> ないようです。下のようにしたかったのですが、どうも TkCheckbutton#variable は
> setter としてだけ働いているようで、引数の数があわないというエラーになりました。

確かに TkCheckbutton#variable は getter としては使えなくなってて，
TkCheckbutton#[] あたりを使わざるをえなくなってますね．
末尾に添えたパッチで OK だと思います．
tk_trace_variable() は現在ではダミー化してますので，
この variable() の定義自体を消してしまうというのでもいいのですが，
互換性のための念には念をの安全策で残すようにしてます．
variable= をわざわざ定義して，variable(v) を呼ぶようにしているのも
そのためです．

From: H.Yamamoto <[e-mail]>
Subject: [ruby-dev:26746] Re: TkCheckbutton#variable as getter?
Date: Fri, 5 Aug 2005 11:24:25 +0900
Message-ID: <[e-mail]>
> 一応 TkRadiobutton の定義されているファイルは見たのですが、def variant(hoge) という
> ものだけが定義されているのに c1.variable = （代入）は動いていたりとよくわからなかった
> ので、パッチは作りませんでした。

この辺りは method_missing の機構を使ってます．
呼ばれた method が存在しない場合，ウィジェット属性の操作要求
であるとみなして処理します．つまり，

 (1) hoge=(v) : 属性 hoge の値を v に設定 (configure('hoge', v))
                Ruby 自体の仕組みにより v が返る．

 (2) hoge(v)  : 属性 hoge の値を v に設定 (configure('hoge', v))
                self を返す．
  
 (3) hoge     : 属性 hoge の値を参照．

というわけです．
今回のケースでは variable が定義されていたために
(2), (3) ではその定義された variable() を呼び出し，
variable= は定義されていなかったために (1) の仕組みで
属性設定が行われていたということになります．

Index: ext/tk/lib/tk/radiobutton.rb
===================================================================
RCS file: /var/cvs/src/ruby/ext/tk/lib/tk/radiobutton.rb,v
retrieving revision 1.1.2.4
diff -u -r1.1.2.4 radiobutton.rb
--- ext/tk/lib/tk/radiobutton.rb	8 Dec 2004 18:13:37 -0000	1.1.2.4
+++ ext/tk/lib/tk/radiobutton.rb	5 Aug 2005 03:56:13 -0000
@@ -25,8 +25,16 @@
     tk_send_without_enc('select')
     self
   end
-  def variable(v)
-    configure 'variable', tk_trace_variable(v)
+
+  def variable(v = nil)
+    if v
+      configure 'variable', tk_trace_variable(v)
+    else
+      cget('variable')
+    end
+  end
+  def variable=(v)
+    variable(v)
   end
 
   def get_value

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