OpenCascade/occt
1
0
Fork 0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-08-04 13:13:25 +03:00
Code Activity

0024830: Remove redundant keyword 'mutable' in CDL declarations

Browse Source 
Redundant keyword 'mutable' removed in CDL files.
In IGESConvGeom_GeomBuilder, unused methods MakeXY() and MakeXYZ() removed.
Method StepAP214_AutoDesignGroupAssignment::Init() replicating same method of the base class is removed as it causes CDL extraction error after above (seemingly irrelevant) changes.
This commit is contained in:
abv
2014-04-15 08:50:00 +04:00
committed by apn
parent 99c68ea35f
commit 6e33d3ced2
2421 changed files with 6557 additions and 6604 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
src/Transfer/Transfer_ActorDispatch.cdl
View File

@@ -34,22 +34,22 @@ raises InterfaceError
is
Create (amodel : InterfaceModel; lib : GeneralLib)
returns mutable ActorDispatch;
returns ActorDispatch;
---Purpose : Creates an ActorDispatch from a Model. Works with a General
-- Service Library, given as an Argument
-- This causes TransferDispatch and its TransientProcess to be
-- created, with default actor <me>
Create (amodel : InterfaceModel; protocol : Protocol from Interface)
returns mutable ActorDispatch;
returns ActorDispatch;
---Purpose : Same as above, but Library is defined through a Protocol
Create (amodel : InterfaceModel) returns mutable ActorDispatch
Create (amodel : InterfaceModel) returns ActorDispatch
---Purpose : Same as above, but works with the Active Protocol
raises InterfaceError;
-- Error if no Active Protocol is defined
AddActor (me : mutable; actor : mutable ActorOfTransientProcess from Transfer);
AddActor (me : mutable; actor : ActorOfTransientProcess from Transfer);
---Purpose : Utility which adds an actor to the default <me> (it calls
-- SetActor from the TransientProcess)
@@ -60,8 +60,8 @@ is
---C++ : return &
Transfer (me : mutable; start : Transient; TP : mutable TransientProcess)
returns mutable Binder is redefined;
Transfer (me : mutable; start : Transient; TP : TransientProcess)
returns Binder is redefined;
---Purpose : Specific action : it calls the method Transfer from CopyTool
-- i.e. the general service Copy, then returns the Binder
-- produced by the TransientProcess

14
src/Transfer/Transfer_ActorOfFinderProcess.cdl
View File

@@ -25,24 +25,24 @@ uses Finder, FinderProcess, ProcessForFinder, Binder
is
Create returns mutable ActorOfFinderProcess;
Create returns ActorOfFinderProcess;
ModeTrans (me : mutable) returns Integer;
---Purpose : Returns the Transfer Mode, modifiable
---C++ : return &
Transferring (me : mutable; start : Finder; TP : mutable ProcessForFinder)
returns mutable Binder is redefined;
Transferring (me : mutable; start : Finder; TP : ProcessForFinder)
returns Binder is redefined;
-- calls the one below
Transfer (me : mutable; start : Finder; TP : mutable FinderProcess)
returns mutable Binder is virtual;
Transfer (me : mutable; start : Finder; TP : FinderProcess)
returns Binder is virtual;
-- default calls TransferTransient if <start> is a TransientMapper,
-- i.e. does nothing, to be redefined
TransferTransient (me : mutable; start : Transient;
TP : mutable FinderProcess)
returns mutable Transient is virtual;
TP : FinderProcess)
returns Transient is virtual;
-- default does nothing, can be redefined
-- usefull when a result is Transient, simpler to define than Transfer with
-- a Finder

14
src/Transfer/Transfer_ActorOfTransientProcess.cdl
View File

