kotovalexarian-likes-github/ruby--ruby
1
0
Fork 0
mirror of https://github.com/ruby/ruby.git synced 2022-11-09 12:17:21 -05:00
Code Releases Activity

tcltklib.c : use RTEST()

Browse source 
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@4201 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
nagai 2003-07-29 01:45:33 +00:00
parent df33012935
commit b221254f6f
1 changed files with 5 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
ext/tcltklib/tcltklib.c
View file

@ -226,7 +226,7 @@ lib_mainloop_core(check_root_widget)
VALUE check_root_widget; VALUE check_root_widget;
{ {
VALUE current = eventloop_thread; VALUE current = eventloop_thread;
int check = (check_root_widget == Qtrue); int check = RTEST(check_root_widget);
int tick_counter; int tick_counter;
struct timeval t; struct timeval t;
@ -374,6 +374,7 @@ lib_watchdog_core(check_rootwidget)
VALUE evloop; VALUE evloop;
int prev_val = -1; int prev_val = -1;
int chance = 0; int chance = 0;
int check = RTEST(check_rootwidget);
struct timeval t0, t1; struct timeval t0, t1;
t0.tv_sec = (time_t)0; t0.tv_sec = (time_t)0;
@ -383,7 +384,7 @@ lib_watchdog_core(check_rootwidget)
/* check other watchdog thread */ /* check other watchdog thread */
if (watchdog_thread != 0) { if (watchdog_thread != 0) {
if (rb_funcall(watchdog_thread, rb_intern("stop?"), 0) == Qtrue) { if (RTEST(rb_funcall(watchdog_thread, rb_intern("stop?"), 0))) {
rb_funcall(watchdog_thread, rb_intern("kill"), 0); rb_funcall(watchdog_thread, rb_intern("kill"), 0);
} else { } else {
return Qnil; return Qnil;
@ -394,7 +395,7 @@ lib_watchdog_core(check_rootwidget)
/* watchdog start */ /* watchdog start */
do { do {
if (eventloop_thread == 0 || loop_counter == prev_val) { if (eventloop_thread == 0 || loop_counter == prev_val) {
if (rb_funcall(eventloop_thread, rb_intern("stop?"), 0) == Qtrue if (RTEST(rb_funcall(eventloop_thread, rb_intern("stop?"), 0))
&& ++chance >= 3) { && ++chance >= 3) {
/* start new eventloop thread */ /* start new eventloop thread */
DUMP2("eventloop thread %lx is sleeping or dead", DUMP2("eventloop thread %lx is sleeping or dead",
@ -416,7 +417,7 @@ lib_watchdog_core(check_rootwidget)
} }
/* rb_thread_schedule(); */ /* rb_thread_schedule(); */
} }
} while(!(check_rootwidget == Qtrue) || Tk_GetNumMainWindows() != 0); } while(!check || Tk_GetNumMainWindows() != 0);
return Qnil; return Qnil;
} }