Changeset e01911d in git

Timestamp:

Jul 12, 2010, 11:12:11 AM (14 years ago)

Author:

Hans Schoenemann <hannes@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

d09a28309a10a5e1ef5ecadf8b5594363ae4fe11

Parents:

eb70dd269a69eddf5b96a933ea4b5edd79c4fd69

Message:

primefactors(13*17*181);

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

File:

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

Singular/misc_ip.cc

@@ -310 +310 @@
   while (mpz_cmp_ui (t, 1) != 0)
   {
+    if (f>=((unsigned long)1 <<28)) break;
+    if (mpz_cmp_ui (t, f) < 0) break;
     mpz_tdiv_qr_ui (q, r, t, f);
     if (mpz_cmp_ui (r, 0) != 0)
     {
         f += addv[ai];
-        if (mpz_cmp_ui (q, f) < 0) break;
         ai = (ai + 1) & 7;
         failures++;
@@ -322 +323 @@
     {
       mpz_swap (t, q);
-      if ((L_ind>0) && (L[L_ind-1]==f)) ex[L_ind-1]++;
+      // here: f in 0,,2^28-1:
+      if ((L_ind>0) && (L[L_ind-1]==(int)f)) ex[L_ind-1]++;
       else
       {