From: KIMURA Koichi <kbk@...>
Date: 2005-11-06T05:16:51+09:00
Subject: [ruby-dev:27638] tcltkstub cause SEGV

木村です。

CVS HEADで、tcltkstubsを有効にしてコンパイルすると
require 'tk' したときにSEGVします(mswin32)。

tcltkstubsを有効にしなかったときにはSEGVしません。使用
しているTcl/TkはActiveTcl 8.4.10 です。また、同じ環境で
1.8.4-preview1ではtcltkstubsを有効にしても大丈夫でした。

ext/tk/stubs.c/_nativethread_consistency_check()の

    if (Tcl_Eval(ip, "set ::tcl_platform(threaded)") == TCL_OK) {

の行でSEGVが発生するところまでは突き止めたのですが、
この先までは追いかけられませんでした。調べた範囲では
DLLのハンドルは正しく取れているようでした。


-- 
木村浩一
  I thought what I'd do was, I'd pretend I was one of those deaf-mutes.
  mail kbk@kt.rim.or.jp
	web  www.kt.rim.or.jp/~kbk/index.html#zakkicho
	     homepage3.nifty.com/farstar/