summaryrefslogtreecommitdiff
path: root/ext/tcltklib
diff options
context:
space:
mode:
authornagai <nagai@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>2005-03-06 15:03:42 +0000
committernagai <nagai@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>2005-03-06 15:03:42 +0000
commit1ee1686497fbc2bc457227a0079a32b2447a77dc (patch)
treee64fdffb55266df01657a4cb605de06d40b4cee0 /ext/tcltklib
parent5e4004fa1d3b4a045c8492fd37812c6103dcc68a (diff)
* ext/tcltklib/tcltklib.c: fail to call TclTkLib.mainloop when $SAFE==4
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/branches/ruby_1_8@8092 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'ext/tcltklib')
-rw-r--r--ext/tcltklib/tcltklib.c1
1 files changed, 1 insertions, 0 deletions
diff --git a/ext/tcltklib/tcltklib.c b/ext/tcltklib/tcltklib.c
index ff374b07d4..aae7ac5486 100644
--- a/ext/tcltklib/tcltklib.c
+++ b/ext/tcltklib/tcltklib.c
@@ -8394,6 +8394,7 @@ Init_tcltklib()
#define DEFAULT_EVENTLOOP_DEPTH 7
#endif
eventloop_stack = rb_ary_new2(DEFAULT_EVENTLOOP_DEPTH);
+ OBJ_TAINT(eventloop_stack);
watchdog_thread = Qnil;