Changeset 6b0aa2 in git for kernel/f5lists.cc

Timestamp:

Apr 20, 2009, 3:54:50 PM (14 years ago)

Author:

Christian Eder

Branches:

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

Children:

f85223c462c7704fe0b5d7c8e916ba08f7ca4e86

Parents:

694257b820eac75a8100417ebf8f059879a873fd

Message:

new alternative reduction - still in progress!


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

File:

• kernel/f5lists.cc (modified) (4 diffs)

kernel/f5lists.cc

@@ -431 +431 @@
 
  LTagNode::~LTagNode() {
-    delete next;
     delete data;   
 }
@@ -481 +480 @@
     LTagNode* first =   new LTagNode(l);
     length          =   1;
+}
+
+LTagList::~LTagList() {
+    LTagNode* temp;
+    while(first) {
+        temp    =   first;
+        first   =   first->getNext();
+        delete  temp;
+        //Print("%p\n",first);
+    }
 }
 
@@ -889 +898 @@
 }
 
+void RNode::print() {
+    RNode* temp  =   this;
+    while(NULL != temp) {
+        pWrite(temp->getRuleTerm());
+        Print("%d\n\n",temp->getRuleIndex());
+        temp    =   temp->getNext();
+    }
+}
+
 /*
 ====================================
@@ -936 +954 @@
 }
 
+void RList::print() {
+    first->print();
+}
+
 /*
 =======================================