=================================================================== RCS file: /home/cvs/OpenXM_contrib2/asir2000/engine/init.c,v retrieving revision 1.29 retrieving revision 1.33 diff -u -p -r1.29 -r1.33 --- OpenXM_contrib2/asir2000/engine/init.c 2012/12/17 07:20:44 1.29 +++ OpenXM_contrib2/asir2000/engine/init.c 2015/08/04 06:20:45 1.33 @@ -45,9 +45,10 @@ * DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE, * PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE. * - * $OpenXM: OpenXM_contrib2/asir2000/engine/init.c,v 1.28 2009/02/06 08:58:28 ohara Exp $ + * $OpenXM: OpenXM_contrib2/asir2000/engine/init.c,v 1.32 2014/09/19 01:26:00 noro Exp $ */ #include "ca.h" +#include "parse.h" #include "version.h" #include "prime.h" @@ -81,6 +82,7 @@ C IU = &oIU; USINT VOIDobj = &oVOID; int bigfloat; +int evalef = 0; int nez = 1; int current_mod = 0; int StrassenSize = 0; @@ -90,8 +92,6 @@ int Itvplot = 33; static int *lprime; static int lprime_size; -#if defined(PARI) -int paristack = 1<<16; #define ADDBF addbf #define SUBBF subbf #define MULBF mulbf @@ -99,15 +99,6 @@ int paristack = 1<<16; #define PWRBF pwrbf #define CHSGNBF chsgnbf #define CMPBF cmpbf -# else -#define ADDBF 0 -#define SUBBF 0 -#define MULBF 0 -#define DIVBF 0 -#define PWRBF 0 -#define CHSGNBF 0 -#define CMPBF 0 -#endif #if defined(INTERVAL) int zerorewrite = 0; @@ -188,6 +179,7 @@ void nglob_init() { init_up2_tab(); init_lprime(); + init_gmpq(); } extern double GC_get_gctime();