Changeset 21 for ruby/trunk/models/am/archetype/constraint_model

Timestamp:

Apr 30, 2008, 8:34:43 PM (16 years ago)

Author:

Tatsukawa, Akimichi

Message:

created an experimental openehr_models gem package

Location:

ruby/trunk/models/am/archetype/constraint_model

Files:

• archetype_constraint.rb (modified) (1 diff)
• primitive.rb (modified) (4 diffs)

ruby/trunk/models/am/archetype/constraint_model/archetype_constraint.rb

@@ -4 +4 @@
     module Archetype
       module Constraint_Model
-        class Archetype_Constraint
+        class ARCHETYPE_CONSTRAINT
           
         end
+
+        class C_OBJECT < ARCHETYPE_CONSTRAINT
+          
+        end
+
+        class C_ATTRIBUTE < ARCHETYPE_CONSTRAINT
+          
+        end
+
+        class C_DEFINED_OBJECT < C_OBJECT
+          
+        end
+
+        class C_PRIMITIVE_OBJECT < C_DEFINED_OBJECT
+          
+        end
+
+        class C_COMPLEX_OBJECT < C_DEFINED_OBJECT
+          attr_accessor :attributes, :attributes_valid
+          
+        end
+
+        class C_DOMAIN_TYPE < C_DEFINED_OBJECT
+          
+        end
+
+        class C_REFERENCE_OBJECT < C_OBJECT
+          
+        end
+
+        class ARCHETYPE_INTERNAL_REF < C_REFERENCE_OBJECT
+          
+        end
+
+        class ARCHETYPE_SLOT < C_REFERENCE_OBJECT
+          
+        end
+
+        class CONSTRAINT_REF < C_REFERENCE_OBJECT
+          
+        end
+
       end
     end

ruby/trunk/models/am/archetype/constraint_model/primitive.rb

@@ -3 +3 @@
     module Archetype
       module Constraint_Model
+
         module Primitive
+
           class C_Primitive
             def assumed_value
@@ -18 +20 @@
             end
           end
+
           class C_Boolean < C_Primitive
             attr_accessor :assumed_value
@@ -50 +53 @@
               end              
             end
+
             private 
+
             def binary_consistency(true_valid, false_valid)
               if !true_valid && !false_valid
@@ -57 +62 @@
             end
           end # of C_Boolean
+
           class C_Integer < C_Primitive