Changeset 0312c5 in git

Timestamp:

Jul 4, 2011, 6:09:46 PM (12 years ago)

Author:

Hans Schoenemann <hannes@…>

Branches:

(u'jengelh-datetime', 'ceac47cbc86fe4a15902392bdbb9bd2ae0ea02c6')(u'spielwiese', 'a800fe4b3e9d37a38c5a10cc0ae9dfa0c15a4ee6')

Children:

fc15cc799d1c7198bd1e43daa447a104f50c43c0

Parents:

89656143073a299ea34c74edd13feac5e3067893

Message:

fix memeory leaks (tr. 214)

git-svn-id: file:///usr/local/Singular/svn/trunk@14321 2c84dea3-7e68-4137-9b89-c4e89433aadc

File:

• kernel/gring.cc (modified) (6 diffs)

kernel/gring.cc

@@ -576 +576 @@
   /* now we have to destroy out! */
   p_Delete(&out,r);
-  out = NULL;
 
   if (iG==jG)
@@ -1488 +1487 @@
   p_Test(p2,r);
   n_Delete(&C,r);
+  n_Delete(&cG,r);
 
   poly out = nc_mm_Mult_pp(m, pNext(p1), r);
@@ -1740 +1740 @@
   }
 
-  number C1  = n_Copy(p_GetCoeff(M1,r),r);      // C1 = lc(M1)
-  number C2  = n_Copy(p_GetCoeff(M2,r),r);      // C2 = lc(M2)
+  number C1  = p_GetCoeff(M1,r);      // C1 = lc(M1)
+  number C2  = p_GetCoeff(M2,r);      // C2 = lc(M2)
 
   /* GCD stuff */
@@ -1748 +1748 @@
   if (!n_IsOne(C, r))                              // if C != 1
   {
-    C1=n_Div(C1, C, r);                              // C1 = C1 / C
-    C2=n_Div(C2, C, r);                              // C2 = C2 / C
+    C1=n_Div(C1, C, r);                            // C1 = C1 / C
+    C2=n_Div(C2, C, r);                            // C2 = C2 / C
+  }
+  else
+  {
+    C1=n_Copy(C1,r);
+    C2=n_Copy(C2,r);
   }
 
@@ -1824 +1829 @@
 
   M2=p_Add_q(M2,M1,r);                           // M2 = spoly(lt(p1), lt(p2)) + m1 * tail(p1), delete M1
+  M1=NULL;
 #ifdef PDEBUG
   p_Test(M2,r);
@@ -1852 +1858 @@
 
   M2 = p_Add_q(M2,M1,r);                           // M2 = spoly(lt(p1), lt(p2)) + m1 * tail(p1) + m2*tail(p2)
+  M1=NULL;
 
 #ifdef PDEBUG