2003-09-04 12:18:59 -04:00
|
|
|
require 'test/unit'
|
2010-02-02 08:58:56 -05:00
|
|
|
require_relative 'envutil.rb'
|
2003-09-04 12:18:59 -04:00
|
|
|
|
|
|
|
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
|
2003-09-05 11:15:43 -04:00
|
|
|
|
2003-09-04 12:18:59 -04:00
|
|
|
case 5
|
|
|
|
when 5
|
|
|
|
assert(true)
|
|
|
|
when 1..10
|
|
|
|
assert(false)
|
|
|
|
end
|
2003-09-05 11:15:43 -04:00
|
|
|
|
2003-09-04 12:18:59 -04:00
|
|
|
case 5
|
|
|
|
when 1..10
|
|
|
|
assert(true)
|
|
|
|
else
|
|
|
|
assert(false)
|
|
|
|
end
|
2003-09-05 11:15:43 -04:00
|
|
|
|
2003-09-04 12:18:59 -04:00
|
|
|
case 5
|
|
|
|
when 5
|
|
|
|
assert(true)
|
|
|
|
else
|
|
|
|
assert(false)
|
|
|
|
end
|
2003-09-05 11:15:43 -04:00
|
|
|
|
2003-09-04 12:18:59 -04:00
|
|
|
case "foobar"
|
|
|
|
when /^f.*r$/
|
|
|
|
assert(true)
|
|
|
|
else
|
|
|
|
assert(false)
|
|
|
|
end
|
2003-10-30 04:36:41 -05:00
|
|
|
|
|
|
|
case
|
|
|
|
when true
|
|
|
|
assert(true)
|
|
|
|
when false, nil
|
|
|
|
assert(false)
|
|
|
|
else
|
|
|
|
assert(false)
|
|
|
|
end
|
2009-11-05 17:48:53 -05:00
|
|
|
|
|
|
|
case "+"
|
|
|
|
when *%w/. +/
|
|
|
|
assert(true)
|
|
|
|
else
|
|
|
|
assert(false)
|
|
|
|
end
|
2010-04-16 20:23:28 -04:00
|
|
|
|
|
|
|
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
|
2003-09-04 12:18:59 -04:00
|
|
|
end
|
2009-07-13 11:47:20 -04:00
|
|
|
|
|
|
|
def test_deoptimization
|
|
|
|
assert_in_out_err(['-e', <<-EOS], '', %w[42], [])
|
2010-01-25 17:08:29 -05:00
|
|
|
class Symbol; undef ===; def ===(o); p 42; true; end; end; case :foo; when :foo; end
|
2009-07-13 11:47:20 -04:00
|
|
|
EOS
|
|
|
|
|
|
|
|
assert_in_out_err(['-e', <<-EOS], '', %w[42], [])
|
2010-01-25 17:08:29 -05:00
|
|
|
class Fixnum; undef ===; def ===(o); p 42; true; end; end; case 1; when 1; end
|
2009-07-13 11:47:20 -04:00
|
|
|
EOS
|
|
|
|
end
|
2010-09-09 09:40:14 -04:00
|
|
|
|
|
|
|
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
|
|
|
|
end
|
2013-11-29 04:08:33 -05:00
|
|
|
|
|
|
|
def test_method_missing
|
|
|
|
flag = false
|
|
|
|
|
|
|
|
case 1
|
|
|
|
when Class.new(BasicObject) { def method_missing(*) true end }.new
|
|
|
|
flag = true
|
|
|
|
end
|
|
|
|
|
|
|
|
assert(flag)
|
|
|
|
end
|
2013-12-01 12:06:56 -05:00
|
|
|
|
|
|
|
def test_nomethoderror
|
|
|
|
assert_raise(NoMethodError) {
|
|
|
|
case 1
|
|
|
|
when Class.new(BasicObject) { }.new
|
|
|
|
end
|
|
|
|
}
|
|
|
|
end
|
2003-09-04 12:18:59 -04:00
|
|
|
end
|