Changeset e91ba4 in git for kernel/kstd2.cc

Timestamp:

Mar 24, 2011, 2:49:38 PM (12 years ago)

Author:

Hans Schoenemann <hannes@…>

Branches:

(u'jengelh-datetime', 'ceac47cbc86fe4a15902392bdbb9bd2ae0ea02c6')(u'spielwiese', '00e2e9c41af3fde1273eb3633f4c0c7c3db2579d')

Children:

663c395f8f2861da3b594dcd7aa6ce2bfa58a49d

Parents:

cd388c6f299310d609c351b73cb6d699c0bff088

Message:

fix asujmes: strat->last

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

File:

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

kernel/kstd2.cc

@@ -717 +717 @@
           /*- h will not become the next element to reduce -*/
         {
+          h->last=NULL;
           enterL(&strat->L,&strat->Ll,&strat->Lmax,*h,at);
 #ifdef KDEBUG
@@ -781 +782 @@
       {
         int dummy=strat->sl;
+        h->last=NULL;
         if (kFindDivisibleByInS(strat, &dummy, h) < 0)
           return 1;
@@ -802 +804 @@
           h->GetP();
           at = strat->posInL(strat->L,strat->Ll,h,strat);
+          h->last=NULL;
           enterL(&strat->L,&strat->Ll,&strat->Lmax,*h,at);
           h->Clear();
@@ -926 +929 @@
         };
 #endif
-        
+
         return NULL;
       }