Changeset 047597 in git for Singular/misc_ip.cc

Timestamp:

Sep 14, 2011, 6:57:01 PM (13 years ago)

Author:

Oleksandr Motsak <motsak@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

a55ef037cdd445d3fc4149a3d95a4ebaecf3c2f5

Parents:

1d768d19dda8cae4ddc99de63c5a4e9e6e563ad1

git-author:

Oleksandr Motsak <motsak@mathematik.uni-kl.de>2011-09-14 18:57:01+02:00

git-committer:

Mohamed Barakat <mohamed.barakat@rwth-aachen.de>2011-11-09 16:12:48+01:00

Message:

FIX: registration of naInitChar and ntInitChar (siInit in Singular/misc_ip.cc)

File:

• Singular/misc_ip.cc (modified) (4 diffs)

Singular/misc_ip.cc

@@ -14 +14 @@
 
 // include header files
+#include <misc/auxiliary.h>
 #include <kernel/mod2.h>
-#include <misc/auxiliary.h>
 
 #ifdef HAVE_FACTORY
@@ -22 +22 @@
 #endif
 
+#include <coeffs/si_gmp.h>
+#include <coeffs/coeffs.h>
+
+#include <polys/ext_fields/algext.h>
+#include <polys/ext_fields/transext.h>
+
 #include "misc_ip.h"
 #include "ipid.h"
-
-#include <coeffs/si_gmp.h>
-#include <coeffs/coeffs.h>
-
 #include "feOpt.h"
 #include "silink.h"
@@ -1111 +1113 @@
   memset(&sLastPrinted,0,sizeof(sleftv));
   sLastPrinted.rtyp=NONE;
-  extern int iiInitArithmetic();
-  iiInitArithmetic();
+  
+  extern int iiInitArithmetic(); iiInitArithmetic(); // iparith.cc
+
   basePack=(package)omAlloc0(sizeof(*basePack));
   currPack=basePack;
@@ -1121 +1124 @@
   currPackHdl=h;
   basePackHdl=h;
-  coeffs_BIGINT=nInitChar(n_Q,NULL);
+
+  coeffs_BIGINT = nInitChar(n_Q,NULL);
+  
+#if 1 
+   // def HAVE_POLYEXTENSIONS
+  if(TRUE)
+  {
+    n_coeffType type = nRegister(n_algExt, naInitChar);
+    assume(type == n_algExt);
+     
+    type = nRegister(n_transExt, ntInitChar);
+    assume(type == n_transExt);
+  }
+#endif
 
 // random generator: -----------------------------------------------