math/strongprime.c: Clamp the starting point.

[catacomb] / math / mpmont.c

diff --git a/math/mpmont.c b/math/mpmont.c
index 774e852..fe1e645 100644 (file)
--- a/math/mpmont.c
+++ b/math/mpmont.c
@@ -92,12 +92,20 @@ static void simple_redccore(mpw *dv, mpw *dvl, const mpw *mv,
   MAYBE_REDC4(x86_sse2)
 #endif
 
+#if CPUFAM_AMD64
+  MAYBE_REDC4(amd64_sse2)
+#endif
+
 static redccore__functype *pick_redccore(void)
 {
 #if CPUFAM_X86
   DISPATCH_PICK_COND(mpmont_reduce, maybe_redc4_x86_sse2,
                     cpu_feature_p(CPUFEAT_X86_SSE2));
 #endif
+#if CPUFAM_AMD64
+  DISPATCH_PICK_COND(mpmont_reduce, maybe_redc4_amd64_sse2,
+                    cpu_feature_p(CPUFEAT_X86_SSE2));
+#endif
   DISPATCH_PICK_FALLBACK(mpmont_reduce, simple_redccore);
 }
 
@@ -184,12 +192,20 @@ static void simple_mulcore(mpw *dv, mpw *dvl,
   MAYBE_MUL4(x86_sse2)
 #endif
 
+#if CPUFAM_AMD64
+  MAYBE_MUL4(amd64_sse2)
+#endif
+
 static mulcore__functype *pick_mulcore(void)
 {
 #if CPUFAM_X86
   DISPATCH_PICK_COND(mpmont_mul, maybe_mul4_x86_sse2,
                     cpu_feature_p(CPUFEAT_X86_SSE2));
 #endif
+#if CPUFAM_AMD64
+  DISPATCH_PICK_COND(mpmont_mul, maybe_mul4_amd64_sse2,
+                    cpu_feature_p(CPUFEAT_X86_SSE2));
+#endif
   DISPATCH_PICK_FALLBACK(mpmont_mul, simple_mulcore);
 }