Changeset 25337

Timestamp:

08/01/20 21:41:32 (5 years ago)

Author:

Mathieu Morlighem

Message:

BUG: fixing a bunch of memory leak (nothing major though)

Location:

issm/trunk-jpl/src/c

Files:

• cores/controladm1qn3_core.cpp (modified) (3 diffs)
• cores/controlvalidation_core.cpp (modified) (1 diff)
• cores/transient_core.cpp (modified) (1 diff)
• modules/ModelProcessorx/Control/UpdateElementsAndMaterialsControl.cpp (modified) (1 diff)

issm/trunk-jpl/src/c/cores/controladm1qn3_core.cpp

@@ -418 +418 @@
 
         /*Record cost function values and delete Jtemp*/
-        for(int i=0;i<num_responses;i++) Jlist[(*Jlisti)*JlistN+i] = reCast<IssmPDouble>(dependents[i]);
+        for(int i=0;i<num_responses;i++) Jlist[(*Jlisti)*JlistN+i] = dependents[i];
         Jlist[(*Jlisti)*JlistN+num_responses] = reCast<IssmPDouble>(J);
 
@@ -464 +464 @@
         xDelete<double>(XL);
         xDelete<int>(control_enum);
+        xDelete<int>(M);
         xDelete<int>(N);
         xDelete<double>(scaling_factors);
+        xDelete<IssmPDouble>(dependents);
         xDelete<IssmPDouble>(totalgradient);
+        delete dependent_objects;
 }/*}}}*/
 void controladm1qn3_core(FemModel* femmodel){/*{{{*/
@@ -651 +654 @@
         xDelete<IssmPDouble>(mystruct.Jlist);
         xDelete<int>(mystruct.i);
+        xDelete<int>(control_enum);
+        xDelete<int>(M);
+        xDelete<int>(N);
 }/*}}}*/
 

issm/trunk-jpl/src/c/cores/controlvalidation_core.cpp

@@ -338 +338 @@
         xDelete<double>(X0);
         xDelete<IssmDouble>(scaling_factors);
+        delete dependent_objects;
 }

issm/trunk-jpl/src/c/cores/transient_core.cpp

@@ -278 +278 @@
         /*Free ressources:*/
         if(numoutputs){for(int i=0;i<numoutputs;i++){xDelete<char>(requested_outputs[i]);} xDelete<char*>(requested_outputs);}
+        delete dependent_objects;
 }

issm/trunk-jpl/src/c/modules/ModelProcessorx/Control/UpdateElementsAndMaterialsControl.cpp

@@ -297 +297 @@
                         xDelete<IssmDouble>(independents_min);
                         xDelete<IssmDouble>(independents_max);
+                        xDelete<char>(iofieldname);
 
                 }