@@ -22,19 +22,19 @@ uses Transient, TransientProcess, ProcessForTransient, Binder
is
Create returns mutable ActorOfTransientProcess;
Create returns ActorOfTransientProcess;
Transferring (me : mutable; start : Transient; TP : mutable ProcessForTransient)
returns mutable Binder is redefined;
Transferring (me : mutable; start : Transient; TP : ProcessForTransient)
returns Binder is redefined;
-- calls the one below
Transfer (me : mutable; start : Transient; TP : mutable TransientProcess)
returns mutable Binder is virtual;
Transfer (me : mutable; start : Transient; TP : TransientProcess)
returns Binder is virtual;
-- default calls TransferTransient i.e. does nothing, to be redefined
TransferTransient (me : mutable; start : Transient;
TP : mutable TransientProcess)
returns mutable Transient is virtual;
TP : TransientProcess)
returns Transient is virtual;
-- default does nothing, can be redefined
-- usefull when a result is Transient, simpler to define than Transfer with
-- a Binder

2
src/Transfer/Transfer_BinderOfTransientInteger.cdl
View File

@@ -27,7 +27,7 @@ uses Integer
is
Create returns mutable BinderOfTransientInteger;
Create returns BinderOfTransientInteger;
---Purpose : Creates an empty BinderOfTransientInteger; Default value for
-- the integer part is zero

10
src/Transfer/Transfer_DispatchControl.cdl
View File

@@ -27,11 +27,11 @@ raises InterfaceError
is
Create (model : InterfaceModel; TP : mutable TransientProcess)
returns mutable DispatchControl;
Create (model : InterfaceModel; TP : TransientProcess)
returns DispatchControl;
---Purpose : Creates the DispatchControl, ready for use
TransientProcess (me) returns mutable TransientProcess;
TransientProcess (me) returns TransientProcess;
---Purpose : Returns the content of the DispatchControl : it can be used
-- for a direct call, if the basic methods do not suffice
---C++ : return const &
@@ -45,12 +45,12 @@ is
Clear (me : mutable);
---Purpose : Clears the List of Copied Results
Bind (me : mutable; ent : Transient; res : mutable Transient)
Bind (me : mutable; ent : Transient; res : Transient)
---Purpose : Binds a (Transient) Result to a (Transient) Starting Entity
raises InterfaceError;
-- Error if <ent> is already bound
Search (me; ent : Transient; res : out mutable Transient)
Search (me; ent : Transient; res : out Transient)
returns Boolean;
---Purpose : Searches for the Result bound to a Starting Entity
-- If Found, returns True and fills <res>

2
src/Transfer/Transfer_Finder.cdl
View File

@@ -61,7 +61,7 @@ is
-- Returns True when done, False if this attribute did not exist
GetAttribute (me; name : CString; type : Type from Standard;
val : out mutable Transient) returns Boolean;
val : out Transient) returns Boolean;
---Purpose : Returns an attribute from its name, filtered by a type
-- If no attribute has this name, or if it is not kind of this
-- type, <val> is Null and returned value is False

2
src/Transfer/Transfer_FinderProcess.cdl
View File

@@ -25,7 +25,7 @@ uses InterfaceModel from Interface,
is
Create (nb : Integer = 10000) returns mutable FinderProcess;
Create (nb : Integer = 10000) returns FinderProcess;
---Purpose : Sets FinderProcess at initial state, with an initial size
SetModel (me : mutable; model : InterfaceModel);

2
src/Transfer/Transfer_MapContainer.cdl
View File

@@ -23,7 +23,7 @@ uses
is
Create returns mutable MapContainer from Transfer;
Create returns MapContainer from Transfer;
SetMapObjects(me : mutable; theMapObjects : in out DataMapOfTransientTransient from TColStd);
---Purposes:Set map already translated geometry objects.

2
src/Transfer/Transfer_Mapper.cdl
View File

@@ -33,7 +33,7 @@ uses CString
is
Create (akey : any TheKey) returns mutable Mapper;
Create (akey : any TheKey) returns Mapper;
---Purpose : Creates a Mapper with a Value. This Value can then not be
-- changed. It is used by the Hasher to compute the HashCode,
-- which will then be stored for an immediate reading.

8
src/Transfer/Transfer_MultipleBinder.cdl
View File

