mame	2009-01-16 02:27:31 +0900 (Fri, 16 Jan 2009)

  New Revision: 21582

  http://svn.ruby-lang.org/cgi-bin/viewvc.cgi?view=rev&revision=21582

  Log:
    * thread.c (rb_thread_execute_interrupts): if signal is already
      buffered, main thread should wait until timer thread delivers it.
    * thread.c (timer_thread_function): should defer delivery of a signal
      if main thread does not yet trap a previous one.  [ruby-dev:37676]

  Modified files:
    trunk/ChangeLog
    trunk/thread.c

Index: ChangeLog
===================================================================
--- ChangeLog	(revision 21581)
+++ ChangeLog	(revision 21582)
@@ -1,3 +1,11 @@
+Fri Jan 16 02:25:46 2009  Yusuke Endoh  <mame@t...>
+
+	* thread.c (rb_thread_execute_interrupts): if signal is already
+	  buffered, main thread should wait until timer thread delivers it.
+
+	* thread.c (timer_thread_function): should defer delivery of a signal
+	  if main thread does not yet trap a previous one.  [ruby-dev:37676]
+
 Fri Jan 16 02:05:55 2009  Tanaka Akira  <akr@f...>
 
 	* ext/socket/socket.c (addrinfo_s_ip): new method AddrInfo.ip.
Index: thread.c
===================================================================
--- thread.c	(revision 21581)
+++ thread.c	(revision 21582)
@@ -1179,6 +1179,10 @@
 void
 rb_thread_execute_interrupts(rb_thread_t *th)
 {
+    if (GET_VM()->main_thread == th) {
+	while (rb_signal_buff_size() && !th->exec_signal) native_thread_yield();
+    }
+
     if (th->raised_flag) return;
 
     while (th->interrupt_flag) {
@@ -2518,13 +2522,14 @@
 {
     rb_vm_t *vm = GET_VM(); /* TODO: fix me for Multi-VM */
     int sig;
+    rb_thread_t *mth;
 
     /* for time slice */
     RUBY_VM_SET_TIMER_INTERRUPT(vm->running_thread);
 
     /* check signal */
-    if ((sig = rb_get_next_signal()) > 0) {
-	rb_thread_t *mth = vm->main_thread;
+    mth = vm->main_thread;
+    if (!mth->exec_signal && (sig = rb_get_next_signal()) > 0) {
 	enum rb_thread_status prev_status = mth->status;
 	thread_debug("main_thread: %s, sig: %d\n",
 		     thread_status_name(prev_status), sig);

--
ML: ruby-changes@q...
Info: http://www.atdot.net/~ko1/quickml/