-- Created on: 1993-09-07 -- Created by: Christian CAILLET -- Copyright (c) 1993-1999 Matra Datavision -- Copyright (c) 1999-2012 OPEN CASCADE SAS -- -- The content of this file is subject to the Open CASCADE Technology Public -- License Version 6.5 (the "License"). You may not use the content of this file -- except in compliance with the License. Please obtain a copy of the License -- at http://www.opencascade.org and read it completely before using this file. -- -- The Initial Developer of the Original Code is Open CASCADE S.A.S., having its -- main offices at: 1, place des Freres Montgolfier, 78280 Guyancourt, France. -- -- The Original Code and all software distributed under the License is -- distributed on an "AS IS" basis, without warranty of any kind, and the -- Initial Developer hereby disclaims all such warranties, including without -- limitation, any warranties of merchantability, fitness for a particular -- purpose or non-infringement. Please see the License for the specific terms -- and conditions governing the rights and limitations under the License. deferred class SpecificModule from IGESData inherits Transient ---Purpose : This class defines some Services which are specifically -- attached to IGES Entities : Dump uses IGESEntity, IGESDumper, Messenger from Message is OwnDump (me; CN : Integer; ent : IGESEntity; dumper : IGESDumper; S : Messenger from Message; own : Integer) is deferred; ---Purpose : Specific Dump for each type of IGES Entity : it concerns only -- own parameters, the general data (Directory Part, Lists) are -- taken into account by the IGESDumper -- See class IGESDumper for the rules to follow for and -- level OwnCorrect (me; CN : Integer; ent : mutable IGESEntity) returns Boolean is virtual; ---Purpose : Specific Automatic Correction on own Parameters of an Entity. -- It works by setting in accordance redundant data, if there are -- when there is no ambiguity (else, it does nothing). -- Remark that classic Corrections on Directory Entry (to set -- void data) are taken into account alsewhere. -- -- For instance, many "Associativity Entities" have a Number of -- Properties which must have a fixed value. -- Or, a ConicalArc has its Form Number which records the kind of -- Conic, also determined from its coefficients -- But, a CircularArc of which Distances (Center-Start) and -- (Center-End) are not equal cannot be corrected ... -- -- Returns True if something has been corrected in -- By default, does nothing. If at least one of the Types -- processed by a sub-class of SpecificModule has a Correct -- procedure attached, this method can be redefined end SpecificModule;