Changeset df4422 in git

Timestamp:

Jun 15, 1999, 1:36:41 PM (24 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

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

Children:

99c2449744babc210fed9e97a6d574ab23d08537

Parents:

8838ab8744662dad5f912531390ea74ea1c12bcb

Message:

*hannes: avoiding recursion in CleanUp


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

File:

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

Singular/subexpr.cc

@@ -5 +5 @@
 * ABSTRACT: handling of leftv
 */
-/* $Id: subexpr.cc,v 1.50 1999-04-19 13:02:26 Singular Exp $ */
+/* $Id: subexpr.cc,v 1.51 1999-06-15 11:36:41 Singular Exp $ */
 
 #include <stdlib.h>
@@ -425 +425 @@
   if (next!=NULL)
   {
-    //next->name=NULL;
-    next->CleanUp();
-    Free((ADDRESS)next,sizeof(sleftv));
-    next=NULL;
+    leftv tmp_n;
+    do
+    {
+      tmp_n=next->next;
+      //next->name=NULL;
+      next->next=NULL;
+      next->CleanUp();
+      Free((ADDRESS)next,sizeof(sleftv));
+      next=tmp_n;
+    } while (next!=NULL);
   }
 }