summaryrefslogtreecommitdiff
path: root/sci-mathematics/gmp-ecm/files/gmp-ecm-7.0.4-openmp.patch
blob: e382bf4ed28b3969ec2caf15393d8ce57b392c90 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
# fix for https://bugs.gentoo.org/732032 merged upstream
diff --git a/pm1fs2.c b/pm1fs2.c
index 4471bf6..89f8077 100644
--- a/pm1fs2.c
+++ b/pm1fs2.c
@@ -1562,17 +1562,16 @@ list_scale_V (listz_t R, const listz_t F, const mpres_t Q,
 #pragma omp parallel if (deg > 1000)
   {
     mpmod_t modulus_local;
-    long i; /* OpenMP insists on signed loop iteration var :( */
     
     mpmod_init_set (modulus_local, modulus);
     
 #pragma omp for
-    for (i = 0; (unsigned long) i <= 2 * deg - 2; i++)
+    for (i = 0; i <= 2 * deg - 2; i++)
       mpres_mul_z_to_z (H[i], Vt, H[i], modulus_local);
     mpmod_clear (modulus_local);
   }
 #else
-  for (i = 0; (unsigned long) i <= 2 * deg - 2; i++)
+  for (i = 0; i <= 2 * deg - 2; i++)
     mpres_mul_z_to_z (H[i], Vt, H[i], modulus);
 #endif