ruby-dev

山本です。

>> 試した限りでは落ちなくなったようです。ただ、multi-ip の
>> サンプルがうまく動いていないようでした。
>
>これについてはオオボケをかましてました．
>その修正 + α を行いましたのでお試し頂ければ幸いです．
>CVS HEAD からの差分になってます．

お疲れ様です。直ったようです。

>> でメニューから終了すると、画面中央に一瞬何かのウィンドウが表示される
>> ことがあります。すぐ閉じるので、なんて書いてあるのかは読めません。
>
>こちらについても少しは対策してみたつもりですが，
>問題の現象を手元で再現できないため，確信が持てません．
>結果を報告頂けますと助かります．

こちらは依然として表示されます。ですが、ip_ruby_eval などで SystemExit の
時に返す値を、TCL_ERROR ではなく、他の値（TCL_OK や TCL_RETURN）
にすると表示されないことがわかりました。

[ruby-dev:25663] ならば下のパッチで表示されなくなります。

--- d:\shell\Desktop\tcltklib.c Wed Feb  9 18:24:48 2005
+++ e:\ruby-cvs\ruby\ext\tk\tcltklib.c  Wed Feb  9 19:50:05 2005
@@ -1707,7 +1707,7 @@ ip_ruby_eval(clientData, interp, argc, a
         } else if (eclass == rb_eSystemExit) {
             ip_set_exc_message(interp, res);
             rbtk_pending_exception = res;
-            return TCL_ERROR;
+            return TCL_RETURN;

 #if 0
             thr_crit_bup = rb_thread_critical;
@@ -2168,7 +2168,7 @@ ip_ruby_cmd(clientData, interp, argc, ar
             rbtk_pending_exception = rb_exc_new2(rb_eSystemExit,
                                                  interp->result);
 #endif
-            return TCL_ERROR;
+            return TCL_RETURN;
 #endif
         } else if (rb_obj_is_kind_of(res, eLocalJumpError)) {
             VALUE reason = rb_ivar_get(res, ID_at_reason);