add types hash to space
This commit is contained in:
@ -29,6 +29,10 @@ class TestSpace < MiniTest::Test
|
||||
end
|
||||
end
|
||||
|
||||
def test_types
|
||||
assert @machine.space.types.is_a? Parfait::Dictionary
|
||||
end
|
||||
|
||||
def test_classes_type
|
||||
classes.each do |name|
|
||||
assert_equal Parfait::Type , @machine.space.classes[name].get_type.class
|
||||
|
@ -49,7 +49,7 @@ class BasicType < MiniTest::Test
|
||||
assert_equal Parfait::Class , oc.class
|
||||
type = oc.instance_type
|
||||
assert_equal Parfait::Type , type.class
|
||||
assert_equal 1 , type.instance_names.get_length
|
||||
assert_equal 1 , type.instance_names.get_length , type.instance_names.inspect
|
||||
assert_equal type.first , :type
|
||||
end
|
||||
|
||||
@ -59,7 +59,7 @@ class BasicType < MiniTest::Test
|
||||
assert_equal Parfait::Space , space.class
|
||||
type = space.get_type
|
||||
assert_equal Parfait::Type , type.class
|
||||
assert_equal 3 , type.instance_names.get_length
|
||||
assert_equal 4 , type.instance_names.get_length
|
||||
assert_equal type.object_class.class , Parfait::Class
|
||||
assert_equal type.object_class.name , :Space
|
||||
end
|
||||
|
Reference in New Issue
Block a user