summaryrefslogtreecommitdiffstats
path: root/ext/tk
diff options
context:
space:
mode:
authorusa <usa@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>2005-03-04 07:15:12 +0000
committerusa <usa@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>2005-03-04 07:15:12 +0000
commitb4adf81a4b00182d8600544f00b9ba8cf0a20c24 (patch)
treeca18648c31e8b336e5ef2bd9166091ef0fb9f120 /ext/tk
parente1c4971ba67ac73c246712df28974119b7d45625 (diff)
downloadruby-b4adf81a4b00182d8600544f00b9ba8cf0a20c24.tar.gz
ruby-b4adf81a4b00182d8600544f00b9ba8cf0a20c24.tar.xz
ruby-b4adf81a4b00182d8600544f00b9ba8cf0a20c24.zip
* eval.c (rb_exec_recursive): matched the declaration to prototype.
* ext/curses/curses.c: don't need to check HAVE_WCOLOR_SET excluding window_color_set(). * ext/tk/tcltklib.c: fixed commit mistakes. git-svn-id: http://svn.ruby-lang.org/repos/ruby/trunk@8069 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'ext/tk')
-rw-r--r--ext/tk/tcltklib.c24
1 files changed, 0 insertions, 24 deletions
diff --git a/ext/tk/tcltklib.c b/ext/tk/tcltklib.c
index e713008c3..14e8199d8 100644
--- a/ext/tk/tcltklib.c
+++ b/ext/tk/tcltklib.c
@@ -4353,15 +4353,8 @@ delete_slaves(ip)
slave = Tcl_GetSlave(ip, slave_name);
if (slave == (Tcl_Interp*)NULL) continue;
-<<<<<<< tcltklib.c
- if (Tcl_Eval(ip, "info slaves") == TCL_ERROR) {
- DUMP2("ip(%lx) can't get a list of slave IPs", ip);
- return;
- }
-=======
/* call ip_finalize */
ip_finalize(slave);
->>>>>>> 1.3
Tcl_DeleteInterp(slave);
Tcl_Release(slave);
@@ -4493,12 +4486,6 @@ ip_replace_wait_commands(interp, mainWin)
(ClientData)mainWin, (Tcl_CmdDeleteProc *)NULL);
#endif
-<<<<<<< tcltklib.c
- /* security check */
- if (ruby_safe_level >= 4) {
- rb_raise(rb_eSecurityError, "can't create a TclTkIp object at level %d", ruby_safe_level);
- }
-=======
/* replace 'tkwait' command */
#if TCL_MAJOR_VERSION >= 8
DUMP1("Tcl_CreateObjCommand(\"tkwait\")");
@@ -4676,7 +4663,6 @@ ip_init(argc, argv, self)
"Cannot create a TclTkIp object at level %d",
ruby_safe_level);
}
->>>>>>> 1.3
/* create object */
Data_Get_Struct(self, struct tcltkip, ptr);
@@ -4869,16 +4855,6 @@ ip_create_slave_core(interp, argc, argv)
thr_crit_bup = rb_thread_critical;
rb_thread_critical = Qtrue;
-<<<<<<< tcltklib.c
- /* ip is deleted? */
- if (Tcl_InterpDeleted(master->ip)) {
- DUMP1("master-ip is deleted");
- rb_thread_critical = thr_crit_bup;
- rb_raise(rb_eRuntimeError, "deleted master can't create a new slave interpreter");
- }
-
-=======
->>>>>>> 1.3
/* create slave-ip */
slave->ref_count = 0;
slave->allow_ruby_exit = 0;