2003-09-04 12:18:59 -04:00
|
|
|
require 'test/unit'
|
2008-05-14 08:52:17 -04:00
|
|
|
require_relative 'envutil'
|
2003-09-04 12:18:59 -04:00
|
|
|
|
|
|
|
class TestException < Test::Unit::TestCase
|
|
|
|
def test_exception
|
|
|
|
begin
|
|
|
|
raise "this must be handled"
|
|
|
|
assert(false)
|
|
|
|
rescue
|
|
|
|
assert(true)
|
|
|
|
end
|
2003-09-05 11:15:43 -04:00
|
|
|
|
2003-09-04 12:18:59 -04:00
|
|
|
$bad = true
|
|
|
|
begin
|
|
|
|
raise "this must be handled no.2"
|
|
|
|
rescue
|
|
|
|
if $bad
|
|
|
|
$bad = false
|
|
|
|
retry
|
|
|
|
assert(false)
|
|
|
|
end
|
|
|
|
end
|
|
|
|
assert(true)
|
2003-09-05 11:15:43 -04:00
|
|
|
|
2003-09-04 12:18:59 -04:00
|
|
|
# exception in rescue clause
|
|
|
|
$string = "this must be handled no.3"
|
2008-09-24 13:44:39 -04:00
|
|
|
e = assert_raise(RuntimeError) do
|
2003-09-04 12:18:59 -04:00
|
|
|
begin
|
|
|
|
raise "exception in rescue clause"
|
2003-09-05 11:15:43 -04:00
|
|
|
rescue
|
2003-09-04 12:18:59 -04:00
|
|
|
raise $string
|
|
|
|
end
|
|
|
|
assert(false)
|
|
|
|
end
|
2003-09-05 11:15:43 -04:00
|
|
|
assert_equal($string, e.message)
|
|
|
|
|
2003-09-04 12:18:59 -04:00
|
|
|
# exception in ensure clause
|
2003-09-05 11:15:43 -04:00
|
|
|
$string = "exception in ensure clause"
|
2008-09-24 13:44:39 -04:00
|
|
|
e = assert_raise(RuntimeError) do
|
2003-09-04 12:18:59 -04:00
|
|
|
begin
|
|
|
|
raise "this must be handled no.4"
|
2003-09-05 11:15:43 -04:00
|
|
|
ensure
|
|
|
|
assert_instance_of(RuntimeError, $!)
|
|
|
|
assert_equal("this must be handled no.4", $!.message)
|
2003-09-04 12:18:59 -04:00
|
|
|
raise "exception in ensure clause"
|
|
|
|
end
|
|
|
|
assert(false)
|
|
|
|
end
|
2003-09-05 11:15:43 -04:00
|
|
|
assert_equal($string, e.message)
|
|
|
|
|
2003-09-04 12:18:59 -04:00
|
|
|
$bad = true
|
|
|
|
begin
|
|
|
|
begin
|
|
|
|
raise "this must be handled no.5"
|
|
|
|
ensure
|
|
|
|
$bad = false
|
|
|
|
end
|
|
|
|
rescue
|
|
|
|
end
|
|
|
|
assert(!$bad)
|
2003-09-05 11:15:43 -04:00
|
|
|
|
2003-09-04 12:18:59 -04:00
|
|
|
$bad = true
|
|
|
|
begin
|
|
|
|
begin
|
|
|
|
raise "this must be handled no.6"
|
|
|
|
ensure
|
|
|
|
$bad = false
|
|
|
|
end
|
|
|
|
rescue
|
|
|
|
end
|
|
|
|
assert(!$bad)
|
2003-09-05 11:15:43 -04:00
|
|
|
|
2003-09-04 12:18:59 -04:00
|
|
|
$bad = true
|
|
|
|
while true
|
|
|
|
begin
|
|
|
|
break
|
|
|
|
ensure
|
|
|
|
$bad = false
|
|
|
|
end
|
|
|
|
end
|
|
|
|
assert(!$bad)
|
2003-09-05 11:15:43 -04:00
|
|
|
|
2003-09-04 12:18:59 -04:00
|
|
|
assert(catch(:foo) {
|
|
|
|
loop do
|
|
|
|
loop do
|
|
|
|
throw :foo, true
|
|
|
|
break
|
|
|
|
end
|
|
|
|
break
|
|
|
|
assert(false) # should no reach here
|
|
|
|
end
|
|
|
|
false
|
|
|
|
})
|
2003-09-05 11:15:43 -04:00
|
|
|
|
2003-09-04 12:18:59 -04:00
|
|
|
end
|
2003-10-04 14:06:19 -04:00
|
|
|
|
|
|
|
def test_else
|
|
|
|
begin
|
|
|
|
assert(true)
|
|
|
|
rescue
|
|
|
|
assert(false)
|
|
|
|
else
|
|
|
|
assert(true)
|
|
|
|
end
|
|
|
|
|
|
|
|
begin
|
|
|
|
assert(true)
|
|
|
|
raise
|
|
|
|
assert(false)
|
|
|
|
rescue
|
|
|
|
assert(true)
|
|
|
|
else
|
|
|
|
assert(false)
|
|
|
|
end
|
|
|
|
|
|
|
|
begin
|
|
|
|
assert(true)
|
|
|
|
begin
|
|
|
|
assert(true)
|
|
|
|
rescue
|
|
|
|
assert(false)
|
|
|
|
else
|
|
|
|
assert(true)
|
|
|
|
end
|
|
|
|
assert(true)
|
|
|
|
rescue
|
|
|
|
assert(false)
|
|
|
|
else
|
|
|
|
assert(true)
|
|
|
|
end
|
|
|
|
|
|
|
|
begin
|
|
|
|
assert(true)
|
|
|
|
begin
|
|
|
|
assert(true)
|
|
|
|
raise
|
|
|
|
assert(false)
|
|
|
|
rescue
|
|
|
|
assert(true)
|
|
|
|
else
|
|
|
|
assert(false)
|
|
|
|
end
|
|
|
|
assert(true)
|
|
|
|
rescue
|
|
|
|
assert(false)
|
|
|
|
else
|
|
|
|
assert(true)
|
|
|
|
end
|
|
|
|
|
|
|
|
begin
|
|
|
|
assert(true)
|
|
|
|
begin
|
|
|
|
assert(true)
|
|
|
|
rescue
|
|
|
|
assert(false)
|
|
|
|
else
|
|
|
|
assert(true)
|
|
|
|
end
|
|
|
|
assert(true)
|
|
|
|
raise
|
|
|
|
assert(false)
|
|
|
|
rescue
|
|
|
|
assert(true)
|
|
|
|
else
|
|
|
|
assert(false)
|
|
|
|
end
|
|
|
|
|
|
|
|
begin
|
|
|
|
assert(true)
|
|
|
|
begin
|
|
|
|
assert(true)
|
|
|
|
raise
|
|
|
|
assert(false)
|
|
|
|
rescue
|
|
|
|
assert(true)
|
|
|
|
else
|
|
|
|
assert(false)
|
|
|
|
end
|
|
|
|
assert(true)
|
|
|
|
raise
|
|
|
|
assert(false)
|
|
|
|
rescue
|
|
|
|
assert(true)
|
|
|
|
else
|
|
|
|
assert(false)
|
|
|
|
end
|
|
|
|
end
|
2008-05-14 08:52:17 -04:00
|
|
|
|
|
|
|
def test_raise_with_wrong_number_of_arguments
|
|
|
|
assert_raise(TypeError) { raise nil }
|
|
|
|
assert_raise(TypeError) { raise 1, 1 }
|
|
|
|
assert_raise(ArgumentError) { raise 1, 1, 1, 1 }
|
|
|
|
end
|
|
|
|
|
|
|
|
def test_errat
|
2008-07-15 11:26:04 -04:00
|
|
|
assert_in_out_err([], "p $@", %w(nil), [])
|
2008-05-14 08:52:17 -04:00
|
|
|
|
2008-07-15 11:26:04 -04:00
|
|
|
assert_in_out_err([], "$@ = 1", [], /\$! not set \(ArgumentError\)$/)
|
2008-05-14 08:52:17 -04:00
|
|
|
|
2008-07-15 11:26:04 -04:00
|
|
|
assert_in_out_err([], <<-INPUT, [], /backtrace must be Array of String \(TypeError\)$/)
|
|
|
|
begin
|
|
|
|
raise
|
|
|
|
rescue
|
|
|
|
$@ = 1
|
|
|
|
end
|
|
|
|
INPUT
|
2008-05-14 08:52:17 -04:00
|
|
|
|
2008-07-15 11:26:04 -04:00
|
|
|
assert_in_out_err([], <<-INPUT, [], /^foo: unhandled exception$/)
|
|
|
|
begin
|
|
|
|
raise
|
|
|
|
rescue
|
|
|
|
$@ = 'foo'
|
|
|
|
raise
|
|
|
|
end
|
|
|
|
INPUT
|
2008-05-14 08:52:17 -04:00
|
|
|
|
2008-07-15 11:26:04 -04:00
|
|
|
assert_in_out_err([], <<-INPUT, [], /^foo: unhandled exception\s+from bar\s+from baz$/)
|
|
|
|
begin
|
|
|
|
raise
|
|
|
|
rescue
|
|
|
|
$@ = %w(foo bar baz)
|
|
|
|
raise
|
|
|
|
end
|
|
|
|
INPUT
|
2008-05-14 08:52:17 -04:00
|
|
|
end
|
2009-07-16 05:28:12 -04:00
|
|
|
|
|
|
|
def test_safe4
|
|
|
|
cmd = proc{raise SystemExit}
|
|
|
|
safe0_p = proc{|*args| args}
|
|
|
|
|
|
|
|
test_proc = proc {
|
|
|
|
$SAFE = 4
|
|
|
|
begin
|
|
|
|
cmd.call
|
|
|
|
rescue SystemExit => e
|
|
|
|
safe0_p["SystemExit: #{e.inspect}"]
|
|
|
|
raise e
|
|
|
|
rescue Exception => e
|
|
|
|
safe0_p["Exception (NOT SystemExit): #{e.inspect}"]
|
|
|
|
raise e
|
|
|
|
end
|
|
|
|
}
|
|
|
|
assert_raise(SystemExit, '[ruby-dev:38760]') {test_proc.call}
|
|
|
|
end
|
2003-09-04 12:18:59 -04:00
|
|
|
end
|