aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--ChangeLog4
-rw-r--r--test/ruby/test_method.rb42
2 files changed, 46 insertions, 0 deletions
diff --git a/ChangeLog b/ChangeLog
index cc8be3ffc6..4afe69c3ea 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+Mon Aug 8 20:40:35 2005 NAKAMURA, Hiroshi <nakahiro@sarion.co.jp>
+
+ * test/ruby/test_method.rb: added. [ruby-dev:26761]
+
Mon Aug 8 01:26:37 2005 Mauricio Fernandez <mfp@acm.org>
* parse.y (f_larglist): mistake in syntax rule. [ruby-core:05535]
diff --git a/test/ruby/test_method.rb b/test/ruby/test_method.rb
new file mode 100644
index 0000000000..c30705cb15
--- /dev/null
+++ b/test/ruby/test_method.rb
@@ -0,0 +1,42 @@
+require 'test/unit'
+
+class TestMethod < Test::Unit::TestCase
+ def m0() end
+ def m1(a) end
+ def m2(a, b) end
+ def mo1(a = nil, &b) end
+ def mo2(a, b = nil) end
+ def mo3(*a) end
+ def mo4(a, *b, &c) end
+
+ class Base
+ def foo() :base end
+ end
+ class Derived < Base
+ def foo() :derived end
+ end
+
+ def test_arity
+ assert_equal(0, method(:m0).arity)
+ assert_equal(1, method(:m1).arity)
+ assert_equal(2, method(:m2).arity)
+ assert_equal(-1, method(:mo1).arity)
+ assert_equal(-2, method(:mo2).arity)
+ assert_equal(-1, method(:mo3).arity)
+ assert_equal(-2, method(:mo4).arity)
+ end
+
+ def test_unbind
+ assert_equal(:derived, Derived.new.foo)
+ um = Derived.new.method(:foo).unbind
+ assert_instance_of(UnboundMethod, um)
+ Derived.class_eval do
+ def foo() :changed end
+ end
+ assert_equal(:changed, Derived.new.foo)
+ assert_equal(:derived, um.bind(Derived.new).call)
+ assert_raise(TypeError) do
+ um.bind(Base.new)
+ end
+ end
+end