Changeset 7e67625 in git for kernel/kutil.cc

Timestamp:

Apr 8, 2009, 7:32:57 PM (14 years ago)

Author:

Motsak Oleksandr <motsak@…>

Branches:

(u'spielwiese', '0d6b7fcd9813a1ca1ed4220cfa2b104b97a0a003')

Children:

f2b1ce61cdfede9548e35b96cfaf871abe893ba9

Parents:

b1c0a9e98fc3aee487e8cd43be67cb47d4352fe7

Message:

*motsak: enterSSpecial - missing case? fixed


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

File:

• kernel/kutil.cc (modified) (2 diffs)

kernel/kutil.cc

@@ -2 +2 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: kutil.cc,v 1.132 2009-04-08 17:21:58 motsak Exp $ */
+/* $Id: kutil.cc,v 1.133 2009-04-08 17:32:57 motsak Exp $ */
 /*
 * ABSTRACT: kernel: utils for kStd
@@ -3082 +3082 @@
 {
   int j;
+  const int iCompH = pGetComp(h);
 
   for (j=0; j<=k; j++)
   {
-    if ((pGetComp(h)==pGetComp(strat->S[j]))
-    || (0==pGetComp(strat->S[j])))
+    const int iCompSj = pGetComp(strat->S[j]);
+    if ((iCompH==iCompSj)
+        || (0==iCompH) // TODO: what about this case???
+        || (0==iCompSj))
     {
       enterOnePairSpecial(j,h,ecart,strat, atR);