From 6758fabef3e42b9827e426caeb48012142e789e0 Mon Sep 17 00:00:00 2001
From: "(no author)" <(no author)@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Tue, 4 Jan 2005 17:38:41 +0000
Subject: This commit was manufactured by cvs2svn to create branch 'ruby_1_8'.

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/branches/ruby_1_8@7724 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 test/drb/ignore_test_drb.rb |  24 +++++++++
 test/ruby/test_rand.rb      | 124 ++++++++++++++++++++++++++++++++++++++++++++
 2 files changed, 148 insertions(+)
 create mode 100644 test/drb/ignore_test_drb.rb
 create mode 100644 test/ruby/test_rand.rb

(limited to 'test')

diff --git a/test/drb/ignore_test_drb.rb b/test/drb/ignore_test_drb.rb
new file mode 100644
index 0000000000..d0bb1f49b0
--- /dev/null
+++ b/test/drb/ignore_test_drb.rb
@@ -0,0 +1,24 @@
+require 'drbtest'
+
+class TestDRbReusePort < Test::Unit::TestCase
+  include DRbAry
+
+  def setup
+    @ext = DRbService.ext_service('ut_port.rb')
+    @there = @ext.front
+  end
+
+  def teardown
+    return unless @ext
+    @ext.stop_service
+    while true
+      sleep 0.1
+      begin
+        @ext.alive?
+      rescue DRb::DRbConnError
+        break
+      end
+    end
+  end
+end
+
diff --git a/test/ruby/test_rand.rb b/test/ruby/test_rand.rb
new file mode 100644
index 0000000000..93cf87e786
--- /dev/null
+++ b/test/ruby/test_rand.rb
@@ -0,0 +1,124 @@
+require 'test/unit'
+
+class TestRand < Test::Unit::TestCase
+  def test_mt
+    srand(0x00000456_00000345_00000234_00000123)
+    %w(1067595299  955945823  477289528 4107218783 4228976476).each {|w|
+      assert_equal(w.to_i, rand(0x100000000))
+    }
+  end
+
+  def test_0x3fffffff
+    srand(0)
+    %w(209652396 398764591 924231285 404868288 441365315).each {|w|
+      assert_equal(w.to_i, rand(0x3fffffff))
+    }
+  end
+
+  def test_0x40000000
+    srand(0)
+    %w(209652396 398764591 924231285 404868288 441365315).each {|w|
+      assert_equal(w.to_i, rand(0x40000000))
+    }
+  end
+
+  def test_0x40000001
+    srand(0)
+    %w(209652396 398764591 924231285 441365315 192771779).each {|w|
+      assert_equal(w.to_i, rand(0x40000001))
+    }
+  end
+
+  def test_0xffffffff
+    srand(0)
+    %w(2357136044 2546248239 3071714933 3626093760 2588848963).each {|w|
+      assert_equal(w.to_i, rand(0xffffffff))
+    }
+  end
+
+  def test_0x100000000
+    srand(0)
+    %w(2357136044 2546248239 3071714933 3626093760 2588848963).each {|w|
+      assert_equal(w.to_i, rand(0x100000000))
+    }
+  end
+
+  def test_0x100000001
+    srand(0)
+    %w(2546248239 1277901399 243580376 1171049868 2051556033).each {|w|
+      assert_equal(w.to_i, rand(0x100000001))
+    }
+  end
+
+  def test_0x1000000000000
+    srand(0)
+    %w(11736396900911
+       183025067478208
+       197104029029115
+       130583529618791
+       180361239846611).each {|w|
+      assert_equal(w.to_i, rand(0x1000000000000))
+    }
+  end
+
+  def test_0x1000000000001
+    srand(0)
+    %w(187121911899765
+       197104029029115
+       180361239846611
+       236336749852452
+       208739549485656).each {|w|
+      assert_equal(w.to_i, rand(0x1000000000001))
+    }
+  end
+
+  def test_0x3fffffffffffffff
+    srand(0)
+    %w(900450186894289455
+       3969543146641149120
+       1895649597198586619
+       827948490035658087
+       3203365596207111891).each {|w|
+      assert_equal(w.to_i, rand(0x3fffffffffffffff))
+    }
+  end
+
+  def test_0x4000000000000000
+    srand(0)
+    %w(900450186894289455
+       3969543146641149120
+       1895649597198586619
+       827948490035658087
+       3203365596207111891).each {|w|
+      assert_equal(w.to_i, rand(0x4000000000000000))
+    }
+  end
+
+  def test_0x4000000000000001
+    srand(0)
+    %w(900450186894289455
+       3969543146641149120
+       1895649597198586619
+       827948490035658087
+       2279347887019741461).each {|w|
+      assert_equal(w.to_i, rand(0x4000000000000001))
+    }
+  end
+
+  def test_neg_0x10000000000
+    ws = %w(455570294424 1073054410371 790795084744 2445173525 1088503892627)
+    srand(3)
+    ws.each {|w| assert_equal(w.to_i, rand(0x10000000000)) }
+    srand(3)
+    ws.each {|w| assert_equal(w.to_i, rand(-0x10000000000)) }
+  end
+
+  def test_neg_0x10000
+    ws = %w(2732 43567 42613 52416 45891)
+    srand(0)
+    ws.each {|w| assert_equal(w.to_i, rand(0x10000)) }
+    srand(0)
+    ws.each {|w| assert_equal(w.to_i, rand(-0x10000)) }
+  end
+
+end
-- 
cgit v1.2.3