Fix memory leaks

diff --git a/src/GEOM/GEOM_Object.cxx b/src/GEOM/GEOM_Object.cxx
index 672ce783575ebcf7c3af21383e8c4e80accca73e..9a5564765194f2a68484a685f5f752206bb86c1c 100644 (file)
--- a/src/GEOM/GEOM_Object.cxx
+++ b/src/GEOM/GEOM_Object.cxx
@@ -21,6 +21,8 @@
 //
 #include <Standard_Stream.hxx>
 
+#include "utilities.h"
+
 #include <GEOM_Object.hxx>
 #include <GEOM_Engine.hxx>
 #include <GEOM_Solver.hxx>
@@ -162,6 +164,16 @@ GEOM_Object::GEOM_Object(TDF_Label& theEntry, int theType)
   TDataStd_UAttribute::Set(theEntry, GetObjectID());
 }
 
+//=============================================================================
+/*!
+ *  Destructor
+ */
+//=============================================================================
+GEOM_Object::~GEOM_Object()
+{
+  MESSAGE("GEOM_Object::~GEOM_Object()");
+}
+
 //=============================================================================
 /*!
  *  GetType

diff --git a/src/GEOM/GEOM_Object.hxx b/src/GEOM/GEOM_Object.hxx
index 67f309bb0f5b2ce45b51fcebbc0ee946f9c87805..dd2f73ea2d2e66b3a34e5b7f46a100c3351783e2 100644 (file)
--- a/src/GEOM/GEOM_Object.hxx
+++ b/src/GEOM/GEOM_Object.hxx
@@ -156,7 +156,7 @@ class GEOM_Object : public MMgt_TShared
 
  public:
   Standard_EXPORT GEOM_Object(TDF_Label& theEntry, int theType);
-  Standard_EXPORT ~GEOM_Object() {;}
+  Standard_EXPORT ~GEOM_Object();
 
   //Finds a GEOM_Object on the label theLabel
   Standard_EXPORT static Handle(GEOM_Object) GetObject(TDF_Label& theLabel);