mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-08-09 13:22:24 +03:00
0024841: Remove duplicated and/or unused instances of collections
Removed duplicated instantiations of TCollection classes: - BRepMAT2d_SequenceOfBasicElt: duplicates MAT_SequenceOfBasicElt - BRepMesh_NodeHasherOfDataStructureOfDelaun, BRepMesh_IDMapOfNodeOfDataStructureOfDelaun: not used - QADNaming_DataMapOfShapeOfName: duplicates DNaming_DataMapOfShapeOfName - TDF_LabelLabelMap: not used - Graphic3d_SequenceOfAddress: not used - CDM_StackOfDocument: duplicates ListOfDocument (after fix on #24742) - Draw_MapOfFunctions: duplicates Plugin_MapOfFunctions - ExprIntrp_SkackOfNames: duplicates TColStd_ListOfAsciiString (after fix on #24742) - in package Storage: (H)SeqOfPersistent, MapPSDHasher, (H)SeqOfCallback: not used In addition, inheritance of MeshVS_ColorHasher from TColStd_MapIntegerHasher is dropped as it is useless but leads to problems if TColStd_MapIntegerHasher is converted to template. First of the two overloaded functions Draw::Load() removed as it is unused. Removed unused classes and files from PCollection and related packages.
This commit is contained in:
abv
apn
@@ -1,4 +0,0 @@
|
||||
PCollection_Compare.gxx
|
||||
PCollection_CMPLRS.edl
|
||||
PCollection_LDSHR.edl
|
||||
PCollection_WOKSteps.edl
|
||||
@@ -35,50 +35,12 @@ is
|
||||
|
||||
generic class HArray2, FieldOfHArray2 ;
|
||||
|
||||
generic class HSingleList;
|
||||
---Purpose: The private generic class SingleList represents
|
||||
-- a sequence of 0 or more linked items.
|
||||
|
||||
generic class HDoubleList;
|
||||
---Purpose: A List is a sequence of zero or more items
|
||||
-- Each item has two pointers (backward,forward)
|
||||
|
||||
|
||||
generic class HSequence,SeqNode,SeqExplorer;
|
||||
|
||||
---Purpose: Generic sequence of elements
|
||||
-- indexed by an integer in the range 1..N.
|
||||
|
||||
|
||||
generic class Hash;
|
||||
|
||||
---Purpose: Definition of hash function. This class is used by Map
|
||||
-- class and may be redefined by user.
|
||||
|
||||
|
||||
deferred generic class Compare ;
|
||||
|
||||
---Purpose: Defines a comparison operator which can be used by
|
||||
-- any ordered structure. The way to compare items
|
||||
-- has to be described in subclasses, which inherit
|
||||
-- from instantiations of Compare.
|
||||
|
||||
private deferred class PrivCompareOfInteger
|
||||
instantiates Compare from PCollection(Integer);
|
||||
|
||||
private deferred class PrivCompareOfReal
|
||||
instantiates Compare from PCollection(Real);
|
||||
|
||||
class CompareOfInteger;
|
||||
|
||||
class CompareOfReal;
|
||||
|
||||
enumeration Side is Left , Right;
|
||||
|
||||
exception IsNotRoot inherits Failure;
|
||||
exception IsNullTree inherits Failure;
|
||||
exception IsContained inherits Failure;
|
||||
|
||||
class HAsciiString;
|
||||
|
||||
class HExtendedString;
|
||||
|
||||
@@ -1,17 +0,0 @@
|
||||
-- Copyright (c) 1998-1999 Matra Datavision
|
||||
-- Copyright (c) 1999-2014 OPEN CASCADE SAS
|
||||
--
|
||||
-- This file is part of Open CASCADE Technology software library.
|
||||
--
|
||||
-- This library is free software; you can redistribute it and/or modify it under
|
||||
-- the terms of the GNU Lesser General Public License version 2.1 as published
|
||||
-- by the Free Software Foundation, with special exception defined in the file
|
||||
-- OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
|
||||
-- distribution for complete text of the license and disclaimer of any warranty.
|
||||
--
|
||||
-- Alternatively, this file may be used under the terms of Open CASCADE
|
||||
-- commercial license or contractual agreement.
|
||||
|
||||
@if ( ( %Station == "ao1" ) && ( %DBMS == "OBJS" ) ) then
|
||||
@uses "OBJSCMPLRS.edl";
|
||||
@endif;
|
||||
@@ -1,46 +0,0 @@
|
||||
-- Created on: 1991-05-14
|
||||
-- Created by: Annick PANCHER
|
||||
-- Copyright (c) 1991-1999 Matra Datavision
|
||||
-- Copyright (c) 1999-2014 OPEN CASCADE SAS
|
||||
--
|
||||
-- This file is part of Open CASCADE Technology software library.
|
||||
--
|
||||
-- This library is free software; you can redistribute it and/or modify it under
|
||||
-- the terms of the GNU Lesser General Public License version 2.1 as published
|
||||
-- by the Free Software Foundation, with special exception defined in the file
|
||||
-- OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
|
||||
-- distribution for complete text of the license and disclaimer of any warranty.
|
||||
--
|
||||
-- Alternatively, this file may be used under the terms of Open CASCADE
|
||||
-- commercial license or contractual agreement.
|
||||
|
||||
-- Revised: Mireille MERCIEN
|
||||
|
||||
|
||||
deferred generic class Compare from PCollection ( Item as Storable)
|
||||
inherits Storable
|
||||
|
||||
---Purpose: Defines a comparison operator which can be used by
|
||||
-- any ordered structure. The way to compare items
|
||||
-- has to be described in subclasses, which inherit
|
||||
-- from instantiations of Compare.
|
||||
|
||||
is
|
||||
|
||||
IsLower (me; Left, Right: Item)
|
||||
---Purpose: Returns True if <Left> is lower than <Right>
|
||||
returns Boolean is virtual;
|
||||
---Level: Public
|
||||
|
||||
IsGreater (me; Left, Right: Item)
|
||||
---Purpose: Returns True if <Left> is greater than <Right>
|
||||
returns Boolean is virtual;
|
||||
---Level: Public
|
||||
|
||||
IsEqual(me; Left, Right: Item)
|
||||
---Purpose: Returns True when <Right> and <Left> are equal.
|
||||
returns Boolean;
|
||||
---Level: Public
|
||||
end;
|
||||
|
||||
|
||||
@@ -1,51 +0,0 @@
|
||||
// Created on: 1992-08-27
|
||||
// Created by: Mireille MERCIEN
|
||||
// Copyright (c) 1992-1999 Matra Datavision
|
||||
// Copyright (c) 1999-2014 OPEN CASCADE SAS
|
||||
//
|
||||
// This file is part of Open CASCADE Technology software library.
|
||||
//
|
||||
// This library is free software; you can redistribute it and/or modify it under
|
||||
// the terms of the GNU Lesser General Public License version 2.1 as published
|
||||
// by the Free Software Foundation, with special exception defined in the file
|
||||
// OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
|
||||
// distribution for complete text of the license and disclaimer of any warranty.
|
||||
//
|
||||
// Alternatively, this file may be used under the terms of Open CASCADE
|
||||
// commercial license or contractual agreement.
|
||||
|
||||
#include <Standard_NotImplemented.hxx>
|
||||
#include <Standard_ProgramError.hxx>
|
||||
|
||||
// -----------
|
||||
// IsLower :
|
||||
// -----------
|
||||
Standard_Boolean PCollection_Compare::IsLower (const Item& ,
|
||||
const Item& ) const
|
||||
{
|
||||
// Standard_NotImplemented::Raise();
|
||||
return Standard_False;
|
||||
}
|
||||
|
||||
// -----------
|
||||
// IsGreater :
|
||||
// -----------
|
||||
Standard_Boolean PCollection_Compare::IsGreater (const Item& ,
|
||||
const Item& ) const
|
||||
{
|
||||
// Standard_NotImplemented::Raise();
|
||||
return Standard_False;
|
||||
}
|
||||
|
||||
// -----------
|
||||
// IsEqual :
|
||||
// -----------
|
||||
Standard_Boolean PCollection_Compare::IsEqual (const Item& ,
|
||||
const Item& ) const
|
||||
{
|
||||
// return (Left == Right) ;
|
||||
Standard_ProgramError::Raise("PCollection_Compare::IsEqual : Obsolete method...");
|
||||
return Standard_False;
|
||||
}
|
||||
|
||||
|
||||
@@ -1,37 +0,0 @@
|
||||
-- Created on: 1992-08-27
|
||||
-- Created by: Mireille MERCIEN
|
||||
-- Copyright (c) 1992-1999 Matra Datavision
|
||||
-- Copyright (c) 1999-2014 OPEN CASCADE SAS
|
||||
--
|
||||
-- This file is part of Open CASCADE Technology software library.
|
||||
--
|
||||
-- This library is free software; you can redistribute it and/or modify it under
|
||||
-- the terms of the GNU Lesser General Public License version 2.1 as published
|
||||
-- by the Free Software Foundation, with special exception defined in the file
|
||||
-- OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
|
||||
-- distribution for complete text of the license and disclaimer of any warranty.
|
||||
--
|
||||
-- Alternatively, this file may be used under the terms of Open CASCADE
|
||||
-- commercial license or contractual agreement.
|
||||
|
||||
class CompareOfInteger from PCollection
|
||||
inherits
|
||||
PrivCompareOfInteger
|
||||
|
||||
is
|
||||
|
||||
Create ;
|
||||
|
||||
IsLower (me; Left, Right: Integer)
|
||||
---Purpose: Returns True if <Left> is lower than <Right>.
|
||||
---Level: Public
|
||||
returns Boolean
|
||||
is redefined;
|
||||
|
||||
IsGreater (me; Left, Right: Integer)
|
||||
---Purpose: Returns True if <Left> is greater than <Right>.
|
||||
---Level: Public
|
||||
returns Boolean
|
||||
is redefined;
|
||||
|
||||
end;
|
||||
@@ -1,42 +0,0 @@
|
||||
// Created on: 1992-08-27
|
||||
// Created by: Mireille MERCIEN
|
||||
// Copyright (c) 1992-1999 Matra Datavision
|
||||
// Copyright (c) 1999-2014 OPEN CASCADE SAS
|
||||
//
|
||||
// This file is part of Open CASCADE Technology software library.
|
||||
//
|
||||
// This library is free software; you can redistribute it and/or modify it under
|
||||
// the terms of the GNU Lesser General Public License version 2.1 as published
|
||||
// by the Free Software Foundation, with special exception defined in the file
|
||||
// OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
|
||||
// distribution for complete text of the license and disclaimer of any warranty.
|
||||
//
|
||||
// Alternatively, this file may be used under the terms of Open CASCADE
|
||||
// commercial license or contractual agreement.
|
||||
|
||||
#include <PCollection_CompareOfInteger.ixx>
|
||||
|
||||
// -----------
|
||||
// Create :
|
||||
// -----------
|
||||
PCollection_CompareOfInteger::PCollection_CompareOfInteger()
|
||||
{
|
||||
}
|
||||
|
||||
// -----------
|
||||
// IsLower :
|
||||
// -----------
|
||||
Standard_Boolean PCollection_CompareOfInteger::IsLower (
|
||||
const Standard_Integer &Left,const Standard_Integer &Right) const
|
||||
{
|
||||
return (Left < Right) ;
|
||||
}
|
||||
|
||||
// -----------
|
||||
// IsGreater :
|
||||
// -----------
|
||||
Standard_Boolean PCollection_CompareOfInteger::IsGreater (
|
||||
const Standard_Integer &Left,const Standard_Integer &Right) const
|
||||
{
|
||||
return (Left > Right) ;
|
||||
}
|
||||
@@ -1,37 +0,0 @@
|
||||
-- Created on: 1992-08-27
|
||||
-- Created by: Mireille MERCIEN
|
||||
-- Copyright (c) 1992-1999 Matra Datavision
|
||||
-- Copyright (c) 1999-2014 OPEN CASCADE SAS
|
||||
--
|
||||
-- This file is part of Open CASCADE Technology software library.
|
||||
--
|
||||
-- This library is free software; you can redistribute it and/or modify it under
|
||||
-- the terms of the GNU Lesser General Public License version 2.1 as published
|
||||
-- by the Free Software Foundation, with special exception defined in the file
|
||||
-- OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
|
||||
-- distribution for complete text of the license and disclaimer of any warranty.
|
||||
--
|
||||
-- Alternatively, this file may be used under the terms of Open CASCADE
|
||||
-- commercial license or contractual agreement.
|
||||
|
||||
class CompareOfReal from PCollection
|
||||
inherits
|
||||
PrivCompareOfReal
|
||||
|
||||
is
|
||||
|
||||
Create;
|
||||
|
||||
IsLower (me; Left, Right: Real)
|
||||
---Purpose: Returns True if <Left> is lower than <Right>.
|
||||
---Level: Public
|
||||
returns Boolean
|
||||
is redefined;
|
||||
|
||||
IsGreater (me; Left, Right: Real)
|
||||
---Purpose: Returns True if <Left> is greater than <Right>.
|
||||
---Level: Public
|
||||
returns Boolean
|
||||
is redefined;
|
||||
|
||||
end;
|
||||
@@ -1,49 +0,0 @@
|
||||
// Created on: 1992-08-27
|
||||
// Created by: Mireille MERCIEN
|
||||
// Copyright (c) 1992-1999 Matra Datavision
|
||||
// Copyright (c) 1999-2014 OPEN CASCADE SAS
|
||||
//
|
||||
// This file is part of Open CASCADE Technology software library.
|
||||
//
|
||||
// This library is free software; you can redistribute it and/or modify it under
|
||||
// the terms of the GNU Lesser General Public License version 2.1 as published
|
||||
// by the Free Software Foundation, with special exception defined in the file
|
||||
// OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
|
||||
// distribution for complete text of the license and disclaimer of any warranty.
|
||||
//
|
||||
// Alternatively, this file may be used under the terms of Open CASCADE
|
||||
// commercial license or contractual agreement.
|
||||
|
||||
// Do not delete this line. Used by sccs.
|
||||
|
||||
#include <PCollection_CompareOfReal.ixx>
|
||||
|
||||
// -----------
|
||||
// Create :
|
||||
// -----------
|
||||
PCollection_CompareOfReal::PCollection_CompareOfReal()
|
||||
{
|
||||
}
|
||||
|
||||
// -----------
|
||||
// IsLower :
|
||||
// -----------
|
||||
Standard_Boolean PCollection_CompareOfReal::IsLower (
|
||||
const Standard_Real &Left,const Standard_Real &Right) const
|
||||
{
|
||||
return (Left < Right) ;
|
||||
}
|
||||
|
||||
// -----------
|
||||
// IsGreater :
|
||||
// -----------
|
||||
Standard_Boolean PCollection_CompareOfReal::IsGreater (
|
||||
const Standard_Real &Left,const Standard_Real &Right) const
|
||||
{
|
||||
return (Left > Right) ;
|
||||
}
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
@@ -1,122 +0,0 @@
|
||||
-- Created on: 1992-02-19
|
||||
-- Created by: Jean Pierre TIRAULT
|
||||
-- Copyright (c) 1992-1999 Matra Datavision
|
||||
-- Copyright (c) 1999-2014 OPEN CASCADE SAS
|
||||
--
|
||||
-- This file is part of Open CASCADE Technology software library.
|
||||
--
|
||||
-- This library is free software; you can redistribute it and/or modify it under
|
||||
-- the terms of the GNU Lesser General Public License version 2.1 as published
|
||||
-- by the Free Software Foundation, with special exception defined in the file
|
||||
-- OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
|
||||
-- distribution for complete text of the license and disclaimer of any warranty.
|
||||
--
|
||||
-- Alternatively, this file may be used under the terms of Open CASCADE
|
||||
-- commercial license or contractual agreement.
|
||||
|
||||
generic class HDoubleList from PCollection (Item as Storable)
|
||||
inherits PManaged
|
||||
|
||||
|
||||
raises NoSuchObject from Standard
|
||||
|
||||
is
|
||||
|
||||
---Purpose: Definition of a double linked list
|
||||
-- Idem to the SingleList with a pointer to the previous node
|
||||
|
||||
|
||||
Create returns mutable HDoubleList;
|
||||
---Purpose: Creation of an empty list
|
||||
|
||||
IsEmpty(me) returns Boolean;
|
||||
---Level: Public
|
||||
---Purpose: Returns True if the list contains no element.
|
||||
|
||||
Construct(me : mutable; T : Item) returns mutable HDoubleList;
|
||||
---Level: Public
|
||||
---Purpose: Adds T at the begining of me.
|
||||
---Example: before
|
||||
-- me = (A B C)
|
||||
-- after
|
||||
-- me = (A B C)
|
||||
-- returns
|
||||
-- (T A B C)
|
||||
|
||||
Value(me) returns any Item
|
||||
raises NoSuchObject;
|
||||
---Level: Public
|
||||
---Purpose: Value of the first node of me
|
||||
-- Raises an exception if me is empty
|
||||
---Purpose: before
|
||||
-- me = (A B C)
|
||||
-- after
|
||||
-- me = (A B C)
|
||||
-- returns
|
||||
-- A
|
||||
|
||||
Tail(me) returns any HDoubleList
|
||||
raises NoSuchObject;
|
||||
---Level: Public
|
||||
---Purpose: Returns the end of the list <me>.
|
||||
-- Raises an exception if me is empty.
|
||||
---Example: before
|
||||
-- me = (A B C)
|
||||
-- after
|
||||
-- me = (A B C)
|
||||
-- returns
|
||||
-- (B C)
|
||||
|
||||
Previous(me) returns any HDoubleList
|
||||
raises NoSuchObject;
|
||||
---Level: Public
|
||||
---Purpose: Previous node of me.
|
||||
-- Raises an exception if me is empty.
|
||||
---Example: before
|
||||
-- A list L = (A B C) with me = (B C) a sub-list of L.
|
||||
-- after
|
||||
-- L = (A B C), me = (B C)
|
||||
-- returns
|
||||
-- (A)
|
||||
|
||||
SwapTail(me : mutable; WithList : in out any HDoubleList)
|
||||
raises NoSuchObject;
|
||||
---Level: Public
|
||||
---Purpose: Exchanges end of me with WithList.
|
||||
-- Raises an exception if me is empty.
|
||||
---Example: before
|
||||
-- me = (A B C)
|
||||
-- WithList = (D E)
|
||||
-- after
|
||||
-- me = (A D E)
|
||||
-- WithList = (B C)
|
||||
|
||||
SetValue(me : mutable; T : Item)
|
||||
raises NoSuchObject;
|
||||
---Level: Public
|
||||
---Purpose: Changes the value of the first node of me.
|
||||
-- Raises an exception if me is empty.
|
||||
---Example: before
|
||||
-- me = (A B C)
|
||||
-- after
|
||||
-- me = (T B C)
|
||||
|
||||
|
||||
ChangeBackPointer(me : mutable; BackPointer : HDoubleList);
|
||||
---Level: Public
|
||||
---Purpose: Modification of the backward pointer
|
||||
|
||||
ChangeForwardPointer(me : mutable; ForwardPointer :
|
||||
HDoubleList);
|
||||
---Level: Public
|
||||
---Purpose: Modification of the forward pointer
|
||||
|
||||
Destroy(me : mutable);
|
||||
---C++: alias ~
|
||||
|
||||
fields
|
||||
Data : Item;
|
||||
Next : HDoubleList;
|
||||
Before : HDoubleList;
|
||||
|
||||
end HDoubleList;
|
||||
@@ -1,127 +0,0 @@
|
||||
// Copyright (c) 1998-1999 Matra Datavision
|
||||
// Copyright (c) 1999-2014 OPEN CASCADE SAS
|
||||
//
|
||||
// This file is part of Open CASCADE Technology software library.
|
||||
//
|
||||
// This library is free software; you can redistribute it and/or modify it under
|
||||
// the terms of the GNU Lesser General Public License version 2.1 as published
|
||||
// by the Free Software Foundation, with special exception defined in the file
|
||||
// OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
|
||||
// distribution for complete text of the license and disclaimer of any warranty.
|
||||
//
|
||||
// Alternatively, this file may be used under the terms of Open CASCADE
|
||||
// commercial license or contractual agreement.
|
||||
|
||||
// -----------------------------------------------------------------------
|
||||
// - -
|
||||
// - HDoubleList -
|
||||
// - -
|
||||
// -----------------------------------------------------------------------
|
||||
|
||||
|
||||
|
||||
#include <Standard_NoSuchObject.hxx>
|
||||
#include <Standard_NotImplemented.hxx>
|
||||
|
||||
// -----------------------------------------------------------------------
|
||||
// - -
|
||||
// - -
|
||||
// - -
|
||||
// -----------------------------------------------------------------------
|
||||
PCollection_HDoubleList::PCollection_HDoubleList ( ){
|
||||
}
|
||||
|
||||
|
||||
// -----------------------------------------------------------------------
|
||||
// - -
|
||||
// - -
|
||||
// - -
|
||||
// -----------------------------------------------------------------------
|
||||
Handle(PCollection_HDoubleList)
|
||||
PCollection_HDoubleList::Construct(const Item& T)
|
||||
{
|
||||
|
||||
Handle(PCollection_HDoubleList) me , L ;
|
||||
me = this;
|
||||
L = new PCollection_HDoubleList;
|
||||
L->ChangeForwardPointer ( me ); // Pointeur avant de L sur me.
|
||||
Before = L; // Pointer arriere de me sur L.
|
||||
L->SetValue ( T ); // Mettre la valeur de l'item.
|
||||
return L; // C'est L qui est retourne.
|
||||
}
|
||||
|
||||
/* Anciens INLINE */
|
||||
|
||||
|
||||
void PCollection_HDoubleList::ChangeForwardPointer
|
||||
(const Handle(PCollection_HDoubleList)& L)
|
||||
{
|
||||
Next = L;
|
||||
}
|
||||
|
||||
void PCollection_HDoubleList::ChangeBackPointer
|
||||
(const Handle(PCollection_HDoubleList)& L)
|
||||
{
|
||||
Before = L;
|
||||
}
|
||||
|
||||
|
||||
void PCollection_HDoubleList::SetValue(const Item& T)
|
||||
{
|
||||
Standard_NoSuchObject_Raise_if (IsEmpty(),
|
||||
"Empty Element in HDoubleList::SetValue");
|
||||
Data = T;
|
||||
}
|
||||
|
||||
|
||||
Item PCollection_HDoubleList::Value() const {
|
||||
Standard_NoSuchObject_Raise_if(IsEmpty(),
|
||||
"Empty Element in HDoubleList::Value");
|
||||
return Data;
|
||||
}
|
||||
|
||||
Handle(PCollection_HDoubleList) PCollection_HDoubleList::Previous() const {
|
||||
Standard_NoSuchObject_Raise_if((IsEmpty() && Before.IsNull()),
|
||||
"Empty Element in HDoubleList::Previous");
|
||||
return Before;
|
||||
}
|
||||
|
||||
|
||||
Standard_Boolean PCollection_HDoubleList::IsEmpty()const
|
||||
{
|
||||
return Next.IsNull();
|
||||
}
|
||||
|
||||
|
||||
Handle(PCollection_HDoubleList) PCollection_HDoubleList::Tail() const {
|
||||
Standard_NoSuchObject_Raise_if(IsEmpty(),
|
||||
"Empty Element in HDoubleList::Previous");
|
||||
return Next;
|
||||
}
|
||||
|
||||
// -----------------------------------------------------------------------
|
||||
// - -
|
||||
// - -
|
||||
// - -
|
||||
// -----------------------------------------------------------------------
|
||||
void PCollection_HDoubleList::SwapTail(Handle(PCollection_HDoubleList)&
|
||||
WithList)
|
||||
{
|
||||
// Exception si liste vide
|
||||
Standard_NoSuchObject_Raise_if(IsEmpty(),
|
||||
"Empty Element in HDoubleList::SwapTail") ;
|
||||
|
||||
Handle(PCollection_HDoubleList) L = Next;
|
||||
Handle(PCollection_HDoubleList) me ;
|
||||
me = this;
|
||||
WithList->ChangeBackPointer(me);
|
||||
Next = WithList;
|
||||
WithList = L;
|
||||
}
|
||||
|
||||
void PCollection_HDoubleList::Destroy()
|
||||
{
|
||||
#ifdef CSFDB
|
||||
Next.Nullify();
|
||||
#endif
|
||||
}
|
||||
@@ -1,100 +0,0 @@
|
||||
-- Created on: 1992-02-19
|
||||
-- Created by: Jean Pierre TIRAULT
|
||||
-- Copyright (c) 1992-1999 Matra Datavision
|
||||
-- Copyright (c) 1999-2014 OPEN CASCADE SAS
|
||||
--
|
||||
-- This file is part of Open CASCADE Technology software library.
|
||||
--
|
||||
-- This library is free software; you can redistribute it and/or modify it under
|
||||
-- the terms of the GNU Lesser General Public License version 2.1 as published
|
||||
-- by the Free Software Foundation, with special exception defined in the file
|
||||
-- OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
|
||||
-- distribution for complete text of the license and disclaimer of any warranty.
|
||||
--
|
||||
-- Alternatively, this file may be used under the terms of Open CASCADE
|
||||
-- commercial license or contractual agreement.
|
||||
|
||||
generic class HSingleList from PCollection (Item as Storable)
|
||||
inherits PManaged
|
||||
|
||||
raises
|
||||
NoSuchObject from Standard
|
||||
|
||||
is
|
||||
|
||||
---Purpose: Definition of a single linked list.
|
||||
|
||||
Create returns mutable HSingleList;
|
||||
---Creation of an empty list.
|
||||
|
||||
IsEmpty(me) returns Boolean from Standard;
|
||||
---Level: Public
|
||||
---Purpose: Returns True if the list contains no element.
|
||||
|
||||
|
||||
Construct(me; T : Item) returns mutable
|
||||
HSingleList;
|
||||
---Level: Public
|
||||
---Purpose: add T at the begining of me
|
||||
---Example: before
|
||||
-- me = (A B C)
|
||||
-- after
|
||||
-- me = (A B C)
|
||||
-- returns
|
||||
-- (T A B C)
|
||||
|
||||
Value(me) returns any Item
|
||||
raises NoSuchObject from Standard;
|
||||
---Level: Public
|
||||
---Purpose: Returns the value of the first node of me.
|
||||
-- Raises an exception if me is empty.
|
||||
---Example: before
|
||||
-- me = (A B C)
|
||||
-- after
|
||||
-- me = (A B C)
|
||||
-- returns
|
||||
-- A
|
||||
|
||||
Tail(me) returns any HSingleList
|
||||
raises NoSuchObject from Standard;
|
||||
---Level: Public
|
||||
---Purpose: End of the list me.
|
||||
-- Raises an exception if me is empty.
|
||||
---Example: before
|
||||
-- me = (A B C)
|
||||
-- after
|
||||
-- me = (A B C)
|
||||
-- returns
|
||||
-- (B C)
|
||||
|
||||
SwapTail(me : mutable; WithList : in out any HSingleList)
|
||||
raises NoSuchObject from Standard;
|
||||
---Level: Public
|
||||
---Purpose: Exchanges the end of <me> with the list WithList.
|
||||
-- Raises an exception if me is empty.
|
||||
---Example: before
|
||||
-- me = (A B C)
|
||||
-- WithList = (D E)
|
||||
-- after
|
||||
-- me = (A D E)
|
||||
-- WithList = (B C)
|
||||
|
||||
SetValue(me : mutable; T : Item)
|
||||
raises NoSuchObject from Standard ;
|
||||
---Level: Public
|
||||
---Purpose: Changes the value of the first node of me.
|
||||
-- Raises an exception if me is empty.
|
||||
---Example: before
|
||||
-- me = (A B C)
|
||||
-- after
|
||||
-- me = (T B C)
|
||||
|
||||
ChangeForwardPointer(me : mutable; ForwardPointer : HSingleList);
|
||||
---Level: Public
|
||||
---Purpose: Modification of the node link.
|
||||
|
||||
fields
|
||||
Data : Item;
|
||||
Next : HSingleList;
|
||||
|
||||
end HSingleList;
|
||||
@@ -1,114 +0,0 @@
|
||||
// Copyright (c) 1998-1999 Matra Datavision
|
||||
// Copyright (c) 1999-2014 OPEN CASCADE SAS
|
||||
//
|
||||
// This file is part of Open CASCADE Technology software library.
|
||||
//
|
||||
// This library is free software; you can redistribute it and/or modify it under
|
||||
// the terms of the GNU Lesser General Public License version 2.1 as published
|
||||
// by the Free Software Foundation, with special exception defined in the file
|
||||
// OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
|
||||
// distribution for complete text of the license and disclaimer of any warranty.
|
||||
//
|
||||
// Alternatively, this file may be used under the terms of Open CASCADE
|
||||
// commercial license or contractual agreement.
|
||||
|
||||
// ----------------------------------------------------------------------
|
||||
// HSingleList implementation:
|
||||
// Last Revision : Feb,10 1992 J.P Tirault
|
||||
// Implementation of ShallowCopy, ShallowDump
|
||||
// methods.
|
||||
// -------------------------------------------------------------------------
|
||||
|
||||
#include <Standard_NoSuchObject.hxx>
|
||||
#include <Standard_NotImplemented.hxx>
|
||||
#include <Standard_ProgramError.hxx>
|
||||
#include <Standard_OStream.hxx>
|
||||
|
||||
// -------------------------------------------------------------------------
|
||||
// -
|
||||
// Constructor Returns an empty list -
|
||||
// ---------- -
|
||||
// -
|
||||
// -------------------------------------------------------------------------
|
||||
PCollection_HSingleList::PCollection_HSingleList ()
|
||||
{
|
||||
Next.Nullify();
|
||||
}
|
||||
|
||||
|
||||
// -------------------------------------------------------------------------
|
||||
// -
|
||||
// Construct : Add an item at the beginning of the list -
|
||||
// --------- -
|
||||
// -
|
||||
// -------------------------------------------------------------------------
|
||||
Handle(PCollection_HSingleList)
|
||||
PCollection_HSingleList::Construct(const Item& T)const
|
||||
{
|
||||
|
||||
|
||||
Handle(PCollection_HSingleList) me , L ;
|
||||
me = this;
|
||||
#ifndef OBJS
|
||||
L = new PCollection_HSingleList;
|
||||
#else
|
||||
L = new (os_segment::of(this)) PCollection_HSingleList;
|
||||
#endif
|
||||
L->ChangeForwardPointer ( me );
|
||||
L->SetValue ( T );
|
||||
return L;
|
||||
}
|
||||
|
||||
/* Anciens INLINE */
|
||||
|
||||
Item PCollection_HSingleList::Value() const {
|
||||
Standard_NoSuchObject_Raise_if(IsEmpty(),
|
||||
"Empty Element in HSingleList::Value");
|
||||
return Data;
|
||||
}
|
||||
|
||||
Handle(PCollection_HSingleList) PCollection_HSingleList::Tail() const {
|
||||
Standard_NoSuchObject_Raise_if (IsEmpty(),
|
||||
"Empty Element in HSingleList::Value");
|
||||
return Next;
|
||||
}
|
||||
|
||||
|
||||
Standard_Boolean PCollection_HSingleList::IsEmpty()const
|
||||
{
|
||||
return Next.IsNull();
|
||||
}
|
||||
|
||||
|
||||
void PCollection_HSingleList::SetValue(const Item& T)
|
||||
{
|
||||
Standard_NoSuchObject_Raise_if (IsEmpty(),
|
||||
"Empty Element in HSingleList::SetValue");
|
||||
Data = T;
|
||||
}
|
||||
|
||||
|
||||
// -------------------------------------------------------------------------
|
||||
// -
|
||||
// SwapTail : Exchange the tail of the current list with an another list -
|
||||
// -------- -
|
||||
// -
|
||||
// -------------------------------------------------------------------------
|
||||
void PCollection_HSingleList::SwapTail(Handle(PCollection_HSingleList)&
|
||||
WithList)
|
||||
{
|
||||
Standard_NoSuchObject_Raise_if (IsEmpty(),
|
||||
"Empty Element in HSingleList::SwapTail");
|
||||
Handle(PCollection_HSingleList) L = Next;
|
||||
Next = WithList;
|
||||
WithList = L;
|
||||
}
|
||||
|
||||
|
||||
void PCollection_HSingleList::ChangeForwardPointer
|
||||
(const Handle(PCollection_HSingleList)& L)
|
||||
{
|
||||
Next = L;
|
||||
}
|
||||
|
||||
|
||||
@@ -1,39 +0,0 @@
|
||||
-- Created on: 1991-04-22
|
||||
-- Created by: jean pierre TIRAULT
|
||||
-- Copyright (c) 1991-1999 Matra Datavision
|
||||
-- Copyright (c) 1999-2014 OPEN CASCADE SAS
|
||||
--
|
||||
-- This file is part of Open CASCADE Technology software library.
|
||||
--
|
||||
-- This library is free software; you can redistribute it and/or modify it under
|
||||
-- the terms of the GNU Lesser General Public License version 2.1 as published
|
||||
-- by the Free Software Foundation, with special exception defined in the file
|
||||
-- OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
|
||||
-- distribution for complete text of the license and disclaimer of any warranty.
|
||||
--
|
||||
-- Alternatively, this file may be used under the terms of Open CASCADE
|
||||
-- commercial license or contractual agreement.
|
||||
|
||||
generic class Hash from PCollection (key as Storable) inherits Storable
|
||||
is
|
||||
|
||||
|
||||
|
||||
Create returns Hash;
|
||||
---Purpose : Empty constructor.
|
||||
|
||||
|
||||
|
||||
HashCode (me; MyKey : key ; Upper : Integer)
|
||||
returns Integer is virtual;
|
||||
---Level: Public
|
||||
---Purpose: Returns a hashcod value of key bounded by Upper.
|
||||
|
||||
|
||||
|
||||
Compare (me; One , Two : key) returns Boolean is virtual;
|
||||
---Level: Public
|
||||
---Purpose : Compare two keys and returns a boolean value
|
||||
|
||||
end;
|
||||
|
||||
@@ -1,57 +0,0 @@
|
||||
// Copyright (c) 1992-1999 Matra Datavision
|
||||
// Copyright (c) 1999-2014 OPEN CASCADE SAS
|
||||
//
|
||||
// This file is part of Open CASCADE Technology software library.
|
||||
//
|
||||
// This library is free software; you can redistribute it and/or modify it under
|
||||
// the terms of the GNU Lesser General Public License version 2.1 as published
|
||||
// by the Free Software Foundation, with special exception defined in the file
|
||||
// OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
|
||||
// distribution for complete text of the license and disclaimer of any warranty.
|
||||
//
|
||||
// Alternatively, this file may be used under the terms of Open CASCADE
|
||||
// commercial license or contractual agreement.
|
||||
|
||||
// Hash.gxx doesn't contains methods. All methods are inline methods.
|
||||
|
||||
|
||||
// methods for hash class from PCollection.
|
||||
// Written by JPT FEB,24 1992
|
||||
// -----------------
|
||||
// Empty constructor
|
||||
// -----------------
|
||||
PCollection_Hash::PCollection_Hash(){}
|
||||
|
||||
|
||||
// -----------------------------------------------------------------
|
||||
// To remove the ambigous compilation warning between Hash::HashCode
|
||||
// and Storable::Hashcode
|
||||
// -----------------------------------------------------------------
|
||||
//Standard_Integer PCollection_Hash::HashCode
|
||||
// (const Standard_Integer Upper) const {
|
||||
|
||||
// return this % Upper;
|
||||
//}
|
||||
|
||||
// ------------------------------
|
||||
// The PCollection::Hascode method
|
||||
// ------------------------------
|
||||
Standard_Integer PCollection_Hash::HashCode(const key& K,
|
||||
const Standard_Integer Upper)
|
||||
const {
|
||||
|
||||
return ::HashCode(K,Upper);
|
||||
}
|
||||
|
||||
|
||||
// -----------------------------
|
||||
// A method to compare two items
|
||||
// ------------------------------
|
||||
Standard_Boolean PCollection_Hash::Compare (const key& one,
|
||||
const key& two) const {
|
||||
|
||||
return(one == two);
|
||||
}
|
||||
|
||||
|
||||
|
||||
@@ -1,17 +0,0 @@
|
||||
-- Copyright (c) 1998-1999 Matra Datavision
|
||||
-- Copyright (c) 1999-2014 OPEN CASCADE SAS
|
||||
--
|
||||
-- This file is part of Open CASCADE Technology software library.
|
||||
--
|
||||
-- This library is free software; you can redistribute it and/or modify it under
|
||||
-- the terms of the GNU Lesser General Public License version 2.1 as published
|
||||
-- by the Free Software Foundation, with special exception defined in the file
|
||||
-- OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
|
||||
-- distribution for complete text of the license and disclaimer of any warranty.
|
||||
--
|
||||
-- Alternatively, this file may be used under the terms of Open CASCADE
|
||||
-- commercial license or contractual agreement.
|
||||
|
||||
@if ( ( %Station == "ao1" ) && ( %DBMS == "OBJS" ) ) then
|
||||
@string %LDSHR_DBMSOpt += " -taso ";
|
||||
@endif;
|
||||
@@ -1,24 +0,0 @@
|
||||
-- Created by: Stephane Callegari
|
||||
-- Copyright (c) 1998-1999 Matra Datavision
|
||||
-- Copyright (c) 1999-2014 OPEN CASCADE SAS
|
||||
--
|
||||
-- This file is part of Open CASCADE Technology software library.
|
||||
--
|
||||
-- This library is free software; you can redistribute it and/or modify it under
|
||||
-- the terms of the GNU Lesser General Public License version 2.1 as published
|
||||
-- by the Free Software Foundation, with special exception defined in the file
|
||||
-- OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
|
||||
-- distribution for complete text of the license and disclaimer of any warranty.
|
||||
--
|
||||
-- Alternatively, this file may be used under the terms of Open CASCADE
|
||||
-- commercial license or contractual agreement.
|
||||
|
||||
@ifnotdefined ( %PCollection_WOKSteps_EDL) then
|
||||
|
||||
@set %PCollection_WOKSteps_EDL = "";
|
||||
|
||||
@string %WOKSteps_XcppGroup = " xcpp.fill xcpp.src xcpp.header xcpp.template obj.cgen obj.inc ";
|
||||
--@set %WOKSteps_xcpp_repl = "*PCollection_Replace(xcpp.header)";
|
||||
|
||||
@endif;
|
||||
|
||||
Reference in New Issue
Block a user