1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
|
require 'test/unit'
module TestRandomExt
class TestLoop < Test::Unit::TestCase
def setup
super
assert_nothing_raised(LoadError) {require '-test-/random'}
end
def test_bytes
rnd = Bug::Random::Loop.new(1)
assert_equal("\1", rnd.bytes(1))
end
def test_rand
rnd = Bug::Random::Loop.new(1)
assert_equal(1, rnd.rand(10))
end
def test_real
assert_equal(0.25, Bug::Random::Loop.new(1<<14).rand)
assert_equal(0.50, Bug::Random::Loop.new(2<<14).rand)
assert_equal(0.75, Bug::Random::Loop.new(3<<14).rand)
assert_equal(1.00, Bug::Random::Loop.new(4<<14).rand)
end
end
end
|