@@ -41,7 +41,7 @@ raises TransferFailure, OutOfRange
is
Create returns mutable MultipleBinder;
Create returns MultipleBinder;
---Purpose : normal standard constructor, creates an empty MultipleBinder
IsMultiple (me) returns Boolean is redefined;
@@ -56,13 +56,13 @@ is
-- Here, returns "(list)"
AddResult (me : mutable; res : mutable Transient);
AddResult (me : mutable; res : Transient);
---Purpose : Adds a new Item to the Multiple Result
NbResults (me) returns Integer;
---Purpose : Returns the actual count of recorded (Transient) results
ResultValue (me; num : Integer) returns mutable Transient
ResultValue (me; num : Integer) returns Transient
---Purpose : Returns the value of the recorded result n0 <num>
raises OutOfRange;
-- Error if <num> is out of range
@@ -72,7 +72,7 @@ is
-- Item). Else, returns a Null Handle
SetMultipleResult (me : mutable;
mulres : mutable HSequenceOfTransient from TColStd)
mulres : HSequenceOfTransient from TColStd)
raises TransferFailure;
---Purpose : Defines a Binding with a Multiple Result, given as a Sequence
-- Error if a Unique Result has yet been defined

4
src/Transfer/Transfer_ResultFromModel.cdl
View File

@@ -38,7 +38,7 @@ uses CString, AsciiString, HSequenceOfTransient from TColStd,
is
Create returns mutable ResultFromModel;
Create returns ResultFromModel;
---Purpose : Creates a ResultFromModel, empty
SetModel (me : mutable; model : InterfaceModel);
@@ -71,7 +71,7 @@ is
-- and MainResult but only the result (Binder)
-- mode = 11 : also clears MainResult (status and names remain)
FillBack (me; TP : mutable TransientProcess);
FillBack (me; TP : TransientProcess);
---Purpose : Fills back a TransientProcess from the structured set of
-- binders. Also sets the Model.

8
src/Transfer/Transfer_ResultFromTransient.cdl
View File

@@ -30,7 +30,7 @@ uses Transient, HSequenceOfTransient, IndexedMapOfTransient,
is
Create returns mutable ResultFromTransient;
Create returns ResultFromTransient;
---Purpose : Creates a ResultFromTransient, empty
SetStart (me : mutable; start : any Transient);
@@ -59,13 +59,13 @@ is
ClearSubs (me : mutable);
---Purpose : Clears the list of (immediate) sub-results
AddSubResult (me : mutable; sub : mutable ResultFromTransient);
AddSubResult (me : mutable; sub : ResultFromTransient);
---Purpose : Adds a sub-result
NbSubResults (me) returns Integer;
---Purpose : Returns the count of recorded sub-results
SubResult (me; num : Integer) returns mutable ResultFromTransient;
SubResult (me; num : Integer) returns ResultFromTransient;
---Purpose : Returns a sub-result, given its rank
ResultFromKey (me; key : Transient) returns ResultFromTransient;
@@ -89,7 +89,7 @@ is
-- the list of sub-scoped binders, which is now recorded as
-- sub-results
FillBack (me; TP : mutable TransientProcess);
FillBack (me; TP : TransientProcess);
---Purpose : Fills back a TransientProcess with definition of a
-- ResultFromTransient, respectfully to its structuration in
-- scopes

2
src/Transfer/Transfer_SimpleBinderOfTransient.cdl
View File

@@ -26,7 +26,7 @@ raises TransferFailure
is
Create returns mutable SimpleBinderOfTransient;
Create returns SimpleBinderOfTransient;
---Purpose : Creates an empty SimpleBinderOfTransient
-- IsMultiple (me) returns Boolean;

4
src/Transfer/Transfer_TransferDispatch.cdl
View File

