blob: 999457f91702dc7402cc93b13c2a14f53b9a62db (
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 TestDefined < Test::Unit::TestCase
class Foo
def foo
p :foo
end
protected :foo
def bar(f)
yield(defined?(self.foo))
yield(defined?(f.foo))
end
end
def defined_test
return !defined?(yield)
end
def test_defined
$x = nil
assert(defined?($x)) # global variable
assert_equal(defined?($x), 'global-variable')# returns description
foo=5
assert(defined?(foo)) # local variable
assert(defined?(::Array)) # constant !! Array -> ::Array
assert(defined?(Object.new)) # method
assert(!defined?(Object.print)) # private method
assert(defined?(1 == 2)) # operator expression
f = Foo.new
assert_equal(defined?(f.foo), nil)
f.bar(f) { |v| assert(v) }
assert(defined_test) # not iterator
assert(!defined_test{}) # called as iterator
end
end
|
