blob: 0fd8d5f89b29019ac763a63e6d4f86bb455882eb (
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
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
|
require 'test/unit'
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
super
end
def bar
super
end
def quux
super
end
end
def test_alias
x = Alias2.new
assert_equal "foo", x.bar
assert_equal "foo+foo", x.baz
assert_equal "foo+foo", x.baz # test_check for cache
x = Alias3.new
assert_raise(NoMethodError) { x.foo }
assert_equal "foo", x.bar
assert_raise(NoMethodError) { x.quux }
end
class C
def m
$SAFE
end
end
def test_nonexistmethod
assert_raise(NameError){
Class.new{
alias_method :foobarxyzzy, :barbaz
}
}
end
def test_send_alias
x = "abc"
class << x
alias_method :try, :__send__
end
assert_equal("ABC", x.try(:upcase), '[ruby-dev:38824]')
end
def test_special_const_alias
assert_raise(TypeError) do
1.instance_eval do
alias to_string to_s
end
end
end
def test_alias_with_zsuper_method
c = Class.new
c.class_eval do
def foo
:ok
end
def bar
:ng
end
private :foo
end
d = Class.new(c)
d.class_eval do
public :foo
alias bar foo
end
assert_equal(:ok, d.new.bar)
end
module SuperInAliasedModuleMethod
module M
def foo
super << :M
end
alias bar foo
end
class Base
def foo
[:Base]
end
end
class Derived < Base
include M
end
end
# [ruby-dev:46028]
def test_super_in_aliased_module_method # fails in 1.8
assert_equal([:Base, :M], SuperInAliasedModuleMethod::Derived.new.bar)
end
end
|