diff options
author | ocean <ocean@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2005-11-06 12:48:43 +0000 |
---|---|---|
committer | ocean <ocean@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2005-11-06 12:48:43 +0000 |
commit | 38122d266363dd3177d8fd44c902f62ae730990c (patch) | |
tree | 46cdca6a62aeabab789bba9d5ae5e2084ca1a738 /ext/tk | |
parent | dedb199313d9cd1e53d1f629cf58145e3335152a (diff) | |
download | ruby-38122d266363dd3177d8fd44c902f62ae730990c.tar.gz ruby-38122d266363dd3177d8fd44c902f62ae730990c.tar.xz ruby-38122d266363dd3177d8fd44c902f62ae730990c.zip |
* ext/tk/stubs.c (ruby_tcl_create_ip_and_stubs_init): should touch
interpreter after initialization is done. [ruby-dev:27638]
git-svn-id: http://svn.ruby-lang.org/repos/ruby/trunk@9507 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'ext/tk')
-rw-r--r-- | ext/tk/stubs.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/ext/tk/stubs.c b/ext/tk/stubs.c index 050333cf6..3fb3e5f2f 100644 --- a/ext/tk/stubs.c +++ b/ext/tk/stubs.c @@ -237,14 +237,14 @@ ruby_tcl_create_ip_and_stubs_init(st) return (Tcl_Interp*)NULL; } - _nativethread_consistency_check(tcl_ip); - if (!Tcl_InitStubs(tcl_ip, "8.1", 0)) { if (st) *st = FAIL_Tcl_InitStubs; (*p_Tcl_DeleteInterp)(tcl_ip); return (Tcl_Interp*)NULL; } + _nativethread_consistency_check(tcl_ip); + return tcl_ip; } } |