OpenCascade/occt
1
0
Fork 0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-04-03 17:56:21 +03:00
Code Packages Releases Activity

0024927: Getting rid of "Persistent" functionality -- Storable

Browse Source 
Delete "Storable" class from "Standard" package and all use of it
This commit is contained in:
dln 2014-08-15 10:03:58 +04:00 committed by bugmaster
parent 41f0360528
commit 087da3bdd9
68 changed files with 73 additions and 215 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
src/BinMXCAFDoc/BinMXCAFDoc_LocationDriver.cxx
View File

@ -119,14 +119,14 @@ Standard_Boolean BinMXCAFDoc_LocationDriver::Translate(const BinObjMgt_Persisten
Standard_Real aScaleFactor;
theSource >> aScaleFactor;
aTrsf._CSFDB_Setgp_Trsfscale(aScaleFactor);
aTrsf.SetScaleFactor(aScaleFactor);
Standard_Integer aForm;
theSource >> aForm;
aTrsf._CSFDB_Setgp_Trsfshape((gp_TrsfForm)aForm);
aTrsf.SetForm((gp_TrsfForm)aForm);
Standard_Integer R, C;
gp_Mat& aMat = (gp_Mat&)aTrsf._CSFDB_Getgp_Trsfmatrix();
gp_Mat& aMat = (gp_Mat&)aTrsf.HVectorialPart();
for(R = 1; R <= 3; R++)
for(C = 1; C <= 3; C++) {
Standard_Real aVal;
@ -136,7 +136,7 @@ Standard_Boolean BinMXCAFDoc_LocationDriver::Translate(const BinObjMgt_Persisten
Standard_Real x, y, z;
theSource >> x >> y >> z;
gp_XYZ& aLoc = (gp_XYZ&)aTrsf._CSFDB_Getgp_Trsfloc();
gp_XYZ& aLoc = (gp_XYZ&)aTrsf.TranslationPart();
aLoc.SetX(x);
aLoc.SetY(y);
aLoc.SetZ(z);

2
src/Draw/Draw_Color.cdl
View File

@ -14,7 +14,7 @@
-- Alternatively, this file may be used under the terms of Open CASCADE
-- commercial license or contractual agreement.
class Color from Draw inherits Storable
class Color from Draw
---Purpose:

1
src/Extrema/Extrema_Point.cdl
View File

@ -15,7 +15,6 @@
-- commercial license or contractual agreement.
generic class Point from Extrema (Pnt as any)
inherits Storable from Standard
---Purpose: Definition of a point on curve.

2
src/GccAna/GccAna_Circ2dTanOnRad.cdl
View File

@ -40,8 +40,6 @@ from GccAna
-- distance between C1 and OnLine is lower than or
-- equal Tolerance.
--inherits Storable from Standard
uses Pnt2d from gp,
Lin2d from gp,
Circ2d from gp,

2
src/GccAna/GccAna_Lin2dTanObl.cdl
View File

@ -27,8 +27,6 @@ from GccAna
-- Its direction is making an angle Angle with the
-- second argument.
--inherits Storable from Standard
uses Lin2d from gp,
Pnt2d from gp,
QualifiedCirc from GccEnt,

2
src/GccAna/GccAna_Lin2dTanPer.cdl
View File

@ -29,8 +29,6 @@ from GccAna
-- - defining the construction of 2D line(s),
-- - implementing the construction algorithm, and
-- - consulting the result(s).
--inherits Storable from Standard
uses Pnt2d from gp,
Lin2d from gp,

2
src/GccAna/GccAna_LinPnt2dBisec.cdl
View File

@ -29,8 +29,6 @@ from GccAna
-- - implementing the construction algorithm, and
-- - consulting the result.
--inherits Storable from Standard
uses Lin2d from gp,
Pnt2d from gp,
Bisec from GccInt

2
src/GccEnt/GccEnt_QualifiedCirc.cdl
View File

@ -26,8 +26,6 @@ from GccEnt
-- - is enclosed by the circle, or
-- - is built so that both the circle and it are external to one another, or
-- - is undefined (all solutions apply).
inherits Storable from Standard
uses Position from GccEnt,
Circ2d from gp

2
src/GccEnt/GccEnt_QualifiedLin.cdl
View File

@ -18,8 +18,6 @@ class QualifiedLin
from GccEnt
inherits Storable from Standard
--- Purpose: Describes a qualified 2D line.
-- A qualified 2D line is a line (gp_Lin2d line) with a
-- qualifier which specifies whether the solution of a

2
src/IGESData/IGESData_DefSwitch.cdl
View File

@ -14,7 +14,7 @@
-- Alternatively, this file may be used under the terms of Open CASCADE
-- commercial license or contractual agreement.
class DefSwitch from IGESData inherits Storable
class DefSwitch from IGESData
---Purpose : description of a directory componant which can be either
-- undefined (let Void), defined as a Reference to an entity,

2
src/IGESData/IGESData_DirPart.cdl
View File

@ -14,7 +14,7 @@
-- Alternatively, this file may be used under the terms of Open CASCADE
-- commercial license or contractual agreement.
class DirPart from IGESData inherits Storable -- for Array
class DirPart from IGESData -- for Array
---Purpose : litteral/numeric description of an entity's directory section,
-- taken from file

2
src/IntAna2d/IntAna2d_IntPoint.cdl
View File

@ -14,7 +14,7 @@
-- Alternatively, this file may be used under the terms of Open CASCADE
-- commercial license or contractual agreement.
class IntPoint from IntAna2d inherits Storable from Standard
class IntPoint from IntAna2d
---Purpose: Geometrical intersection between two 2d elements.

3
src/IntRes2d/IntRes2d_IntersectionPoint.cdl
View File

@ -19,9 +19,6 @@ class IntersectionPoint from IntRes2d
---Purpose: Definition of an intersection point between two
-- 2D curves.
inherits Storable from Standard
uses Pnt2d from gp,
Transition from IntRes2d
is

3
src/IntRes2d/IntRes2d_IntersectionSegment.cdl
View File

@ -19,9 +19,6 @@ class IntersectionSegment from IntRes2d
---Purpose: Definition of an intersection curve between
-- two 2D curves.
inherits Storable from Standard
uses IntersectionPoint from IntRes2d
raises DomainError from Standard

2
src/IntRes2d/IntRes2d_Transition.cdl
View File

@ -16,8 +16,6 @@
class Transition from IntRes2d
inherits Storable from Standard
---Purpose: Definition of the type of transition near an
-- intersection point between two curves. The transition
-- is either a "true transition", which means that one of

2
src/Interface/Interface_EntityList.cdl
View File

@ -14,7 +14,7 @@
-- Alternatively, this file may be used under the terms of Open CASCADE
-- commercial license or contractual agreement.
class EntityList from Interface -- inherits Storable
class EntityList from Interface
---Purpose : This class defines a list of Entities (Transient Objects),
-- it can be used as a field of other Transient classes, with

1
src/Quantity/Quantity_Color.cdl
View File

@ -14,7 +14,6 @@
-- commercial license or contractual agreement.
class Color from Quantity
inherits Storable
---Purpose: This class allows the definition of a colour.
-- The names of the colours are from the X11 specification.

4
src/Quantity/Quantity_Date.cdl
View File

@ -14,9 +14,7 @@
-- Alternatively, this file may be used under the terms of Open CASCADE
-- commercial license or contractual agreement.
class Date from Quantity
inherits Storable from Standard
class Date from Quantity
---Purpose: This class provides services to manage date information.
-- A date represents the following time intervals:

2
src/Quantity/Quantity_Period.cdl
View File

@ -20,8 +20,6 @@ class Period from Quantity
-- gives the interval between two dates.
-- A period is expressed in seconds and microseconds.
inherits Storable from Standard
raises PeriodDefinitionError
is

24
src/Standard/Standard.cdl
View File

@ -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

4
src/Standard/Standard_GUID.cdl
View File

@ -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;

4
src/Standard/Standard_Persistent.cdl
View File

@ -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.

1
src/Standard/Standard_PrimitiveTypes.hxx
View File

@ -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,

1
src/Standard/Standard_Real.hxx
View File

@ -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 );

1
src/Standard/Standard_ShortReal.hxx
View File

@ -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);
//-------------------------------------------------------------------

53
src/Standard/Standard_Storable.cdl
View File

@ -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;

36
src/Standard/Standard_Storable.cxx
View File

@ -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;
}

