0023948: Wrong intersection between a surface of revolution and a plane.
[occt.git] / src / Storage / Storage_Root.cxx
1 // Copyright (c) 1998-1999 Matra Datavision
2 // Copyright (c) 1999-2014 OPEN CASCADE SAS
3 //
4 // This file is part of Open CASCADE Technology software library.
5 //
6 // This library is free software; you can redistribute it and/or modify it under
7 // the terms of the GNU Lesser General Public License version 2.1 as published
8 // by the Free Software Foundation, with special exception defined in the file
9 // OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
10 // distribution for complete text of the license and disclaimer of any warranty.
11 //
12 // Alternatively, this file may be used under the terms of Open CASCADE
13 // commercial license or contractual agreement.
14
15 #include <Storage_Root.ixx>
16
17 Storage_Root::Storage_Root() : myRef(0)
18 {
19 }
20
21 Storage_Root::Storage_Root(const TCollection_AsciiString& aName,const Handle(Standard_Persistent)& anObject) : myRef(0)
22 {
23   myName   = aName;
24   myObject = anObject;
25   
26   if (!anObject.IsNull()) {
27     myType   = anObject->DynamicType()->Name();
28   }
29 }
30
31 void Storage_Root::SetName(const TCollection_AsciiString& aName) 
32 {
33   myName   = aName;
34 }
35
36 TCollection_AsciiString Storage_Root::Name() const
37 {
38   return myName;
39 }
40
41 void Storage_Root::SetObject(const Handle(Standard_Persistent)& anObject) 
42 {
43   myObject = anObject;
44
45   if (!anObject.IsNull()) {
46     myType   = anObject->DynamicType()->Name();
47   }
48 }
49
50 Handle(Standard_Persistent) Storage_Root::Object() const
51 {
52   return myObject;
53 }
54
55 TCollection_AsciiString Storage_Root::Type() const
56 {
57   return myType;
58 }
59
60 void Storage_Root::SetReference(const Standard_Integer aRef) 
61 {
62   myRef = aRef;
63 }
64
65 Standard_Integer Storage_Root::Reference() const
66 {
67   return myRef;
68 }
69
70 void Storage_Root::SetType(const TCollection_AsciiString& aType) 
71 {
72   myType = aType;
73 }