Integration of OCCT 6.5.0 from SVN

src/StepData/StepData_Simple.cdl

@@ -0,0 +1,95 @@
+-- File:	StepData_Simple.cdl
+-- Created:	Fri May  9 16:17:26 1997
+-- Author:	Christian CAILLET
+--		<cky@heliox.paris1.matra-dtv.fr>
+---Copyright:	 Matra Datavision 1997
+
+
+class Simple  from StepData    inherits Described from StepData
+
+    ---Purpose : A Simple Entity is defined by a type (which can heve super
+    --           types) and a list of parameters
+
+uses CString,
+     Check from Interface,  EntityIterator from Interface,
+     ESDescr from StepData,
+     Field from StepData, FieldListN from StepData
+
+raises InterfaceMismatch
+
+is
+
+    Create (descr : ESDescr) returns mutable Simple;
+    ---Purpose : Creates a Simple Entity
+
+    ESDescr (me) returns ESDescr;
+    ---Purpose : Returns description, as for simple
+
+    StepType (me) returns CString;
+    ---Purpose : Returns the recorded StepType (TypeName of its ESDescr)
+
+    	--  inherited
+
+    IsComplex (me) returns Boolean;
+    ---Purpose : Returns False
+
+
+    Matches (me; steptype : CString) returns Boolean;
+    ---Purpose : Tells if a step type is matched by <me>
+    --           For a Simple Entity : own type or super type
+    --           For a Complex Entity : one of the members
+
+    As (me; steptype : CString) returns mutable Simple;
+    ---Purpose : Returns a Simple Entity which matches with a Type in <me> :
+    --           For a Simple Entity : me if it matches, else a null handle
+    --           For a Complex Entity : the member which matches, else null
+
+    HasField (me; name : CString) returns Boolean;
+    ---Purpose : Tells if a Field brings a given name
+
+    Field (me; name : CString) returns Field
+    ---Purpose : Returns a Field from its name; read-only
+    	raises InterfaceMismatch;
+    --           raises if no Field for <name>
+    ---C++ : return const &
+
+    CField (me : mutable; name : CString) returns Field
+    ---Purpose : Returns a Field from its name; read or write
+    	raises InterfaceMismatch;
+    --           raises if no Field for <name>
+    ---C++ : return &
+
+    	--  more specific
+
+    NbFields (me) returns Integer;
+    ---Purpose : Returns the count of fields
+
+    FieldNum (me; num : Integer) returns Field;
+    ---Purpose : Returns a field from its rank, for read-only use
+    ---C++ : return const &
+
+    CFieldNum (me : mutable; num : Integer) returns Field;
+    ---Purpose : Returns a field from its rank, in order to modify it
+    ---C++ : return &
+
+    Fields (me) returns FieldListN;
+    ---Purpose : Returns the entire field list, read-only
+    ---C++ : return const &
+
+    CFields (me : mutable) returns FieldListN;
+    ---Purpose : Returns the entire field list, read or write
+    ---C++ : return &
+
+    	--
+
+    Check  (me; ach  : in out Check from Interface);
+    ---Purpose : Fills a Check by using its Description
+
+    Shared (me; list : in out EntityIterator from Interface);
+    ---Purpose : Fills an EntityIterator with entities shared by <me>
+
+fields
+
+    thefields : FieldListN;
+
+end Simple;