2003-09-04 12:18:59 -04:00
|
|
|
require 'test/unit'
|
|
|
|
|
|
|
|
$KCODE = 'none'
|
|
|
|
|
|
|
|
class TestClone < Test::Unit::TestCase
|
|
|
|
module M001; end
|
|
|
|
module M002; end
|
|
|
|
module M003; include M002; end
|
|
|
|
module M002; include M001; end
|
|
|
|
module M003; include M002; end
|
2003-09-05 11:15:43 -04:00
|
|
|
|
2003-09-04 12:18:59 -04:00
|
|
|
def test_clone
|
|
|
|
foo = Object.new
|
|
|
|
def foo.test
|
|
|
|
"test"
|
|
|
|
end
|
|
|
|
bar = foo.clone
|
|
|
|
def bar.test2
|
|
|
|
"test2"
|
|
|
|
end
|
2003-09-05 11:15:43 -04:00
|
|
|
|
|
|
|
assert_equal("test2", bar.test2)
|
|
|
|
assert_equal("test", bar.test)
|
|
|
|
assert_equal("test", foo.test)
|
|
|
|
|
|
|
|
assert_raises(NoMethodError) {foo.test2}
|
|
|
|
|
|
|
|
assert_equal([M003, M002, M001], M003.ancestors)
|
2003-09-04 12:18:59 -04:00
|
|
|
end
|
|
|
|
end
|