From: Tanaka Akira <akr@...17n.org>
Date: 2002-09-22T01:03:59+09:00
Subject: [ruby-dev:18335] Re: rubicon on EWS4800

In article <20020921.152641.11483667.JCA02266@nifty.ne.jp>,
  Koji Arai <JCA02266@nifty.ne.jp> writes:

> $B$3$l$O!"(BSolaris $B$HF1$8BP=h$r$9$k$3$H$GDL$j$^$7$?!#(B
> 
> |   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
> 
> $B$N(B Solaris.only/dont $B$N$H$3$G$9!#(B

$B$3$NBP=h$O;d$,(B Solaris $B$rNc$K$"$2$FMW5a$7$?$s$G$9$,!"=q$-J}$,0-$+$C$?(B
$B$;$$$+(B Unix generic $B$JLdBj$HEA$o$i$J$/$F!"$=$s$J$+$s$8$N>l9g$o$1$K$J$C(B
$B$F$$$^$9!#(Btail call optimization $B$r$9$k(B /bin/sh $B$J$iLdBj$J$$$s$G$9$,!#(B

$B0JA0!"IQHK$K(B Rubicon $B$rF0$+$7$F$$$?;~$K$O<!$N$h$&$J%Q%C%A$rEv$F$F$d$C(B
$B$F$^$7$?!#(B

thread $B$O(B... $B$J$s$@$C$?$+$J!#$3$l$rF~$l$H$+$J$$$H;~!9<:GT$7$F$$$?3P$((B
$B$,$"$j$^$9!#(B

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)
-- 
[$BEDCf(B $BE/(B][$B$?$J$+(B $B$"$-$i(B][Tanaka Akira]
$B!V$U$($m(B! $B$o$+$a$A$c$s:n@o$G$9$(C"=$B!W(B(Little Worker, $B7KM7@84](B)