test_bmethod.rb: super in bmethod test

* test/-ext-/proc/test_bmethod.rb (test_super_in_bmethod): super
  in bmethod test for [Feature #10195].

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@48349 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

1 files changed, 24 insertions, 0 deletions

diff --git a/test/-ext-/proc/test_bmethod.rb b/test/-ext-/proc/test_bmethod.rb
new file mode 100644
index 0000000000..09f52140b9
--- /dev/null
+++ b/test/-ext-/proc/test_bmethod.rb
@@ -0,0 +1,24 @@
+require 'test/unit'
+require '-test-/proc'
+
+class TestProc < Test::Unit::TestCase
+  class TestBMethod < Test::Unit::TestCase
+  end
+end
+
+class TestProc::TestBMethod
+  class Base
+    def foo(*a)
+      a
+    end
+  end
+
+  class Bound < Base
+    define_method(:foo, Bug::Proc.make_caller(42))
+  end
+
+  def test_super_in_bmethod
+    obj = Bound.new
+    assert_equal([1, 42], obj.foo(1))
+  end
+end