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
38
39
40
41
42
43
|
require 'test/unit'
class TestProcVisibility < Test::Unit::TestCase
class TestVis
public
p1 = proc { private }
p2 = proc { public }
public
def foo; end
p1.call
def foo; end
p2.call
def foo; end
end
def test_proc_can_not_change_visibility
tv = TestVis.new
assert_nothing_raised { tv.foo }
assert_nothing_raised { tv.foo }
assert_nothing_raised { tv.foo }
end
class TestVis2
public
def foo; end
1.times { private }
def foo; end
1.times { public }
def foo; end
end
def test_block_can_not_change_visibility
tv = TestVis2.new
assert_nothing_raised { tv.foo }
assert_nothing_raised { tv.foo }
assert_nothing_raised { tv.foo }
end
end
|
