test/-ext-/iter/test_yield_block.rb


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

# frozen_string_literal: false
require 'test/unit'
require '-test-/iter'

module TestIter
end

class TestIter::YieldBlock < Test::Unit::TestCase
  class YieldTest
    include Bug::Iter::Yield
    attr_reader :blockarg
    def test(arg, &block)
      block.call(arg) {|blockarg| @blockarg = blockarg}
    end
    def call_proc(&block)
      block.call {}
    end
    def call_lambda(&block)
      block.call(&->{})
    end
  end

  def test_yield_block
    a = YieldTest.new
    a.yield_block(:test, "foo") {|x, &b| assert_kind_of(Proc, b); b.call(x)}
    assert_equal("foo", a.blockarg)
  end

  def test_yield_lambda
    a = YieldTest.new
    assert_not_predicate a.yield_block(:call_proc) {|&b| b}, :lambda?
    assert_predicate a.yield_block(:call_lambda) {|&b| b}, :lambda?
  end
end