[cig-commits] r13361 - short/3D/PyLith/trunk/libsrc/faults

[brad at geodynamics.org]

Author: brad
Date: 2008-11-20 14:08:05 -0800 (Thu, 20 Nov 2008)
New Revision: 13361

Modified:
   short/3D/PyLith/trunk/libsrc/faults/FaultCohesiveKin.cc
Log:
Fixed bug- added missing matDB->close() to free database values.

Modified: short/3D/PyLith/trunk/libsrc/faults/FaultCohesiveKin.cc
===================================================================
--- short/3D/PyLith/trunk/libsrc/faults/FaultCohesiveKin.cc	2008-11-20 18:42:11 UTC (rev 13360)
+++ short/3D/PyLith/trunk/libsrc/faults/FaultCohesiveKin.cc	2008-11-20 22:08:05 UTC (rev 13361)
@@ -795,6 +795,8 @@
     _pseudoStiffness->updatePoint(*v_iter, &mu);
   } // for
   PetscLogFlops(count * 2);
+
+  matDB->close();
 } // _calcConditioning
 
 // ----------------------------------------------------------------------