From 70161f48d80a8fd0d2d6298e0bc45c262133ed58 Mon Sep 17 00:00:00 2001
From: Pascal <molin.maths@gmail.com>
Date: Wed, 14 Sep 2016 15:26:43 +0200
Subject: [PATCH] fix not ulong safe mul

---
 dlog/vec_pindex_factorgcd.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/dlog/vec_pindex_factorgcd.c b/dlog/vec_pindex_factorgcd.c
index d35a41a8..e53ca6b5 100644
--- a/dlog/vec_pindex_factorgcd.c
+++ b/dlog/vec_pindex_factorgcd.c
@@ -92,9 +92,9 @@ dlog_vec_pindex_factorgcd(ulong * v, ulong nv, ulong p, nmod_t mod, ulong a, ulo
         logr = (j) ? logm1 : 0;
         logr = nmod_add(logr, v[r[i]], order);
         for (i=0; i < ir; i++)
-            logr = nmod_add(logr, (re[i] * v[rp[i]]) % order.n, order);
+            logr = nmod_add(logr, nmod_mul(re[i], v[rp[i]], order), order);
         for (i=0; i < iu; i++)
-            logm = nmod_add(logm, (ue[i] * v[up[i]]) % order.n, order);
+            logm = nmod_add(logm, nmod_mul(ue[i], v[up[i]], order), order);
 
         return nmod_sub(logr, logm, order);
     }