random 0.2.0 → 0.2.1

data/Rakefile

@@ -64,9 +64,16 @@ UTestFiles = FileList["test/unit/**/test*.rb"]
 ATestFiles = FileList["test/acceptance/**/*test*.rb"]
 PTestFiles = FileList["test/performance/**/test*.rb"]
 
-task :setup_for_test => [:pack_and_geminstall] do
-  require 'rubygems'
-  require 'test/common'
+if File.exist?("_darcs")
+  task :setup_for_test => [:pack_and_geminstall] do
+    require 'rubygems'
+    require 'test/common'
+  end
+else
+  task :setup_for_test do
+    require 'rubygems'
+    require 'test/common'
+  end
 end
 
 def load_files(list)
@@ -142,6 +149,7 @@ TestFilesToIncludeGlobs = [
     "test/acceptance/**/*", 
     "test/performance/**/*", 
     "test/unit/**/*",
+    "test/*.rb",
 ]
 
 PkgFileGlobs = BaseFileToIncludeGlobs + TestFilesToIncludeGlobs

data/VERSION

@@ -1 +1 @@
-0.2.0
+0.2.1

data/test/common.rb

@@ -0,0 +1,44 @@
+require 'test/unit'
+
+require 'random/testing'
+
+class Test::Unit::TestCase
+  def assert_chi_square(reps = 1e4, &block)
+    alpha = 0.005
+    bin_counts = Hash.new(0)
+    reps.to_i.times {bin_counts[block.call] += 1}
+    result = Random::Testing.chi_square_test(bin_counts, alpha)
+    if result
+      assert(true)
+    else
+      crit = 
+        Math::Statistics.critical_chi_square_value(bin_counts.keys.length - 1, 
+                                                   alpha)
+      chisq = Random::Testing.chi_square_statistic(bin_counts.values)
+      assert(false, "Expected a chi square value > #{crit} but got #{chisq} for #{bin_counts.inspect}")
+    end
+  end
+
+  def assert_chi_square_floats(numBins = 10, reps = 1e4, &block)
+    w = 1.0 / numBins
+    assert_chi_square(reps) do
+      v = block.call
+      res = w * (v/w).floor
+      #puts "#{v.inspect}, #{w.inspect}"
+      res
+    end
+  end
+
+  def assert_rand(rng)
+    assert_kind_of(Float, rng.rand)
+    assert_kind_of(Float, rng.rand(0))
+    assert_kind_of(Float, rng.rand(0.0))
+    assert_kind_of(Float, rng.rand(0.99))
+    
+    assert_equal(0, rng.rand(1.0))
+    100.times {assert_equal(0, rng.rand(1))}
+
+    # Very unlikely that we would get a fixnum out of this but it can happen
+    assert_kind_of(Bignum, rng.rand(2**10000))
+  end
+end

metadata

@@ -3,7 +3,7 @@ rubygems_version: 0.8.11
 specification_version: 1
 name: random
 version: !ruby/object:Gem::Version 
-  version: 0.2.0
+  version: 0.2.1
 date: 2006-04-13 00:00:00 +02:00
 summary: Stand-alone random number generator (RNG) class allowing multiple, active RNG's at the same time (which is not possible with Ruby's rand/srand).
 require_paths: 
@@ -55,6 +55,7 @@ files:
 - test/unit/test_chi_square.rb
 - test/unit/#mt19937ar.c#
 - test/unit/test_random_number_generator.rb
+- test/common.rb
 test_files: []
 
 rdoc_options: []