Changeset 7c5fba5 in git

Timestamp:

Aug 3, 2010, 2:26:26 PM (13 years ago)

Author:

Hans Schoenemann <hannes@…>

Branches:

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

Children:

57dfde6393ffc702f8e898e313d4b76980cdddd5

Parents:

23206f45f27f97c1e881f5551c606d81d4c1a225

Message:

fix subst

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

File:

• Singular/iparith.cc (modified) (1 diff)

Singular/iparith.cc

@@ -6389 +6389 @@
   if (ringvar>0)
   {
-    if ((monomexpr!=NULL) && (p!=NULL)
-    &&((long)pTotaldegree(monomexpr)> (currRing->bitmask / (long)pTotaldegree(p))))
-    {
-      Werror("OVERFLOW in subst, max exponent is %ld",currRing->bitmask);
-      return TRUE;
+    if ((monomexpr!=NULL) && (p!=NULL) && (pTotaldegree(p)!=0) &&
+    ((unsigned long)pTotaldegree(monomexpr) > (currRing->bitmask / (unsigned long)pTotaldegree(p))))
+    {
+      Warn("possible OVERFLOW in subst, max exponent is %ld",currRing->bitmask);
+      //return TRUE;
     }
     if ((monomexpr==NULL)||(pNext(monomexpr)==NULL))