[ruby-dev:13983] Re: [REQ] ruby_stop without exit

なかだです。

At Fri, 20 Jul 2001 11:47:25 +0900,
Nobuyoshi-Nakada wrote:
>   ruby_stop()を呼んでいるところはあと二ヶ所あります。eval.cの
> rb_thread_start_0()でmain_threadが終了したところと、process.cの
> rb_f_fork()で子プロセスに渡されたブロックが終了したところ。fork
> の方はそのままexitしてよいと思うんですが、前者の方はどうすべき
> なんでしょうか。単純にexit()してしまってはTietewさんの目的に合
> わないだろうし、終了したスレッドにreturnしても意味がなさそうだ
> し、rb_exit()でいいのかな。

  やっぱりこんなところでしょうね。[ruby-dev:13943]からのパッチ
です。


Index: eval.c
===================================================================
RCS file: /cvs/ruby/src/ruby/eval.c,v
retrieving revision 1.194
diff -u -2 -p -r1.194 eval.c
--- eval.c	2001/07/18 05:55:20	1.194
+++ eval.c	2001/07/20 15:13:24
@@ -8311,5 +8312,5 @@ rb_thread_start_0(fn, arg, th_arg)
     status = th->status;
 
-    if (th == main_thread) ruby_stop(state);
+    if (th == main_thread) rb_exit(ruby_stop(state));
     rb_thread_remove(th);
 
Index: process.c
===================================================================
RCS file: /cvs/ruby/src/ruby/process.c,v
retrieving revision 1.36
diff -u -2 -p -r1.36 process.c
--- process.c	2001/05/21 04:22:54	1.36
+++ process.c	2001/07/20 02:46:43
@@ -763,5 +771,5 @@ rb_f_fork(obj)
 
 	    rb_protect(rb_yield, Qnil, &status);
-	    ruby_stop(status);
+	    exit(ruby_stop(status));
 	}
 	return Qnil;
Index: ruby.h
===================================================================
RCS file: /cvs/ruby/src/ruby/ruby.h,v
retrieving revision 1.51
diff -u -2 -p -r1.51 ruby.h
--- ruby.h	2001/07/19 02:46:28	1.51
+++ ruby.h	2001/07/20 08:25:26
@@ -500,5 +500,5 @@ VALUE rb_require _((const char*));
 void ruby_init _((void));
 void ruby_options _((int, char**));
-void ruby_run _((void));
+NORETURN(void ruby_run _((void)));
 
 EXTERN VALUE rb_mKernel;


-- 
--- 僕の前にBugはない。
--- 僕の後ろにBugはできる。
    中田 伸悦