Changeset dd01bf0 in git for Singular/ipid.cc

Timestamp:

Nov 14, 2000, 5:05:03 PM (23 years ago)

Author:

Olaf Bachmann <obachman@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

97f271511be5359e5441950de02fbbacab263f65

Parents:

fdca1c0f555e1f30c95e95547738fa50444aed73

Message:

* fixed memory leaks (longalg, NF, syz)
* eliminated OPT_MOREPAIS, CANCELUNIT, REDBEST
* prepared for tailRings in local case


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

File:

• Singular/ipid.cc (modified) (3 diffs)

Singular/ipid.cc

@@ -2 +2 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: ipid.cc,v 1.44 2000-10-23 12:02:12 obachman Exp $ */
+/* $Id: ipid.cc,v 1.45 2000-11-14 16:04:53 obachman Exp $ */
 
 /*
@@ -285 +285 @@
     }
     // additional settings:--------------------------------------
+#if 0
+    // this leads to a memory leak
     if (t == QRING_CMD)
     {
-      IDRING(h)=rCopy(currRing);
+      // IDRING(h)=rCopy(currRing);
       /* QRING_CMD is ring dep => currRing !=NULL */
     }
-    else if (t == PROC_CMD)
+    else 
+#endif
+      if (t == PROC_CMD)
     {
       IDPROC(h)->language=LANG_NONE;
@@ -491 +495 @@
     ring  savecurrRing = currRing;
     // any objects defined for this ring ?
-    if (((IDTYP(h)==RING_CMD) && (IDRING(h)->ref<=0))
-    &&  (IDRING(h)->idroot!=NULL))
+    // Hmm ... why onlyt for rings and not for qrings??
+    // if (((IDTYP(h)==RING_CMD) && (IDRING(h)->ref<=0))
+    if ((IDRING(h)->ref<=0)  &&  (IDRING(h)->idroot!=NULL))
     {
       idhdl * hd = &IDRING(h)->idroot;