Changeset 3c175a in git

Timestamp:

Jun 27, 2020, 10:40:10 PM (3 years ago)

Author:

Hans Schoenemann <hannes@…>

Branches:

(u'spielwiese', '0d6b7fcd9813a1ca1ed4220cfa2b104b97a0a003')

Children:

d3c6ce98d10ad2a4ebac01f434907ebcb2657d98

Parents:

b7cc2b30ec0e493f5f022b5a29a071d4b7ce31a7

Message:

factory: opt fac_NTL_char

File:

• factory/cfGcdUtil.cc (modified) (4 diffs)

factory/cfGcdUtil.cc

@@ -93 +93 @@
       Variable v2;
       CanonicalForm primElem, imPrimElem;
+      #if defned(HAVE_NTL) && !defined(HAVE_FLINT)
+      if (fac_NTL_char != p)
+      {
+        fac_NTL_char= p;
+        zz_p::init (p);
+      }
+      #endif
       if (p == 2 && d < 6)
       {
@@ -108 +115 @@
           nmod_poly_clear(Irredpoly);
           #elif defined(HAVE_NTL)
-          if (fac_NTL_char != 2)
-          {
-            fac_NTL_char= 2;
-            zz_p::init (p);
-          }
           zz_pX NTLIrredpoly;
           BuildIrred (NTLIrredpoly, d*3);
@@ -128 +130 @@
           nmod_poly_clear(Irredpoly);
           #elif defined(HAVE_NTL)
-          if (fac_NTL_char != 2)
-          {
-            fac_NTL_char= 2;
-            zz_p::init (p);
-          }
           zz_pX NTLIrredpoly;
           BuildIrred (NTLIrredpoly, d*2);
@@ -155 +152 @@
         nmod_poly_clear(Irredpoly);
         #elif defined(HAVE_NTL)
-        if (fac_NTL_char != p)
-        {
-          fac_NTL_char= p;
-          zz_p::init (p);
-        }
         zz_pX NTLIrredpoly;
         BuildIrred (NTLIrredpoly, d*2);