Changeset 21228

Timestamp:

09/23/16 14:29:49 (9 years ago)

Author:

langchar

Message:

BUG: minor bugs(memory leaks) in GEMB

File:

• issm/trunk-jpl/src/c/modules/SurfaceMassBalancex/Gembx.cpp (modified) (4 diffs)

issm/trunk-jpl/src/c/modules/SurfaceMassBalancex/Gembx.cpp

@@ -1239 +1239 @@
     
         int        D_size;
-        int         i;
 
         /*outputs:*/
@@ -1566 +1565 @@
         IssmDouble m_new = m[X2] + m[X1];
         T[X1] = (T[X2]*m[X2] + T[X1]*m[X1]) / m_new;
-        a[X1] = (a[X2]*m[i] + a[X1]*m[X1]) / m_new;
+        a[X1] = (a[X2]*m[X2] + a[X1]*m[X1]) / m_new;
         re[X1] = (re[X2]*m[X2] + re[X1]*m[X1]) / m_new;
         gdn[X1] = (gdn[X2]*m[X2] + gdn[X1]*m[X1]) / m_new;
@@ -1608 +1607 @@
         }
         
-        i=0;
+        int i=0;
         while(i<=X){
                 if (dz [i] > dzMin *2){
@@ -1727 +1726 @@
         if(D)xDelete<int>(D);
         if(M)xDelete<IssmDouble>(M);
-        
+    xDelete<IssmDouble>(Zcum);
+    xDelete<IssmDouble>(dzMin2);
+    
         /*Assign output pointers:*/
         *pM=sumM;