Changeset 102a906 in git for libpolys

Timestamp:

Mar 17, 2015, 10:44:22 AM (9 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'spielwiese', '6e5adcba05493683b94648c659a729c189812c77')

Children:

3387fdeeca96ec224aca60ee95b033d4ef78dd96a4b5a3c3edb0bc81f2e4aef388aed1244d6a322a

Parents:

bbc82531f5aed32b2ffe2b316c9185c8e10e5a25

Message:

allow compilation without NTL (report if these function are used)

Location:

libpolys/polys

Files:

• clapsing.cc (modified) (2 diffs)
• clapsing.h (modified) (2 diffs)

libpolys/polys/clapsing.cc

@@ -1637 +1637 @@
 
 #ifdef HAVE_NTL
-#if 1
 matrix singntl_HNF(matrix  m, const ring s )
 {
@@ -1837 +1836 @@
 }
 
-#endif
+#else
+matrix singntl_HNF(matrix  m, const ring s )
+{
+  WerrorS("NTL missing");
+  return NULL;
+}
+
+intvec* singntl_HNF(intvec*  m)
+{
+  WerrorS("NTL missing");
+  return NULL;
+}
+
+matrix singntl_LLL(matrix  m, const ring s )
+{
+  WerrorS("NTL missing");
+  return NULL;
+}
+
+intvec* singntl_LLL(intvec*  m)
+{
+  WerrorS("NTL missing");
+  return NULL;
+}
+
+ideal singclap_absFactorize ( poly f, ideal & mipos, intvec ** exps, int & numFactors, const ring r)
+{
+  WerrorS("NTL missing");
+  return NULL;
+}
+
 #endif /* HAVE_NTL */
 

libpolys/polys/clapsing.h

@@ -49 +49 @@
 ideal singclap_sqrfree ( poly f, intvec ** v , int with_exps, const ring r );
 
-# ifdef HAVE_NTL
-#  if 1
 matrix  singntl_HNF(matrix A, const ring r);
 intvec* singntl_HNF(intvec* A);
@@ -57 +55 @@
 
 ideal singclap_absFactorize ( poly f, ideal & mipos, intvec ** exps, int & n, const ring r);
-#  endif
-# endif
 
  matrix singclap_irrCharSeries ( ideal I, const ring r);