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
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
|
# frozen_string_literal: false
require 'test/unit'
class TestCase < Test::Unit::TestCase
def test_case
case 5
when 1, 2, 3, 4, 6, 7, 8
assert(false)
when 5
assert(true)
end
case 5
when 5
assert(true)
when 1..10
assert(false)
end
case 5
when 1..10
assert(true)
else
assert(false)
end
case 5
when 5
assert(true)
else
assert(false)
end
case "foobar"
when /^f.*r$/
assert(true)
else
assert(false)
end
case
when true
assert(true)
when false, nil
assert(false)
else
assert(false)
end
case "+"
when *%w/. +/
assert(true)
else
assert(false)
end
case
when *[], false
assert(false)
else
assert(true)
end
case
when *false, []
assert(true)
else
assert(false)
end
assert_raise(NameError) do
case
when false, *x, false
end
end
end
def test_deoptimization
assert_in_out_err(['-e', <<-EOS], '', %w[42], [])
class Symbol; undef ===; def ===(o); p 42; true; end; end; case :foo; when :foo; end
EOS
assert_in_out_err(['-e', <<-EOS], '', %w[42], [])
class Integer; undef ===; def ===(o); p 42; true; end; end; case 1; when 1; end
EOS
end
def test_optimization
case 1
when 0.9, 1.1
assert(false)
when 1.0
assert(true)
else
assert(false)
end
case 536870912
when 536870911.9, 536870912.1
assert(false)
when 536870912.0
assert(true)
else
assert(false)
end
case 0
when 0r
assert(true)
else
assert(false)
end
case 0
when 0i
assert(true)
else
assert(false)
end
end
def test_method_missing
flag = false
case 1
when Class.new(BasicObject) { def method_missing(*) true end }.new
flag = true
end
assert(flag)
end
def test_nomethoderror
assert_raise(NoMethodError) {
case 1
when Class.new(BasicObject) { }.new
end
}
end
module NilEqq
refine NilClass do
def === other
false
end
end
end
class NilEqqClass
using NilEqq
def eqq(a)
case a; when nil then nil; else :not_nil; end
end
end
def test_deoptimize_nil
assert_equal :not_nil, NilEqqClass.new.eqq(nil)
end
end
|
