From b439bc585677e9ce0365b4006d5f64a1979404d8 Mon Sep 17 00:00:00 2001 From: dln Date: Tue, 8 Apr 2014 10:22:02 +0400 Subject: [PATCH] 0024742: Remove rarely used collection classes "TCollection_Array1Descriptor" and "TCollection_Array2Descriptor" classes were removed as unused. --- src/TCollection/TCollection.cdl | 6 -- .../TCollection_Array1Descriptor.cdl | 40 ------------ .../TCollection_Array1Descriptor.cxx | 47 -------------- .../TCollection_Array2Descriptor.cdl | 51 --------------- .../TCollection_Array2Descriptor.cxx | 64 ------------------- 5 files changed, 208 deletions(-) delete mode 100644 src/TCollection/TCollection_Array1Descriptor.cdl delete mode 100644 src/TCollection/TCollection_Array1Descriptor.cxx delete mode 100644 src/TCollection/TCollection_Array2Descriptor.cdl delete mode 100644 src/TCollection/TCollection_Array2Descriptor.cxx diff --git a/src/TCollection/TCollection.cdl b/src/TCollection/TCollection.cdl index c3069ff264..a7a2cc17f1 100644 --- a/src/TCollection/TCollection.cdl +++ b/src/TCollection/TCollection.cdl @@ -16,8 +16,6 @@ -- Updated J.P. TIRAULT, M. MERCIEN Nov,25 1992 -- Adding classes --- - Array1Descriptor --- - Array2Descriptor -- - Array1 -- - Array2 -- Updated R.LEQUETTE Jan 1993 @@ -46,13 +44,9 @@ is class HExtendedString; - deferred class Array1Descriptor; - generic class Array1; generic class HArray1; - - deferred class Array2Descriptor; generic class Array2; diff --git a/src/TCollection/TCollection_Array1Descriptor.cdl b/src/TCollection/TCollection_Array1Descriptor.cdl deleted file mode 100644 index c94a9c83e5..0000000000 --- a/src/TCollection/TCollection_Array1Descriptor.cdl +++ /dev/null @@ -1,40 +0,0 @@ --- Created on: 1992-11-25 --- 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. - -deferred class Array1Descriptor from TCollection - -uses - Integer from Standard, - Address from Standard - -is - Initialize (aLower: Integer; aUpper: Integer; anAddress: Address); - - Upper (me) returns Integer; - ---Level: Advanced - - Lower (me) returns Integer; - ---Level: Advanced - - Address(me) returns Address; - ---Level: Advanced - -fields - myAddress: Address; - myLower : Integer; - myUpper : Integer; - -end; diff --git a/src/TCollection/TCollection_Array1Descriptor.cxx b/src/TCollection/TCollection_Array1Descriptor.cxx deleted file mode 100644 index 54049892ab..0000000000 --- a/src/TCollection/TCollection_Array1Descriptor.cxx +++ /dev/null @@ -1,47 +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. - -#include - -// --------------------------------------------------------------------- - -TCollection_Array1Descriptor::TCollection_Array1Descriptor - (const Standard_Integer Lower, - const Standard_Integer Upper, - const Standard_Address anAddress - ) -{ - myLower = Lower; - myUpper = Upper; - myAddress= anAddress; -} - -// --------------------------------------------------------------------- - -Standard_Integer TCollection_Array1Descriptor::Upper() const -{ - return myUpper; -} - -// --------------------------------------------------------------------- -Standard_Integer TCollection_Array1Descriptor::Lower() const -{ - return myLower; -} - -// --------------------------------------------------------------------- -Standard_Address TCollection_Array1Descriptor::Address() const -{ - return myAddress; -} diff --git a/src/TCollection/TCollection_Array2Descriptor.cdl b/src/TCollection/TCollection_Array2Descriptor.cdl deleted file mode 100644 index 0966f15049..0000000000 --- a/src/TCollection/TCollection_Array2Descriptor.cdl +++ /dev/null @@ -1,51 +0,0 @@ --- Created on: 1992-11-25 --- 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. - -deferred class Array2Descriptor from TCollection - -uses - Integer from Standard, - Address from Standard - -is - Initialize (aLowerRow: Integer; aUpperRow: Integer; - aLowerCol: Integer; aUpperCol: Integer; - anAddress: Address); - - UpperRow (me) returns Integer; - ---Level: Advanced - - LowerRow (me) returns Integer; - ---Level: Advanced - - UpperCol (me) returns Integer; - ---Level: Advanced - - LowerCol (me) returns Integer; - ---Level: Advanced - - Address(me) returns Address; - ---Level: Advanced - -fields - myAddress : Address; - myLowerRow : Integer; - myLowerCol : Integer; - myUpperRow : Integer; - myUpperCol : Integer; - - -end; diff --git a/src/TCollection/TCollection_Array2Descriptor.cxx b/src/TCollection/TCollection_Array2Descriptor.cxx deleted file mode 100644 index 57c763856a..0000000000 --- a/src/TCollection/TCollection_Array2Descriptor.cxx +++ /dev/null @@ -1,64 +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. - -#include - -// --------------------------------------------------------------------- - -TCollection_Array2Descriptor::TCollection_Array2Descriptor - (const Standard_Integer aLowerRow, - const Standard_Integer aUpperRow, - const Standard_Integer aLowerCol, - const Standard_Integer aUpperCol, - const Standard_Address anAddress - ) -{ - myLowerRow = aLowerRow; - myUpperRow = aUpperRow; - myLowerCol = aLowerCol; - myUpperCol = aUpperCol; - myAddress = anAddress; -} - -// --------------------------------------------------------------------- - -Standard_Integer TCollection_Array2Descriptor::UpperRow() const -{ - return myUpperRow; -} - -// --------------------------------------------------------------------- -Standard_Integer TCollection_Array2Descriptor::LowerRow() const -{ - return myLowerRow; -} - -// --------------------------------------------------------------------- - -Standard_Integer TCollection_Array2Descriptor::UpperCol() const -{ - return myUpperCol; -} - -// --------------------------------------------------------------------- -Standard_Integer TCollection_Array2Descriptor::LowerCol() const -{ - return myLowerCol; -} - -// --------------------------------------------------------------------- -Standard_Address TCollection_Array2Descriptor::Address() const -{ - return myAddress; -}