Changeset 923b64 in git for kernel/modulop.cc

Timestamp:

Sep 29, 2011, 6:55:59 PM (13 years ago)

Author:

Hans Schoenemann <hannes@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

ead697e846405dfb5f1581d07ee063d39d2195d3

Parents:

61eb53a68205301a8f2e44993354fbe213d648eb

Message:

fix tr. 376

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

File:

• kernel/modulop.cc (modified) (1 diff)

kernel/modulop.cc

@@ -247 +247 @@
   if (((*s) >= '0') && ((*s) <= '9'))
   {
-    (*i) = 0;
+    unsigned long ii=0L;
     do
     {
-      (*i) *= 10;
-      (*i) += *s++ - '0';
-      if ((*i) >= (MAX_INT_VAL / 10)) (*i) = (*i) % npPrimeM;
+      ii *= 10;
+      ii += *s++ - '0';
+      if (ii >= (MAX_INT_VAL / 100)) ii = ii % npPrimeM;
     }
     while (((*s) >= '0') && ((*s) <= '9'));
-    if ((*i) >= npPrimeM) (*i) = (*i) % npPrimeM;
+    if (ii >= npPrimeM) ii = ii % npPrimeM;
+    *i=(int)ii;
   }
   else (*i) = 1;