Changeset 16978

Timestamp:

11/29/13 14:37:44 (11 years ago)

Author:

Mathieu Morlighem

Message:

BUG: no more leaks

File:

• issm/trunk-jpl/src/c/analyses/StressbalanceAnalysis.cpp (modified) (3 diffs)

issm/trunk-jpl/src/c/analyses/StressbalanceAnalysis.cpp

@@ -3215 +3215 @@
 
         /*compute all stiffness matrices for this element*/
-        printf("-------------- file: StressbalanceAnalysis.cpp line: %i\n",__LINE__); 
         ElementMatrix* Ke1=CreateKMatrixFS(element);
-        printf("-------------- file: StressbalanceAnalysis.cpp line: %i\n",__LINE__); 
         int indices[3]={18,19,20};
         Ke1->StaticCondensation(3,&indices[0]);
-        printf("-------------- file: StressbalanceAnalysis.cpp line: %i\n",__LINE__); 
         int init = element->FiniteElement();
         element->SetTemporaryElementType(P1Enum); 
-        printf("-------------- file: StressbalanceAnalysis.cpp line: %i\n",__LINE__); 
         ElementMatrix* Ke2=CreateKMatrixSSA3d(element);
-        printf("-------------- file: StressbalanceAnalysis.cpp line: %i\n",__LINE__); 
         element->SetTemporaryElementType(init); 
         ElementMatrix* Ke3=CreateKMatrixCouplingSSAFS(element);
-        printf("-------------- file: StressbalanceAnalysis.cpp line: %i\n",__LINE__); 
         ElementMatrix* Ke =new ElementMatrix(Ke1,Ke2,Ke3);
 
@@ -3713 +3707 @@
         /*Clean-up and return*/
         xDelete<int>(cs_list);
+        xDelete<Node*>(node_list);
         xDelete<IssmDouble>(xyz_list);
         delete basaltria->material; delete basaltria;
@@ -4096 +4091 @@
         /*Clean up and return*/
         xDelete<int>(cs_list);
+        xDelete<Node*>(node_list);
+        xDelete<IssmDouble>(xyz_list);
         delete gauss;
         return pe;