This commit was manufactured by cvs2svn to create tag

'v1_3_1_990210'.

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/tags/v1_3_1_990210@399 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

1 files changed, 13 insertions, 11 deletions

diff --git a/process.c b/process.c
index d3e6559ca3..3318e556c2 100644
--- a/process.c
+++ b/process.c
@@ -6,7 +6,7 @@
   $Date$
   created at: Tue Aug 10 14:30:50 JST 1993
 
-  Copyright (C) 1993-1998 Yukihiro Matsumoto
+  Copyright (C) 1993-1999 Yukihiro Matsumoto
 
 ************************************************/
 
@@ -138,7 +138,7 @@ rb_waitpid(pid, flags, st)
 	    pid_tbl = st_init_numtable();
 	st_insert(pid_tbl, pid, st);
 #ifdef USE_THREAD
-	if (!thread_alone()) rb_thread_schedule();
+	if (!rb_thread_alone()) rb_thread_schedule();
 #endif
     }
 #endif
@@ -521,7 +521,7 @@ static VALUE
 rb_f_fork(obj)
     VALUE obj;
 {
-#if !defined(__human68k__)
+#if !defined(__human68k__) && !defined(__MACOS__)
     int pid;
 
     rb_secure(2);
@@ -670,7 +670,10 @@ rb_f_system(argc, argv)
     rb_last_status = state == -1 ? INT2FIX(127) : INT2FIX(state);
     return state == 0 ? Qtrue : Qfalse ;
 #else
-    volatile VALUE prog = 0;
+#if defined(USE_CWGUSI)
+    rb_notimplement();
+#else
+   volatile VALUE prog = 0;
     int pid;
     int i;
 
@@ -725,9 +728,10 @@ rb_f_system(argc, argv)
 
     if (rb_last_status == INT2FIX(0)) return Qtrue;
     return Qfalse;
-#endif
-#endif
-#endif
+#endif /* USE_CWGUSI */
+#endif /* __human68k__ */
+#endif /* DJGPP */
+#endif /* NT */
 }
 
 static VALUE
@@ -1032,13 +1036,11 @@ Init_process()
 #ifndef USE_CWGUSI
     rb_define_global_function("exec", rb_f_exec, -1);
 #endif
-#if !defined(NT) && !defined(USE_CWGUSI)
+#if !defined(NT)
     rb_define_global_function("fork", rb_f_fork, 0);
 #endif
     rb_define_global_function("exit!", rb_f_exit_bang, 1);
-#ifndef USE_CWGUSI
     rb_define_global_function("system", rb_f_system, -1);
-#endif
     rb_define_global_function("sleep", rb_f_sleep, -1);
 
     rb_mProcess = rb_define_module("Process");
@@ -1056,7 +1058,7 @@ Init_process()
 #endif
 #endif
 
-#if !defined(NT) && !defined(USE_CWGUSI)
+#if !defined(NT)
     rb_define_singleton_method(rb_mProcess, "fork", rb_f_fork, 0);
 #endif
     rb_define_singleton_method(rb_mProcess, "exit!", rb_f_exit_bang, 1);