OpenCascade/occt
1
0
Fork 0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-08-09 13:22:24 +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

4
src/Storage/Storage_CallBack.cdl
View File

@@ -22,12 +22,12 @@ uses Schema from Storage,
BaseDriver from Storage
is
New(me) returns mutable Persistent is deferred;
New(me) returns Persistent is deferred;
Add(me; aPers : Persistent from Standard; aSchema : Schema from Storage) is deferred;
Write(me; aPers : Persistent from Standard; aDriver : in out BaseDriver from Storage; aSchema : Schema from Storage) is deferred;
Read(me; aPers : mutable Persistent from Standard; aDriver : in out BaseDriver from Storage; aSchema : Schema from Storage) is deferred;
Read(me; aPers : Persistent from Standard; aDriver : in out BaseDriver from Storage; aSchema : Schema from Storage) is deferred;
end;

16
src/Storage/Storage_Data.cdl
View File

@@ -63,7 +63,7 @@ uses TypeData from Storage,
SequenceOfExtendedString from TColStd
is
Create returns mutable Data from Storage;
Create returns Data from Storage;
---Purpose:
-- Creates an empty set of data.
-- You explicitly create a Storage_Data object
@@ -160,11 +160,11 @@ is
-- number of roots stored in the read container.
-- Use the Roots function to get these roots in a sequence.
AddRoot(me; anObject : mutable Persistent from Standard);
AddRoot(me; anObject : Persistent from Standard);
---Purpose: add a persistent root to write. the name of the root
-- is a driver reference number.
AddRoot(me; aName : AsciiString from TCollection; anObject : mutable Persistent from Standard);
AddRoot(me; aName : AsciiString from TCollection; anObject : Persistent from Standard);
---Purpose: Adds the root anObject to this set of data.
-- The name of the root is aName if given; if not, it
-- will be a reference number assigned by the driver
@@ -188,7 +188,7 @@ is
-- contains the roots stored in the container read.
-- - An empty sequence is returned if there is no root in this set of data.
Find(me; aName : AsciiString from TCollection) returns mutable Root from Storage;
Find(me; aName : AsciiString from TCollection) returns Root from Storage;
---Purpose: Gives the root object whose name is aName in
-- this set of data. The returned object is a
-- Storage_Root object, from which the object it
@@ -217,10 +217,10 @@ is
-- PRIVATE
HeaderData(me) returns mutable HeaderData from Storage is private;
RootData(me) returns mutable RootData from Storage is private;
TypeData(me) returns mutable TypeData from Storage is private;
InternalData(me) returns mutable InternalData from Storage is private;
HeaderData(me) returns HeaderData from Storage is private;
RootData(me) returns RootData from Storage is private;
TypeData(me) returns TypeData from Storage is private;
InternalData(me) returns InternalData from Storage is private;
Clear(me) is private;
SetErrorStatus(me : mutable; anError : Error from Storage) is private;
SetErrorStatusExtension(me : mutable; anErrorExt : AsciiString from TCollection) is private;

4
src/Storage/Storage_DefaultCallBack.cdl
View File

@@ -24,12 +24,12 @@ uses Schema from Storage,
is
Create returns DefaultCallBack from Storage;
New(me) returns mutable Persistent;
New(me) returns Persistent;
Add(me; aPers : Persistent from Standard; aSchema : Schema from Storage);
Write(me; aPers : Persistent from Standard; aDriver : in out BaseDriver from Storage; aSchema : Schema from Storage);
Read(me; aPers : mutable Persistent from Standard; aDriver : in out BaseDriver from Storage; aSchema : Schema from Storage);
Read(me; aPers : Persistent from Standard; aDriver : in out BaseDriver from Storage; aSchema : Schema from Storage);
end;

2
src/Storage/Storage_HeaderData.cdl
View File

@@ -26,7 +26,7 @@ uses AsciiString from TCollection,
is
Create returns mutable HeaderData from Storage;
Create returns HeaderData from Storage;
CreationDate(me) returns AsciiString from TCollection;
---Purpose: return the creation date

2
src/Storage/Storage_InternalData.cdl
View File

@@ -22,7 +22,7 @@ uses BucketOfPersistent from Storage,
HPArray from Storage,
MapOfCallBack from Storage
is
Create returns mutable InternalData from Storage;
Create returns InternalData from Storage;
Clear(me : mutable);

6
src/Storage/Storage_Root.cdl
View File

@@ -34,10 +34,10 @@ inherits TShared from MMgt
uses AsciiString from TCollection
is
Create returns mutable Root from Storage;
Create returns Root from Storage;
Create(aName : AsciiString from TCollection;
anObject : Persistent from Standard) returns mutable Root from Storage;
anObject : Persistent from Standard) returns Root from Storage;
SetName(me : mutable; aName : AsciiString from TCollection);
Name(me) returns AsciiString from TCollection;
@@ -58,7 +58,7 @@ is
-- into the container.
SetObject(me : mutable; anObject : Persistent from Standard);
Object(me) returns mutable Persistent from Standard;
Object(me) returns Persistent from Standard;
---Purpose:
-- Returns the persistent object encapsulated by this root.
Type(me) returns AsciiString from TCollection;

