mirror of
https://github.com/ruby/ruby.git
synced 2022-11-09 12:17:21 -05:00
b0986a8f82
for $&, $1, ... . If such variables are defined, return "global-variable". * test/ruby/test_defined.rb: add tests. * bootstraptest/test_syntax.rb: fix a test. git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@14031 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
81 lines
2.3 KiB
Ruby
81 lines
2.3 KiB
Ruby
require 'test/unit'
|
|
|
|
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
|
|
def baz(f)
|
|
end
|
|
end
|
|
|
|
def defined_test
|
|
return !defined?(yield)
|
|
end
|
|
|
|
def test_defined
|
|
$x = nil
|
|
|
|
assert(defined?($x)) # global variable
|
|
assert_equal('global-variable', defined?($x))# returns description
|
|
|
|
assert_nil(defined?(foo)) # undefined
|
|
foo=5
|
|
assert(defined?(foo)) # local variable
|
|
|
|
assert(defined?(Array)) # constant
|
|
assert(defined?(::Array)) # toplevel constant
|
|
assert(defined?(File::Constants)) # nested constant
|
|
assert(defined?(Object.new)) # method
|
|
assert(!defined?(Object.print)) # private method
|
|
assert(defined?(1 == 2)) # operator expression
|
|
|
|
f = Foo.new
|
|
assert_nil(defined?(f.foo)) # protected method
|
|
f.bar(f) { |v| assert(v) }
|
|
assert_nil(defined?(f.quux)) # undefined method
|
|
assert_nil(defined?(f.baz(x))) # undefined argument
|
|
x = 0
|
|
assert(defined?(f.baz(x)))
|
|
assert_nil(defined?(f.quux(x)))
|
|
assert(defined?(print(x)))
|
|
assert_nil(defined?(quux(x)))
|
|
|
|
assert(defined_test) # not iterator
|
|
assert(!defined_test{}) # called as iterator
|
|
|
|
/a/ =~ ''
|
|
assert_equal nil, defined?($&)
|
|
assert_equal nil, defined?($`)
|
|
assert_equal nil, defined?($')
|
|
assert_equal nil, defined?($+)
|
|
assert_equal nil, defined?($1)
|
|
assert_equal nil, defined?($2)
|
|
/a/ =~ 'a'
|
|
assert_equal 'global-variable', defined?($&)
|
|
assert_equal 'global-variable', defined?($`)
|
|
assert_equal 'global-variable', defined?($')
|
|
assert_equal nil, defined?($+)
|
|
assert_equal nil, defined?($1)
|
|
assert_equal nil, defined?($2)
|
|
/(a)/ =~ 'a'
|
|
assert_equal 'global-variable', defined?($&)
|
|
assert_equal 'global-variable', defined?($`)
|
|
assert_equal 'global-variable', defined?($')
|
|
assert_equal 'global-variable', defined?($+)
|
|
assert_equal 'global-variable', defined?($1)
|
|
assert_equal nil, defined?($2)
|
|
/(a)b/ =~ 'ab'
|
|
assert_equal 'global-variable', defined?($&)
|
|
assert_equal 'global-variable', defined?($`)
|
|
assert_equal 'global-variable', defined?($')
|
|
assert_equal 'global-variable', defined?($+)
|
|
assert_equal 'global-variable', defined?($1)
|
|
assert_equal nil, defined?($2)
|
|
end
|
|
end
|