[4] | 1 | require 'test/unit'
|
---|
| 2 | require 'am.rb'
|
---|
| 3 | require 'rm.rb'
|
---|
| 4 |
|
---|
| 5 | class ArchetypeModelTest < Test::Unit::TestCase
|
---|
| 6 | def setup
|
---|
[21] | 7 | @archetype = OpenEHR::AM::Archetype::ARCHETYPE.new #(nil,nil,nil,nil,nil,nil,nil,nil)
|
---|
| 8 | @archetype_description = OpenEHR::AM::Archetype::Archetype_Description::ARCHETYPE_DESCRIPTION.new
|
---|
| 9 | @archetype_constraint = OpenEHR::AM::Archetype::Constraint_Model::ARCHETYPE_CONSTRAINT.new
|
---|
[4] | 10 | @assertion = OpenEHR::AM::Archetype::Constraint_Model::Assertion::Assertion.new
|
---|
| 11 | @c_primitive = OpenEHR::AM::Archetype::Constraint_Model::Primitive::C_Primitive.new
|
---|
| 12 | @c_boolean = OpenEHR::AM::Archetype::Constraint_Model::Primitive::C_Boolean.new(true, true, true)
|
---|
| 13 | @c_integer = OpenEHR::AM::Archetype::Constraint_Model::Primitive::C_Integer.new
|
---|
| 14 | @archetype_ontology = OpenEHR::AM::Archetype::Ontology::Archetype_Ontology.new
|
---|
[21] | 15 |
|
---|
| 16 | @archetype_constraint = OpenEHR::AM::Archetype::Constraint_Model::ARCHETYPE_CONSTRAINT.new
|
---|
| 17 | @c_object = OpenEHR::AM::Archetype::Constraint_Model::C_OBJECT.new
|
---|
| 18 | @c_defined_object = OpenEHR::AM::Archetype::Constraint_Model::C_DEFINED_OBJECT.new
|
---|
| 19 | @c_attribute = OpenEHR::AM::Archetype::Constraint_Model::C_ATTRIBUTE.new
|
---|
| 20 | @c_primitive_object = OpenEHR::AM::Archetype::Constraint_Model::C_PRIMITIVE_OBJECT.new
|
---|
| 21 | @c_reference_object = OpenEHR::AM::Archetype::Constraint_Model::C_REFERENCE_OBJECT.new
|
---|
| 22 | @archetype_internal_ref = OpenEHR::AM::Archetype::Constraint_Model::ARCHETYPE_INTERNAL_REF.new
|
---|
| 23 | @archetype_slot = OpenEHR::AM::Archetype::Constraint_Model::ARCHETYPE_SLOT.new
|
---|
| 24 | @constraint_ref = OpenEHR::AM::Archetype::Constraint_Model::CONSTRAINT_REF.new
|
---|
| 25 | @c_domain_type = OpenEHR::AM::Archetype::Constraint_Model::C_DOMAIN_TYPE.new
|
---|
| 26 | @c_complex_object = OpenEHR::AM::Archetype::Constraint_Model::C_COMPLEX_OBJECT.new
|
---|
[4] | 27 | end
|
---|
| 28 |
|
---|
| 29 | def test_init
|
---|
| 30 | assert_instance_of OpenEHR::AM::Archetype::Ontology::Archetype_Ontology, @archetype_ontology
|
---|
[21] | 31 | assert_instance_of OpenEHR::AM::Archetype::Constraint_Model::ARCHETYPE_CONSTRAINT, @archetype_constraint
|
---|
| 32 | assert_instance_of OpenEHR::AM::Archetype::Archetype_Description::ARCHETYPE_DESCRIPTION, @archetype_description
|
---|
| 33 | assert_instance_of OpenEHR::AM::Archetype::ARCHETYPE, @archetype
|
---|
[4] | 34 | assert_instance_of OpenEHR::AM::Archetype::Constraint_Model::Assertion::Assertion, @assertion
|
---|
| 35 | assert_instance_of OpenEHR::AM::Archetype::Constraint_Model::Primitive::C_Primitive, @c_primitive
|
---|
| 36 | assert_instance_of OpenEHR::AM::Archetype::Constraint_Model::Primitive::C_Boolean, @c_boolean
|
---|
[21] | 37 | assert_instance_of OpenEHR::AM::Archetype::Constraint_Model::ARCHETYPE_CONSTRAINT, @archetype_constraint
|
---|
| 38 | assert_instance_of OpenEHR::AM::Archetype::Constraint_Model::C_OBJECT, @c_object
|
---|
| 39 | assert_instance_of OpenEHR::AM::Archetype::Constraint_Model::C_DEFINED_OBJECT, @c_defined_object
|
---|
| 40 | assert_instance_of OpenEHR::AM::Archetype::Constraint_Model::C_ATTRIBUTE, @c_attribute
|
---|
| 41 | assert_instance_of OpenEHR::AM::Archetype::Constraint_Model::C_PRIMITIVE_OBJECT, @c_primitive_object
|
---|
| 42 | assert_instance_of OpenEHR::AM::Archetype::Constraint_Model::C_REFERENCE_OBJECT, @c_reference_object
|
---|
| 43 | assert_instance_of OpenEHR::AM::Archetype::Constraint_Model::ARCHETYPE_INTERNAL_REF, @archetype_internal_ref
|
---|
| 44 | assert_instance_of OpenEHR::AM::Archetype::Constraint_Model::ARCHETYPE_SLOT, @archetype_slot
|
---|
| 45 | assert_instance_of OpenEHR::AM::Archetype::Constraint_Model::CONSTRAINT_REF, @constraint_ref
|
---|
| 46 | assert_instance_of OpenEHR::AM::Archetype::Constraint_Model::C_DOMAIN_TYPE, @c_domain_type
|
---|
| 47 | assert_instance_of OpenEHR::AM::Archetype::Constraint_Model::C_COMPLEX_OBJECT, @c_complex_object
|
---|
[4] | 48 | end
|
---|
[21] | 49 |
|
---|
[4] | 50 | def test_primitive
|
---|
| 51 | assert @c_boolean.true_valid?
|
---|
| 52 | assert @c_boolean.false_valid?
|
---|
| 53 | assert @c_boolean.assumed_value
|
---|
| 54 | assert @c_boolean.has_assumed_value?
|
---|
| 55 | assert @c_boolean.default_value
|
---|
| 56 | assert @c_boolean.default_value(true)
|
---|
| 57 | assert_raise(ArgumentError) {@c_boolean.set_true_valid(false); @c_boolean.set_false_valid(false)}
|
---|
| 58 | assert_raise(ArgumentError) {OpenEHR::AM::Archetype::Constraint_Model::Primitive::C_Boolean.new(false,false,false)}
|
---|
| 59 | end
|
---|
| 60 | end
|
---|
| 61 |
|
---|