test/-ext-/test_random.rb


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20

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
  end
end