summaryrefslogtreecommitdiffstats
path: root/web/server/h2o/libh2o/deps/mruby/test/t/comparable.rb
blob: 2ee28de7b49542c0b4c5ee2c9ae4161f116d2afc (plain)
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
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
assert('Comparable#<', '15.3.3.2.1') do
  class Foo
    include Comparable
    def <=>(x)
      x
    end
  end
  assert_false(Foo.new < 0)
  assert_false(Foo.new < 1)
  assert_true(Foo.new < -1)
  assert_raise(ArgumentError){ Foo.new < nil }
end

assert('Comparable#<=', '15.3.3.2.2') do
  class Foo
    include Comparable
    def <=>(x)
      x
    end
  end
  assert_true(Foo.new <= 0)
  assert_false(Foo.new <= 1)
  assert_true(Foo.new <= -1)
  assert_raise(ArgumentError){ Foo.new <= nil }
end

assert('Comparable#==', '15.3.3.2.3') do
  class Foo
    include Comparable
    def <=>(x)
      0
    end
  end

  assert_true(Foo.new == Foo.new)
end

assert('Comparable#>', '15.3.3.2.4') do
  class Foo
    include Comparable
    def <=>(x)
      x
    end
  end
  assert_false(Foo.new > 0)
  assert_true(Foo.new > 1)
  assert_false(Foo.new > -1)
  assert_raise(ArgumentError){ Foo.new > nil }
end

assert('Comparable#>=', '15.3.3.2.5') do
  class Foo
    include Comparable
    def <=>(x)
      x
    end
  end
  assert_true(Foo.new >= 0)
  assert_true(Foo.new >= 1)
  assert_false(Foo.new >= -1)
  assert_raise(ArgumentError){ Foo.new >= nil }
end

assert('Comparable#between?', '15.3.3.2.6') do
  class Foo
    include Comparable
    def <=>(x)
      x
    end
  end

  c = Foo.new

  assert_false(c.between?(-1,  1))
  assert_false(c.between?(-1, -1))
  assert_false(c.between?( 1,  1))
  assert_true(c.between?( 1, -1))
  assert_true(c.between?(0, 0))
end