2003-09-04 12:18:59 -04:00
|
|
|
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
|
2003-09-05 11:15:43 -04:00
|
|
|
assert_equal('global-variable', defined?($x))# returns description
|
|
|
|
|
2003-09-04 12:18:59 -04:00
|
|
|
foo=5
|
|
|
|
assert(defined?(foo)) # local variable
|
2003-09-05 11:15:43 -04:00
|
|
|
|
2003-09-04 12:18:59 -04:00
|
|
|
assert(defined?(::Array)) # constant !! Array -> ::Array
|
|
|
|
assert(defined?(Object.new)) # method
|
|
|
|
assert(!defined?(Object.print)) # private method
|
|
|
|
assert(defined?(1 == 2)) # operator expression
|
2003-09-05 11:15:43 -04:00
|
|
|
|
2003-09-04 12:18:59 -04:00
|
|
|
f = Foo.new
|
2003-09-05 11:15:43 -04:00
|
|
|
assert_nil(defined?(f.foo))
|
2003-09-04 12:18:59 -04:00
|
|
|
f.bar(f) { |v| assert(v) }
|
2003-09-05 11:15:43 -04:00
|
|
|
|
2003-09-04 12:18:59 -04:00
|
|
|
assert(defined_test) # not iterator
|
|
|
|
assert(!defined_test{}) # called as iterator
|
|
|
|
end
|
|
|
|
end
|