6
src/StepData/StepData_SelectType.cdl
View File

@ -14,7 +14,7 @@
-- Alternatively, this file may be used under the terms of Open CASCADE
-- commercial license or contractual agreement.
deferred class SelectType from StepData -- inherits Storable
deferred class SelectType from StepData
---Purpose : SelectType is the basis used for SELECT_TYPE definitions from
-- the EXPRESS form. A SELECT_TYPE in EXPRESS is an enumeration
@ -22,8 +22,8 @@ deferred class SelectType from StepData -- inherits Storable
-- no specific Methods, and no exclusivity (a given Type can be
-- member of several SELECT_TYPES, plus be itself a SUB_TYPE).
--
-- A SelectType can be field of a Transient Entity (it is itself
-- Storable) or only used to control an input Argument
-- A SelectType can be field of a Transient Entity or only used
-- to control an input Argument
--
-- This class implies to designate each member Type by a Case
-- Number which is a positive Integer value (this allows a faster

1
src/Storage/FILES
View File

@ -1,4 +1,3 @@
Storage_Macros.hxx
Storage_BucketOfPersistent.hxx
Storage_Position.hxx
Storage_Container.hxx

2
src/Storage/Storage.cdl
View File

@ -109,8 +109,6 @@ is
ReadSolve
end;
primitive Container inherits Storable from Standard;
imported BucketOfPersistent;
imported Position; -- typedef long

24
src/Storage/Storage_Container.hxx
View File

@ -1,24 +0,0 @@
// 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.
#ifndef _Storage_Container_HeaderFile
#define _Storage_Container_HeaderFile
class Storage_BaseDriver;
typedef Storage_BaseDriver* Storage_Container;
Storage_Container& Storage_CurrentContainer();
#endif

2
src/XmlMNaming/XmlMNaming_Shape1.cdl
View File

@ -13,7 +13,7 @@
-- Alternatively, this file may be used under the terms of Open CASCADE
-- commercial license or contractual agreement.
class Shape1 from XmlMNaming inherits Storable
class Shape1 from XmlMNaming
---Purpose: The XmlMNaming_Shape1 is the Persistent view of a TopoDS_Shape.
--

8
src/XmlObjMgt/XmlObjMgt_GP.cxx
View File

@ -78,19 +78,19 @@ Standard_Boolean XmlObjMgt_GP::Translate
Standard_Real aScaleFactor = Standard_Real(Strtod (aStr, &ptr));
if (ptr != aStr && errno != ERANGE && errno != EINVAL)
{
T._CSFDB_Setgp_Trsfscale(aScaleFactor);
T.SetScaleFactor(aScaleFactor);
aStr = ptr;
Standard_Integer aForm = Standard_Integer(strtol(aStr, &ptr, 10));
if (ptr != aStr && errno != ERANGE && errno != EINVAL) {
T._CSFDB_Setgp_Trsfshape((gp_TrsfForm)aForm);
T.SetForm((gp_TrsfForm)aForm);
aStr = ptr;
// gp_Mat aMatr;
aStr = ::Translate(aStr, (gp_Mat&)T._CSFDB_Getgp_Trsfmatrix());
aStr = ::Translate(aStr, (gp_Mat&)T.HVectorialPart());
if (aStr) {
// gp_XYZ aTransl;
::Translate(aStr, (gp_XYZ&)T._CSFDB_Getgp_Trsfloc());
::Translate(aStr, (gp_XYZ&)T.TranslationPart());
aResult = Standard_True;
}
}

2
src/gp/gp_Ax1.cdl
View File

@ -12,7 +12,7 @@
-- Alternatively, this file may be used under the terms of Open CASCADE
-- commercial license or contractual agreement.
class Ax1 from gp inherits Storable
class Ax1 from gp
--- Purpose : Describes an axis in 3D space.
-- An axis is defined by:

2
src/gp/gp_Ax2.cdl
View File

@ -12,7 +12,7 @@
-- Alternatively, this file may be used under the terms of Open CASCADE
-- commercial license or contractual agreement.
class Ax2 from gp inherits Storable
class Ax2 from gp
--- Purpose :
-- Describes a right-handed coordinate system in 3D space.

2
src/gp/gp_Ax22d.cdl
View File

@ -12,7 +12,7 @@
-- Alternatively, this file may be used under the terms of Open CASCADE
-- commercial license or contractual agreement.
class Ax22d from gp inherits Storable
class Ax22d from gp
--- Purpose :
-- Describes a coordinate system in a plane (2D space).
-- A coordinate system is defined by:

2
src/gp/gp_Ax2d.cdl
View File

@ -12,7 +12,7 @@
-- Alternatively, this file may be used under the terms of Open CASCADE
-- commercial license or contractual agreement.
class Ax2d from gp inherits Storable
class Ax2d from gp
---Purpose:
-- Describes an axis in the plane (2D space).

2
src/gp/gp_Ax3.cdl
View File

@ -14,7 +14,7 @@
-- Alternatively, this file may be used under the terms of Open CASCADE
-- commercial license or contractual agreement.
class Ax3 from gp inherits Storable
class Ax3 from gp
--- Purpose : Describes a coordinate system in 3D space. Unlike a
-- gp_Ax2 coordinate system, a gp_Ax3 can be

2
src/gp/gp_Circ.cdl
View File

@ -12,7 +12,7 @@
-- Alternatively, this file may be used under the terms of Open CASCADE
-- commercial license or contractual agreement.
class Circ from gp inherits Storable
class Circ from gp
--- Purpose :
-- Describes a circle in 3D space.

2
src/gp/gp_Circ2d.cdl
View File

@ -12,7 +12,7 @@
-- Alternatively, this file may be used under the terms of Open CASCADE
-- commercial license or contractual agreement.
class Circ2d from gp inherits Storable
class Circ2d from gp
--- Purpose : Describes a circle in the plane (2D space).
-- A circle is defined by its radius and positioned in the
-- plane with a coordinate system (a gp_Ax22d object) as follows:

2
src/gp/gp_Cone.cdl
View File

@ -12,7 +12,7 @@
-- Alternatively, this file may be used under the terms of Open CASCADE
-- commercial license or contractual agreement.
class Cone from gp inherits Storable
class Cone from gp

2
src/gp/gp_Cylinder.cdl
View File

@ -12,7 +12,7 @@
-- Alternatively, this file may be used under the terms of Open CASCADE
-- commercial license or contractual agreement.
class Cylinder from gp inherits Storable
class Cylinder from gp
--- Purpose :
-- Describes an infinite cylindrical surface.

2
src/gp/gp_Dir.cdl
View File

@ -12,7 +12,7 @@
-- Alternatively, this file may be used under the terms of Open CASCADE
-- commercial license or contractual agreement.
class Dir from gp inherits Storable
class Dir from gp
---Purpose:
-- Describes a unit vector in 3D space. This unit vector is also called "Direction".
-- See Also

2
src/gp/gp_Dir2d.cdl
View File

@ -12,7 +12,7 @@
-- Alternatively, this file may be used under the terms of Open CASCADE
-- commercial license or contractual agreement.
class Dir2d from gp inherits Storable
class Dir2d from gp
---Purpose: Describes a unit vector in the plane (2D space). This unit
-- vector is also called "Direction".

2
src/gp/gp_Elips.cdl
View File

@ -12,7 +12,7 @@
-- Alternatively, this file may be used under the terms of Open CASCADE
-- commercial license or contractual agreement.
class Elips from gp inherits Storable
class Elips from gp
--- Purpose :
-- Describes an ellipse in 3D space.
-- An ellipse is defined by its major and minor radii and

2
src/gp/gp_Elips2d.cdl
View File

@ -12,7 +12,7 @@
-- Alternatively, this file may be used under the terms of Open CASCADE
-- commercial license or contractual agreement.
class Elips2d from gp inherits Storable
class Elips2d from gp
--- Purpose :
-- Describes an ellipse in the plane (2D space).

2
src/gp/gp_GTrsf.cdl
View File

@ -12,7 +12,7 @@
-- Alternatively, this file may be used under the terms of Open CASCADE
-- commercial license or contractual agreement.
class GTrsf from gp inherits Storable
class GTrsf from gp
--- Purpose :
-- Defines a non-persistent transformation in 3D space.

2
src/gp/gp_GTrsf2d.cdl
View File

@ -12,7 +12,7 @@
-- Alternatively, this file may be used under the terms of Open CASCADE
-- commercial license or contractual agreement.
class GTrsf2d from gp inherits Storable
class GTrsf2d from gp
--- Purpose :

2
src/gp/gp_Hypr.cdl
View File

@ -12,7 +12,7 @@
-- Alternatively, this file may be used under the terms of Open CASCADE
-- commercial license or contractual agreement.
class Hypr from gp inherits Storable
class Hypr from gp
--- Purpose : Describes a branch of a hyperbola in 3D space.
-- A hyperbola is defined by its major and minor radii and

2
src/gp/gp_Hypr2d.cdl
View File

@ -12,7 +12,7 @@
-- Alternatively, this file may be used under the terms of Open CASCADE
-- commercial license or contractual agreement.
class Hypr2d from gp inherits Storable
class Hypr2d from gp
---Purpose:
-- Describes a branch of a hyperbola in the plane (2D space).

2
src/gp/gp_Lin.cdl
View File

@ -12,7 +12,7 @@
-- Alternatively, this file may be used under the terms of Open CASCADE
-- commercial license or contractual agreement.
class Lin from gp inherits Storable
class Lin from gp
---Purpose:
-- Describes a line in 3D space.

2
src/gp/gp_Lin2d.cdl
View File

@ -12,7 +12,7 @@
-- Alternatively, this file may be used under the terms of Open CASCADE
-- commercial license or contractual agreement.
class Lin2d from gp inherits Storable
class Lin2d from gp
---Purpose: Describes a line in 2D space.
-- A line is positioned in the plane with an axis (a gp_Ax2d

2
src/gp/gp_Mat.cdl
View File

@ -12,7 +12,7 @@
-- Alternatively, this file may be used under the terms of Open CASCADE
-- commercial license or contractual agreement.
class Mat from gp inherits Storable
class Mat from gp
---Purpose:
-- Describes a three column, three row matrix. This sort of
-- object is used in various vectorial or matrix computations.

2
src/gp/gp_Mat2d.cdl
View File

@ -12,7 +12,7 @@
-- Alternatively, this file may be used under the terms of Open CASCADE
-- commercial license or contractual agreement.
class Mat2d from gp inherits Storable
class Mat2d from gp
---Purpose:
-- Describes a two column, two row matrix. This sort of
-- object is used in various vectorial or matrix computations.

2
src/gp/gp_Parab.cdl
View File

@ -12,7 +12,7 @@
-- Alternatively, this file may be used under the terms of Open CASCADE
-- commercial license or contractual agreement.
class Parab from gp inherits Storable
class Parab from gp
---Purpose:
-- Describes a parabola in 3D space.

2
src/gp/gp_Parab2d.cdl
View File

@ -12,7 +12,7 @@
-- Alternatively, this file may be used under the terms of Open CASCADE
-- commercial license or contractual agreement.
class Parab2d from gp inherits Storable
class Parab2d from gp
---Purpose: Describes a parabola in the plane (2D space).
-- A parabola is defined by its focal length (that is, the

2
src/gp/gp_Pln.cdl
View File

@ -12,7 +12,7 @@
-- Alternatively, this file may be used under the terms of Open CASCADE
-- commercial license or contractual agreement.
class Pln from gp inherits Storable
class Pln from gp
--- Purpose :Describes a plane.

2
src/gp/gp_Pnt.cdl
View File

@ -12,7 +12,7 @@
-- Alternatively, this file may be used under the terms of Open CASCADE
-- commercial license or contractual agreement.
class Pnt from gp inherits Storable
class Pnt from gp
--- Purpose : Defines a 3D cartesian point.

2
src/gp/gp_Pnt2d.cdl
View File

@ -12,7 +12,7 @@
-- Alternatively, this file may be used under the terms of Open CASCADE
-- commercial license or contractual agreement.
class Pnt2d from gp inherits Storable
class Pnt2d from gp
--- Purpose : Defines a non-persistent 2D cartesian point.

2
src/gp/gp_Sphere.cdl
View File

@ -12,7 +12,7 @@
-- Alternatively, this file may be used under the terms of Open CASCADE
-- commercial license or contractual agreement.
class Sphere from gp inherits Storable
class Sphere from gp
--- Purpose :

2
src/gp/gp_Torus.cdl
View File

@ -12,7 +12,7 @@
-- Alternatively, this file may be used under the terms of Open CASCADE
-- commercial license or contractual agreement.
class Torus from gp inherits Storable
class Torus from gp
--- Purpose :
-- Describes a torus.

4
src/gp/gp_Trsf.cdl
View File

@ -12,7 +12,7 @@
-- Alternatively, this file may be used under the terms of Open CASCADE
-- commercial license or contractual agreement.
class Trsf from gp inherits Storable
class Trsf from gp
--- Purpose: Defines a non-persistent transformation in 3D space.
-- The following transformations are implemented :
@ -200,6 +200,8 @@ is
raises
ConstructionError from Standard
is static;
SetForm (me : in out; P : TrsfForm from gp) is static;
SetValues(me : in out;
a11, a12, a13, a14,

5
src/gp/gp_Trsf.lxx
View File

@ -54,6 +54,11 @@ inline void gp_Trsf::SetTranslation(const gp_Pnt& P1,
loc = (P2.XYZ()).Subtracted (P1.XYZ());
}
inline void gp_Trsf::SetForm(const gp_TrsfForm P)
{
shape = P;
}
inline Standard_Boolean gp_Trsf::IsNegative() const
{ return (scale < 0.0); }

2
src/gp/gp_Trsf2d.cdl
View File

@ -12,7 +12,7 @@
-- Alternatively, this file may be used under the terms of Open CASCADE
-- commercial license or contractual agreement.
class Trsf2d from gp inherits Storable
class Trsf2d from gp
--- Purpose :
-- Defines a non-persistent transformation in 2D space.

2
src/gp/gp_Vec.cdl
View File

@ -12,7 +12,7 @@
-- Alternatively, this file may be used under the terms of Open CASCADE
-- commercial license or contractual agreement.
class Vec from gp inherits Storable
class Vec from gp
--- Purpose :
-- Defines a non-persistent vector in 3D space.

2
src/gp/gp_Vec2d.cdl
View File

@ -12,7 +12,7 @@
-- Alternatively, this file may be used under the terms of Open CASCADE
-- commercial license or contractual agreement.
class Vec2d from gp inherits Storable
class Vec2d from gp
--- Purpose :
-- Defines a non-persistent vector in 2D space.

2
src/gp/gp_XY.cdl
View File

@ -12,7 +12,7 @@
-- Alternatively, this file may be used under the terms of Open CASCADE
-- commercial license or contractual agreement.
class XY from gp inherits Storable
class XY from gp
--- Purpose :
-- This class describes a cartesian coordinate entity in 2D

2
src/gp/gp_XYZ.cdl
View File

@ -12,7 +12,7 @@
-- Alternatively, this file may be used under the terms of Open CASCADE
-- commercial license or contractual agreement.
class XYZ from gp inherits Storable
class XYZ from gp
--- Purpose :
-- This class describes a cartesian coordinate entity in