summaryrefslogtreecommitdiff
path: root/test/-ext-/proc/test_bmethod.rb
blob: 16927dcf7d7c7a73d2f538eee2a145273f8019a1 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
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_call_super(42))
    define_method(:receiver, Bug::Proc.make_call_receiver(nil))
  end

  def test_super_in_bmethod
    obj = Bound.new
    assert_equal([1, 42], obj.foo(1))
  end

  def test_block_super
    obj = Bound.new
    result = nil
    obj.foo(2) {|*a| result = a}
    assert_equal([2, 42], result)
  end

  def test_receiver_in_bmethod
    obj = Bound.new
    assert_same(obj, obj.receiver)
  end
end