0024742: Remove rarely used collection classes

"TCollection_Array1Descriptor" and "TCollection_Array2Descriptor" classes were removed as unused.

diff --git a/src/TCollection/TCollection.cdl b/src/TCollection/TCollection.cdl
index c3069ff2643065960516111cb927b86ed6253477..a7a2cc17f1d474214c9b3ce441fd2b8d435d5499 100644 (file)
--- 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 (file)
index c94a9c8..0000000
--- 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 (file)
index 5404989..0000000
--- 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.ixx>
-
-// ---------------------------------------------------------------------
-
-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 (file)
index 0966f15..0000000
--- 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 (file)
index 57c7638..0000000
--- 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.ixx>
-
-// ---------------------------------------------------------------------
-
-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;
-}