Changeset 16c400 in git

Timestamp:

Mar 22, 2012, 6:30:15 PM (12 years ago)

Author:

Oleksandr Motsak <motsak@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

faf3505e224504555fe6aa79ecfdd54ec0888beb

Parents:

7e9f1298826e9e80c154aaa465935c0ba2acad38

git-author:

Oleksandr Motsak <motsak@mathematik.uni-kl.de>2012-03-22 18:30:15+01:00

git-committer:

Oleksandr Motsak <motsak@mathematik.uni-kl.de>2012-03-23 16:06:35+01:00

Message:

fix rDelete should delete qideal!

File:

• libpolys/polys/monomials/ring.cc (modified) (2 diffs)

libpolys/polys/monomials/ring.cc

@@ -459 +459 @@
     return; // NOTE: There may be memory leaks due to inconsisten use of r->ref!!! (e.g. due to ext_fields)
 
+  if( r->qideal != NULL )
+  {
+    ideal q = r->qideal;
+    r->qideal = NULL;
+    id_Delete(&q, r);
+  }
+
 #ifdef HAVE_PLURAL
   if (rIsPluralRing(r))
@@ -498 +505 @@
   }
 
-//   // delete parameter
-//   if (rParameter(r)!=NULL)
-//   {
-//     char **s= rParameter(r);
-//     j = 0;
-//     while (j < rPar(r))
-//     {
-//       if (*s != NULL) omFree((ADDRESS)*s);
-//       s++;
-//       j++;
-//     }
-//     omFreeSize((ADDRESS)rParameter(r),rPar(r)*sizeof(char *));
-//   }
   omFreeBin(r, sip_sring_bin);
 }