@@ -52,11 +52,11 @@ is
raises InterfaceError;
-- Error if no Active Protocol is defined
TransientProcess (me) returns mutable TransientProcess;
TransientProcess (me) returns TransientProcess;
---Purpose : Returns the content of Control Object, as a TransientProcess
Copy (me : in out; entfrom : Transient; entto : out mutable Transient;
Copy (me : in out; entfrom : Transient; entto : out Transient;
mapped : Boolean; errstat : Boolean)
returns Boolean is redefined;
---Purpose : Copies an Entity by calling the method Transferring from the

8
src/Transfer/Transfer_TransferInput.cdl
View File

@@ -39,7 +39,7 @@ is
FillModel (me; proc : TransientProcess;
amodel : mutable InterfaceModel)
amodel : InterfaceModel)
---Purpose : Fills an InterfaceModel with the Complete Result of a Transfer
-- stored in a TransientProcess (Starting Objects are Transient)
-- The complete result is exactly added to the model
@@ -47,7 +47,7 @@ is
-- Error if one of the Resulting Objects is defined not Transient
FillModel (me; proc : TransientProcess;
amodel : mutable InterfaceModel;
amodel : InterfaceModel;
proto : Protocol from Interface;
roots : Boolean = Standard_True)
---Purpose : Fills an InterfaceModel with results of the Transfer recorded
@@ -60,7 +60,7 @@ is
FillModel (me; proc : FinderProcess;
amodel : mutable InterfaceModel)
amodel : InterfaceModel)
---Purpose : Fills an InterfaceModel with the Complete Result of a Transfer
-- stored in a TransientProcess (Starting Objects are Transient)
-- The complete result is exactly added to the model
@@ -68,7 +68,7 @@ is
-- Error if one of the Resulting Objects is defined not Transient
FillModel (me; proc : FinderProcess;
amodel : mutable InterfaceModel;
amodel : InterfaceModel;
proto : Protocol from Interface;
roots : Boolean = Standard_True)
---Purpose : Fills an InterfaceModel with results of the Transfer recorded

8
src/Transfer/Transfer_TransferOutput.cdl
View File

@@ -33,11 +33,11 @@ raises NoSuchObject, TransferFailure
is
Create (actor : mutable ActorOfTransientProcess; amodel : InterfaceModel)
Create (actor : ActorOfTransientProcess; amodel : InterfaceModel)
returns TransferOutput;
---Purpose : Creates a TransferOutput ready to use, with a TransientProcess
Create (proc : mutable TransientProcess; amodel : InterfaceModel)
Create (proc : TransientProcess; amodel : InterfaceModel)
returns TransferOutput;
---Purpose : Creates a TransferOutput from an already existing
-- TransientProcess, and a Model
@@ -52,7 +52,7 @@ is
Model (me) returns InterfaceModel;
---Purpose : Returns the Starting Model
TransientProcess (me) returns mutable TransientProcess;
TransientProcess (me) returns TransientProcess;
---Purpose : Returns the TransientProcess used to work
Transfer (me : in out; obj : Transient)
@@ -94,7 +94,7 @@ is
ModelForStatus (me; protocol : Protocol;
normal : Boolean; roots : Boolean = Standard_True)
returns mutable InterfaceModel;
returns InterfaceModel;
---Purpose : Fills a Model with the list determined by ListForStatus
-- This model starts from scratch (made by NewEmptyModel from the
-- current Model), then is filled by AddWithRefs

46
src/Transfer/Transfer_TransferProcess.cdl
View File

