mirror of
https://github.com/mruby/mruby
synced 2026-06-08 16:11:16 +00:00
h2so5
58 lines
863 B
Ruby
58 lines
863 B
Ruby
##
|
|
# Proc ISO Test
|
|
|
|
assert('Proc', '15.2.17') do
|
|
Proc.class == Class
|
|
end
|
|
|
|
assert('Proc superclass', '15.2.17.2') do
|
|
Proc.superclass == Object
|
|
end
|
|
|
|
assert('Proc.new', '15.2.17.3.1') do
|
|
a = nil
|
|
|
|
begin
|
|
Proc.new
|
|
rescue => e
|
|
a = e
|
|
end
|
|
|
|
b = Proc.new {}
|
|
|
|
a.class == ArgumentError and b.class == Proc
|
|
end
|
|
|
|
assert('Proc#[]', '15.2.17.4.1') do
|
|
a = 0
|
|
b = Proc.new { a += 1 }
|
|
b.[]
|
|
|
|
a2 = 0
|
|
b2 = Proc.new { |i| a2 += i }
|
|
b2.[](5)
|
|
|
|
a == 1 and a2 == 5
|
|
end
|
|
|
|
assert('Proc#arity', '15.2.17.4.2') do
|
|
a = Proc.new {|x, y|}.arity
|
|
b = Proc.new {|x, *y, z|}.arity
|
|
c = Proc.new {|x=0, y|}.arity
|
|
d = Proc.new {|(x, y), z=0|}.arity
|
|
|
|
a == 2 and b == -3 and c == 1 and d == 1
|
|
end
|
|
|
|
assert('Proc#call', '15.2.17.4.3') do
|
|
a = 0
|
|
b = Proc.new { a += 1 }
|
|
b.call
|
|
|
|
a2 = 0
|
|
b2 = Proc.new { |i| a2 += i }
|
|
b2.call(5)
|
|
|
|
a == 1 and a2 == 5
|
|
end
|