mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-08-09 13:22:24 +03:00
0024927: Getting rid of "Persistent" functionality -- Storable
Delete "Storable" class from "Standard" package and all use of it
This commit is contained in:
dln
bugmaster
@@ -73,19 +73,19 @@ is
|
||||
|
||||
class AncestorIterator;
|
||||
|
||||
deferred class Storable ;
|
||||
primitive Boolean inherits Storable;
|
||||
primitive Character inherits Storable;
|
||||
primitive ExtCharacter inherits Storable;
|
||||
primitive Integer inherits Storable;
|
||||
primitive Byte inherits Storable;
|
||||
primitive Real inherits Storable;
|
||||
primitive ShortReal inherits Storable;
|
||||
primitive Time inherits Storable;
|
||||
primitive OId inherits Storable;
|
||||
primitive Boolean;
|
||||
primitive Character;
|
||||
primitive ExtCharacter;
|
||||
primitive Integer;
|
||||
primitive Byte;
|
||||
primitive Real;
|
||||
primitive ShortReal;
|
||||
primitive Time;
|
||||
primitive OId;
|
||||
|
||||
class GUID;
|
||||
|
||||
deferred class Persistent ; -- inherits Storable
|
||||
class GUID; -- inherits Storable
|
||||
deferred class Persistent ;
|
||||
|
||||
deferred class Transient ;
|
||||
class Type; -- inherits Transient
|
||||
|
||||
@@ -14,9 +14,7 @@
|
||||
-- Alternatively, this file may be used under the terms of Open CASCADE
|
||||
-- commercial license or contractual agreement.
|
||||
|
||||
class GUID from Standard
|
||||
|
||||
inherits Storable from Standard
|
||||
class GUID from Standard
|
||||
|
||||
is
|
||||
Create returns GUID from Standard;
|
||||
|
||||
@@ -15,8 +15,6 @@
|
||||
-- commercial license or contractual agreement.
|
||||
|
||||
deferred class Persistent from Standard
|
||||
inherits
|
||||
Storable from Standard
|
||||
|
||||
---Purpose:
|
||||
-- The root of the entire persistent class hierarchy.
|
||||
@@ -59,7 +57,7 @@ uses
|
||||
|
||||
is
|
||||
|
||||
Delete (me: mutable) is redefined;
|
||||
Delete (me: mutable) is virtual;
|
||||
---Purpose: Deletes this object.
|
||||
|
||||
|
||||
|
||||
@@ -34,7 +34,6 @@ class Standard_Transient;
|
||||
#include <Standard_CString.hxx>
|
||||
#include <Standard_ExtString.hxx>
|
||||
#include <Standard_Address.hxx>
|
||||
#include <Standard_Storable.hxx>
|
||||
|
||||
__Standard_API Standard_Integer HashCode(const Standard_Address,
|
||||
const Standard_Integer,
|
||||
|
||||
@@ -31,7 +31,6 @@
|
||||
// ==================================
|
||||
// Methods implemeted in Standard_Real.cxx
|
||||
// ==================================
|
||||
//.... Herited from Standard_Storable
|
||||
__Standard_API Standard_Integer HashCode (const Standard_Real, const Standard_Integer);
|
||||
|
||||
__Standard_API Standard_Real ACos (const Standard_Real );
|
||||
|
||||
@@ -141,7 +141,6 @@ inline Standard_ShortReal Min (const Standard_ShortReal Val1,
|
||||
// ==================================
|
||||
// Methods implemeted in Standard_ShortReal.cxx
|
||||
// ==================================
|
||||
//.... Herited from Standard_Storable
|
||||
__Standard_API Standard_Integer HashCode (const Standard_ShortReal, const Standard_Integer);
|
||||
|
||||
//-------------------------------------------------------------------
|
||||
|
||||
@@ -1,53 +0,0 @@
|
||||
-- Created on: 1991-09-05
|
||||
-- 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.
|
||||
|
||||
deferred class Storable from Standard
|
||||
|
||||
---Purpose: This class Storable is an abstract class that allows built-in
|
||||
-- primitive types to be extended. They are not themselves
|
||||
-- persistent, but are known by the database, therefore can be used
|
||||
-- to define the internal representation of persistent objects.
|
||||
-- Otherwise, all the fields of subclasses of Object MUST inherit
|
||||
-- from Storable.
|
||||
--
|
||||
-- This class provides also a framework for copying, comparing and
|
||||
-- printing.
|
||||
|
||||
is
|
||||
Delete ( me : out ) is virtual;
|
||||
---C++: alias "Standard_EXPORT virtual ~Standard_Storable(){Delete();}"
|
||||
|
||||
HashCode (me; Upper : Integer ) returns Integer is virtual;
|
||||
---Purpose: Returns a hashed value denoting <me>. This value is in
|
||||
-- the range 1..<Upper>.
|
||||
---C++: function call
|
||||
---Level: Advanced
|
||||
|
||||
IsEqual (me; Other : Storable) returns Boolean
|
||||
---Purpose: Returns true if the direct contents of <me> and
|
||||
-- <Other> are memberwise equal.
|
||||
---C++: alias operator ==
|
||||
---Level: Public
|
||||
is static;
|
||||
|
||||
IsSimilar (me; Other : Storable) returns Boolean;
|
||||
---Purpose: Returns true if the Deep contents of <me> and
|
||||
-- <Other> are memberwise equal.
|
||||
---C++: function call
|
||||
---Level: Public
|
||||
|
||||
end Storable;
|
||||
|
||||
@@ -1,36 +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 <Standard_Storable.ixx>
|
||||
|
||||
void Standard_Storable::Delete()
|
||||
{}
|
||||
|
||||
//========================================================================
|
||||
Standard_Integer Standard_Storable::HashCode(const Standard_Integer Upper)const
|
||||
{
|
||||
return ::HashCode((Standard_Address) this, Upper, STANDARD_TYPE(Standard_Storable));
|
||||
}
|
||||
|
||||
//========================================================================
|
||||
Standard_Boolean Standard_Storable::IsEqual(const Standard_Storable& ) const
|
||||
{
|
||||
return Standard_True;
|
||||
}
|
||||
|
||||
//========================================================================
|
||||
Standard_Boolean Standard_Storable::IsSimilar(const Standard_Storable& ) const
|
||||
{
|
||||
return Standard_True;
|
||||
}
|
||||
Reference in New Issue
Block a user