kotovalexarian-likes-github/ruby--ruby
1
0
Fork 0
mirror of https://github.com/ruby/ruby.git synced 2022-11-09 12:17:21 -05:00
Code Releases Activity

* test/ruby/test_proc.rb: add some tests.

Browse source 
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@22827 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
mame 2009-03-08 17:26:26 +00:00
parent f725819666
commit d84595deb0
2 changed files with 35 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
ChangeLog
View file

@ -1,3 +1,7 @@
Mon Mar 9 02:25:54 2009 Yusuke Endoh <mame@tsg.ne.jp>
* test/ruby/test_proc.rb: add some tests.
Mon Mar 9 01:38:00 2009 Yusuke Endoh <mame@tsg.ne.jp>
* test/ruby/test_enum.rb: add some tests.

31
test/ruby/test_proc.rb
View file

@ -176,6 +176,11 @@ class TestProc < Test::Unit::TestCase
b = proc { :foo }
assert_equal(:foo, b.curry[])
b = lambda {|x, y, &b| b.call(x + y) }.curry
b = b.call(2) { raise }
b = b.call(3) {|x| x + 4 }
assert_equal(9, b)
end
def test_curry_ski_fib
@ -279,6 +284,10 @@ class TestProc < Test::Unit::TestCase
def test_arity2
assert_equal(0, method(:proc).to_proc.arity)
assert_equal(-1, proc {}.curry.arity)
c = Class.new
c.class_eval { attr_accessor :foo }
assert_equal(1, c.new.method(:foo=).to_proc.arity)
end
def test_proc_location
@ -688,6 +697,9 @@ class TestProc < Test::Unit::TestCase
assert_equal([[:opt, :a], [:opt, :b], [:rest, :c], [:opt, :d], [:block, :e]], proc {|a, b=:b, *c, d, &e|}.parameters)
assert_equal([[:opt, nil], [:block, :b]], proc {|(a), &b|}.parameters)
assert_equal([[:opt, :a], [:opt, :b], [:opt, :c], [:opt, :d], [:rest, :e], [:opt, :f], [:opt, :g], [:block, :h]], proc {|a,b,c=:c,d=:d,*e,f,g,&h|}.parameters)
assert_equal([[:req]], method(:require).parameters)
assert_equal([[:rest]], method(:p).parameters)
end
def pm0() end
@ -716,4 +728,23 @@ class TestProc < Test::Unit::TestCase
assert_equal([[:req, :a], [:opt, :b], [:rest, :c], [:req, :d], [:block, :e]], method(:pmo7).to_proc.parameters)
assert_equal([[:req], [:block, :b]], method(:pma1).to_proc.parameters)
end
def test_to_s
assert_match(/^#<Proc:0x\h+@#{ Regexp.quote(__FILE__) }:\d+>$/, proc {}.to_s)
assert_match(/^#<Proc:0x\h+@#{ Regexp.quote(__FILE__) }:\d+ \(lambda\)>$/, lambda {}.to_s)
assert_match(/^#<Proc:0x\h+ \(lambda\)>$/, method(:p).to_proc.to_s)
x = proc {}
x.taint
assert(x.to_s.tainted?)
end
def source_location_test
__LINE__
end
def test_source_location
file, lineno = method(:source_location_test).source_location
assert_match(/^#{ Regexp.quote(__FILE__) }$/, file)
assert_equal(source_location_test - 1, lineno)
end
end