| 1 | -- File: StepData_DefaultGeneral.cdl |
| 2 | -- Created: Fri Mar 26 10:22:38 1993 |
| 3 | -- Author: Christian CAILLET |
| 4 | -- <cky@phylox> |
| 5 | ---Copyright: Matra Datavision 1993 |
| 6 | |
| 7 | |
| 8 | class DefaultGeneral from StepData inherits GeneralModule from StepData |
| 9 | |
| 10 | ---Purpose : DefaultGeneral defines a GeneralModule which processes |
| 11 | -- Unknown Entity from StepData only |
| 12 | |
| 13 | uses OStream, Transient , |
| 14 | EntityIterator , CopyTool, Check, ShareTool |
| 15 | |
| 16 | is |
| 17 | |
| 18 | Create returns mutable DefaultGeneral; |
| 19 | ---Purpose : Creates a Default General Module |
| 20 | |
| 21 | -- Reconduction because limitation cdl -- |
| 22 | |
| 23 | FillSharedCase (me; casenum : Integer; ent : Transient; |
| 24 | iter : in out EntityIterator); |
| 25 | ---Purpose : Specific filling of the list of Entities shared by an Entity |
| 26 | -- <ent>, which is an UnknownEntity from StepData. |
| 27 | |
| 28 | CheckCase (me; casenum : Integer; ent : Transient; shares : ShareTool; |
| 29 | ach : in out Check); |
| 30 | ---Purpose : Specific Checking of an Entity <ent> |
| 31 | |
| 32 | NewVoid (me; CN : Integer; entto : out mutable Transient) |
| 33 | returns Boolean; |
| 34 | ---Purpose : Specific creation of a new void entity |
| 35 | |
| 36 | CopyCase (me; casenum : Integer; |
| 37 | entfrom : Transient; entto : mutable Transient; |
| 38 | TC : in out CopyTool); |
| 39 | ---Purpose : Specific Copy ("Deep") from <entfrom> to <entto> (same type) |
| 40 | -- by using a CopyTool which provides its working Map. |
| 41 | -- Use method Transferred from TransferControl to work |
| 42 | |
| 43 | |
| 44 | end DefaultGeneral; |