Changeset 16acb0 in git for Singular/subexpr.cc

Timestamp:

Jan 10, 2002, 1:33:24 PM (22 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

49f194f6dfaec759b9494ac8650cf8cb70820a82

Parents:

18ae159f1392067b5a2b51e34a5895b6044f3d59

Message:

* hannes: more ring-independence in changing rings, deleting data etc.
  (see lists::Clean(r), sleftv::CleanUp(r), syKillComputation(r), nap_Delete)


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

File:

• Singular/subexpr.cc (modified) (6 diffs)

Singular/subexpr.cc

@@ -5 +5 @@
 * ABSTRACT: handling of leftv
 */
-/* $Id: subexpr.cc,v 1.78 2001-10-09 16:36:24 Singular Exp $ */
+/* $Id: subexpr.cc,v 1.79 2002-01-10 12:33:23 Singular Exp $ */
 
 #include <stdlib.h>
@@ -279 +279 @@
 }
 
-void sleftv::CleanUp()
+void sleftv::CleanUp(ring r)
 {
   if ((name!=NULL) && (name!=sNoName) && (rtyp!=IDHDL))
@@ -307 +307 @@
       case MODUL_CMD:
       case IDEAL_CMD:
-        idDelete((ideal *)(&data));
+        id_Delete((ideal *)(&data),r);
         break;
       case STRING_CMD:
@@ -314 +314 @@
       case POLY_CMD:
       case VECTOR_CMD:
-        pDelete((poly *)(&data));
+        p_Delete((poly *)(&data),r);
         break;
       case NUMBER_CMD:
-        nDelete((number *)(&data));
+        n_Delete((number *)(&data),r);
         break;
       case LIST_CMD:
@@ -343 +343 @@
       case RESOLUTION_CMD:
       {
-        syKillComputation((syStrategy)data);
+        syKillComputation((syStrategy)data,r);
         break;
       }
@@ -438 +438 @@
       //next->name=NULL;
       next->next=NULL;
-      next->CleanUp();
+      next->CleanUp(r);
       omFreeBin((ADDRESS)next, sleftv_bin);
       next=tmp_n;