[ruby-dev:18335] Re: rubicon on EWS4800

In article <[e-mail]>,
  Koji Arai <[e-mail]> writes:

> これは、Solaris と同じ対処をすることで通りました。
> 
> |   def test_pid
> |     assert_nil($stdin.pid)
> |     pipe = nil
> |     Solaris.only do
> | 	pipe = IO.popen("exec #$interpreter -e 'p $$'", "r")
> |     end
> |     Solaris.dont do
> | 	pipe = IO.popen("#$interpreter -e 'p $$'", "r")
> |     end
> 
> の Solaris.only/dont のとこです。

この対処は私が Solaris を例にあげて要求したんですが、書き方が悪かった
せいか Unix generic な問題と伝わらなくて、そんなかんじの場合わけになっ
ています。tail call optimization をする /bin/sh なら問題ないんですが。

以前、頻繁に Rubicon を動かしていた時には次のようなパッチを当ててやっ
てました。

thread は... なんだったかな。これを入れとかないと時々失敗していた覚え
があります。

Index: builtin/TestIO.rb
===================================================================
RCS file: /ruby/rubicon/builtin/TestIO.rb,v
retrieving revision 1.31
diff -u -r1.31 TestIO.rb
--- builtin/TestIO.rb	2002/03/25 15:03:15	1.31
+++ builtin/TestIO.rb	2002/09/21 15:57:24
@@ -620,10 +620,10 @@
   def test_pid
     assert_nil($stdin.pid)
     pipe = nil
-    Solaris.only do
+    MsWin32.dont do
       pipe = IO.popen("exec #$interpreter -e 'p $$'", "r")
     end
-    Solaris.dont do
+    MsWin32.only do
       pipe = IO.popen("#$interpreter -e 'p $$'", "r")
     end
 
Index: builtin/TestThreadGroup.rb
===================================================================
RCS file: /ruby/rubicon/builtin/TestThreadGroup.rb,v
retrieving revision 1.5
diff -u -r1.5 TestThreadGroup.rb
--- builtin/TestThreadGroup.rb	2001/11/15 03:54:59	1.5
+++ builtin/TestThreadGroup.rb	2002/09/21 15:57:24
@@ -22,7 +22,9 @@
   def test_list
     tg = ThreadGroup.new
     10.times do
+      Thread.critical = true
       t = Thread.new { Thread.stop }
+      Thread.critical = false
       tg.add(t)
     end
     assert_equals(10, tg.list.length)
-- 
[田中 哲][たなか あきら][Tanaka Akira]
「ふえろ! わかめちゃん作戦です$(C⊇」(Little Worker, 桂遊生丸)