blob: 0e94e14608457e71afa003497b1e5b65a4aea819 (
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
38
39
40
41
42
|
require 'test/unit'
$KCODE = 'none'
class TestAlias < Test::Unit::TestCase
class Alias0
def foo; "foo" end
end
class Alias1<Alias0
alias bar foo
def foo; "foo+" + super end
end
class Alias2<Alias1
alias baz foo
undef foo
end
class Alias3<Alias2
def foo
defined? super
end
def bar
defined? super
end
def quux
defined? super
end
end
def test_alias
x = Alias2.new
assert(x.bar == "foo")
assert(x.baz == "foo+foo")
# test_check for cache
assert(x.baz == "foo+foo")
x = Alias3.new
assert(!x.foo)
assert(x.bar)
assert(!x.quux)
end
end
|