@@ -192,7 +192,7 @@ raises InterfaceError, TransferFailure
is
Create returns mutable Actor;
Create returns Actor;
Recognize (me : mutable; start : TheStart)
returns Boolean is virtual;
@@ -209,8 +209,8 @@ raises InterfaceError, TransferFailure
-- The provided default returns True, can be redefined
Transferring (me : mutable;
start : TheStart; TP : mutable TransferProcess)
returns mutable Binder
start : TheStart; TP : TransferProcess)
returns Binder
---Purpose : Specific action of Transfer. The Result is stored in
-- the returned Binder, or a Null Handle for "No result"
-- (Default defined as doing nothing; should be deffered)
@@ -221,11 +221,11 @@ raises InterfaceError, TransferFailure
-- exception can be raised
TransientResult (me; res : any Transient)
returns mutable SimpleBinderOfTransient;
returns SimpleBinderOfTransient;
---Purpose : Prepares and Returns a Binder for a Transient Result
-- Returns a Null Handle if <res> is itself Null
NullResult (me) returns mutable Binder;
NullResult (me) returns Binder;
---Purpose : Returns a Binder for No Result, i.e. a Null Handle
@@ -239,14 +239,14 @@ raises InterfaceError, TransferFailure
IsLast (me) returns Boolean;
---Purpose : Returns the Last status (see SetLast).
SetNext (me : mutable; next : mutable Actor);
SetNext (me : mutable; next : Actor);
---Purpose : Defines a Next Actor : it can then be asked to work if
-- <me> produces no result for a given type of Object.
-- If Next is already set and is not "Last", calls
-- SetNext on it. If Next defined and "Last", the new
-- actor is added before it in the list
Next (me) returns mutable Actor;
Next (me) returns Actor;
---Purpose : Returns the Actor defined as Next, or a Null Handle
fields
@@ -260,14 +260,14 @@ raises InterfaceError, TransferFailure
is
Create (nb : Integer = 10000) returns mutable TransferProcess from Transfer;
Create (nb : Integer = 10000) returns TransferProcess from Transfer;
---Purpose : Sets TransferProcess at initial state. Gives an Initial size
-- (indicative) for the Map when known (default is 10000).
-- Sets default trace file as a printer and default trace level
-- (see Message_TraceFile).
Create (printer: Messenger from Message; nb: Integer = 10000)
returns mutable TransferProcess from Transfer;
returns TransferProcess from Transfer;
---Purpose : Sets TransferProcess at initial state. Gives an Initial size
-- (indicative) for the Map when known (default is 10000).
-- Sets a specified printer.
@@ -286,12 +286,12 @@ is
---Purpose : Resizes the Map as required (if a new reliable value has been
-- determined). Acts only if <nb> is greater than actual NbMapped
SetActor (me : mutable; actor : mutable Actor);
SetActor (me : mutable; actor : Actor);
---Purpose : Defines an Actor, which is used for automatic Transfer
-- If already defined, the new Actor is cumulated
-- (see SetNext from Actor)
Actor (me) returns mutable Actor;
Actor (me) returns Actor;
---Purpose : Returns the defined Actor. Returns a Null Handle if
-- not set.
@@ -299,7 +299,7 @@ is
-- This access works on : Binder (default), or Handle Result
-- (Transient,Finder) as privileged kinds of Result
Find (me; start : TheStart) returns mutable Binder;
Find (me; start : TheStart) returns Binder;
---Purpose : Returns the Binder which is linked with a starting Object
-- It can either bring a Result (Transfer done) or none (for a
-- pre-binding).
@@ -320,13 +320,13 @@ is
-- Considers a category number, by default 0
FindAndMask (me : mutable; start : TheStart)
returns mutable Binder is private;
returns Binder is private;
---Purpose : Same as Find but stores the last access to the map, for a
-- faster access on next calls (as Bind does too)
-- Considers a category number, by default 0
-- C++ : return const &
Bind (me : mutable; start : TheStart; binder : mutable Binder)
Bind (me : mutable; start : TheStart; binder : Binder)
---Purpose : Creates a Link a starting Object with a Binder. This Binder
-- can either bring a Result (effective Binding) or none (it can
-- be set later : pre-binding).
@@ -335,7 +335,7 @@ is
-- Error if a Binder with a Result set is already linked with
-- this Object (Binder with StatusResult not Initial)
Rebind (me : mutable; start : TheStart; binder : mutable Binder)
Rebind (me : mutable; start : TheStart; binder : Binder)
---Purpose : Changes the Binder linked with a starting Object for its
-- unitary transfer. This it can be useful when the exact form
-- of the result is known once the transfer is widely engaged.
@@ -356,7 +356,7 @@ is
-- Error if : - the Result is known as Already Used
FindElseBind (me : mutable; start : TheStart)
returns mutable Binder;
returns Binder;
---Purpose : Returns a Binder for a starting entity, as follows :
-- Tries to Find the already bound one
-- If none found, creates a VoidBinder and Binds it
@@ -489,7 +489,7 @@ is
-- Error if a UNIQUE result is already bound (if a Multiple
-- Result is, nothing is done)
AddMultiple (me : mutable; start : TheStart; res : mutable Transient)
AddMultiple (me : mutable; start : TheStart; res : Transient)
---Purpose : Adds an item to a list of results bound to a starting object.
-- Considers a category number, by default 0, for all results
raises TransferFailure;
@@ -497,7 +497,7 @@ is
-- to <start> (none at all, or for a unique result)
FindTypedTransient (me; start : TheStart; atype : Type from Standard;
val : out mutable Transient) returns Boolean;
val : out Transient) returns Boolean;
---Purpose : Searches for a transient result attached to a starting object,
-- according to its type, by criterium IsKind(atype)
--
@@ -511,7 +511,7 @@ is
-- immediately used, well initialised
GetTypedTransient (me; binder : Binder; atype : Type from Standard;
val : out mutable Transient) returns Boolean;
val : out Transient) returns Boolean;
---Purpose : Searches for a transient result recorded in a Binder, whatever
-- this Binder is recorded or not in <me>
--
@@ -534,7 +534,7 @@ is
MapIndex (me; start : TheStart) returns Integer;
---Purpose : Returns the Index value bound to a Starting Object, 0 if none
MapItem (me; num : Integer) returns mutable Binder;
MapItem (me; num : Integer) returns Binder;
---Purpose : Returns the Binder bound to an Index
-- Considers a category number, by default 0
@@ -563,7 +563,7 @@ is
---Purpose : Returns a Root Entity given its number in the list (1-NbRoots)
---C++ : return const &
RootItem (me; num : Integer) returns mutable Binder;
RootItem (me; num : Integer) returns Binder;
---Purpose : Returns the Binder bound with a Root Entity given its number
-- Considers a category number, by default 0
@@ -586,7 +586,7 @@ is
---Purpose : Tells if <start> has been recognized as good candidate for
-- Transfer. i.e. queries the Actor and its Nexts
Transferring (me : mutable; start : TheStart) returns mutable Binder
Transferring (me : mutable; start : TheStart) returns Binder
---Purpose : Performs the Transfer of a Starting Object, by calling
-- the method TransferProduct (see below).
-- Mapping and Roots are managed : nothing is done if a Result is
@@ -599,7 +599,7 @@ is
-- the method SetErrorHandle for more details
-- C++ : return const &
TransferProduct (me : mutable; start : TheStart) returns mutable Binder
TransferProduct (me : mutable; start : TheStart) returns Binder
---Purpose : Internal action of Transfer, called by Transferring, with or
-- without ErrorHandle. It invokes the Actor to work (set by
-- SetActor), and tries its Nexts if no result is produced,

6
src/Transfer/Transfer_TransientListBinder.cdl
View File

@@ -28,10 +28,10 @@ raises TypeMismatch, OutOfRange
is
Create returns mutable TransientListBinder;
Create returns TransientListBinder;
Create (list : mutable HSequenceOfTransient from TColStd)
returns mutable TransientListBinder;
Create (list : HSequenceOfTransient from TColStd)
returns TransientListBinder;
IsMultiple (me) returns Boolean is redefined;
-- returns True if more than one result

2
src/Transfer/Transfer_TransientProcess.cdl
View File

@@ -31,7 +31,7 @@ uses Transient, Type,
is
Create (nb : Integer = 10000) returns mutable TransientProcess;
Create (nb : Integer = 10000) returns TransientProcess;
---Purpose : Sets TransientProcess at initial state, with an initial size
SetModel (me : mutable; model : InterfaceModel);

2
src/Transfer/Transfer_VoidBinder.cdl
View File

@@ -26,7 +26,7 @@ uses CString, Type
is
Create returns mutable VoidBinder;
Create returns VoidBinder;
-- IsMultiple (me) returns Boolean;
---Purpose : a VoidBinder is not Multiple (Remark : it is not Simple too)