8
src/Storage/Storage_RootData.cdl
View File

@@ -29,7 +29,7 @@ raises NoSuchObject from Standard
is
Create returns mutable RootData from Storage;
Create returns RootData from Storage;
NumberOfRoots(me) returns Integer from Standard;
---Purpose: returns the number of roots.
@@ -38,9 +38,9 @@ is
---Purpose: add a root to <me>. If a root with same name is present, it
-- will be replaced by <aRoot>.
Roots(me) returns mutable HSeqOfRoot from Storage;
Roots(me) returns HSeqOfRoot from Storage;
Find(me; aName : AsciiString from TCollection) returns mutable Root from Storage;
Find(me; aName : AsciiString from TCollection) returns Root from Storage;
---Purpose: find a root with name <aName>.
IsRoot(me; aName : AsciiString from TCollection) returns Boolean from Standard;
@@ -56,7 +56,7 @@ is
-- PRIVATE
UpdateRoot(me : mutable; aName : AsciiString from TCollection; aPers : mutable Persistent from Standard)
UpdateRoot(me : mutable; aName : AsciiString from TCollection; aPers : Persistent from Standard)
raises NoSuchObject
is private;

20
src/Storage/Storage_Schema.cdl
View File

@@ -85,7 +85,7 @@ is
---Purpose: returns the schema's name
Write(me; s : in out BaseDriver from Storage;
aData : mutable Data from Storage);
aData : Data from Storage);
---Purpose: Writes the data aggregated in aData into the
-- container defined by the driver s. The storage
-- operation is performed according to the data
@@ -94,7 +94,7 @@ is
-- to be stored together.
Read(me; s : in out BaseDriver from Storage)
returns mutable Data from Storage;
returns Data from Storage;
---Purpose: Returns the data read from the container defined
-- by the driver s. The retrieval operation is
-- performed according to the data schema with
@@ -104,20 +104,20 @@ is
-- the root objects from the container.
ReadHeaderSection(me; s : in out BaseDriver from Storage)
returns mutable HeaderData from Storage;
returns HeaderData from Storage;
---Purpose: read the header part of the stream
-- Arguments:
-- s: driver to read
ReadTypeSection(me; s : in out BaseDriver from Storage)
returns mutable TypeData from Storage;
returns TypeData from Storage;
---Purpose: fill the TypeData with the names of the type used
-- in a stream
-- Arguments:
-- s: driver to read
ReadRootSection(me; s : in out BaseDriver from Storage)
returns mutable RootData from Storage;
returns RootData from Storage;
---Purpose: read root part of the file
-- Arguments:
-- s: driver to read
@@ -275,24 +275,24 @@ is
---Level: Internal
IReadHeaderSection(me; s : in out BaseDriver from Storage;
iData : mutable HeaderData from Storage) returns Boolean
iData : HeaderData from Storage) returns Boolean
raises StreamFormatError is private;
---Level: Internal
IReadTypeSection(me; s : in out BaseDriver from Storage;
tData : mutable TypeData from Storage) returns Boolean
tData : TypeData from Storage) returns Boolean
raises StreamFormatError is private;
---Level: Internal
IReadRootSection(me; s : in out BaseDriver from Storage;
rData : mutable RootData from Storage) returns Boolean
rData : RootData from Storage) returns Boolean
raises StreamFormatError is private;
---Level: Internal
ISetCurrentData(myclass; dData : mutable Data from Storage) is private;
ISetCurrentData(myclass; dData : Data from Storage) is private;
---Level: Internal
ICurrentData(myclass) returns mutable Data from Storage is private;
ICurrentData(myclass) returns Data from Storage is private;
---Level: Internal
---C++: return &

2
src/Storage/Storage_TypeData.cdl
View File

@@ -25,7 +25,7 @@ uses HSequenceOfAsciiString from TColStd,
raises NoSuchObject from Standard
is
Create returns mutable TypeData from Storage;
Create returns TypeData from Storage;
NumberOfTypes(me) returns Integer from Standard;

4
src/Storage/Storage_TypedCallBack.cdl
View File

@@ -22,10 +22,10 @@ uses CallBack from Storage,
AsciiString from TCollection
is
Create returns mutable TypedCallBack from Storage;
Create returns TypedCallBack from Storage;
Create(aTypeName : AsciiString from TCollection; aCallBack : CallBack from Storage)
returns mutable TypedCallBack from Storage;
returns TypedCallBack from Storage;
SetType(me : mutable; aType : AsciiString from TCollection);
Type(me) returns AsciiString from TCollection;