version 1.4, 2000/09/12 06:05:29 |
version 1.6, 2000/12/11 02:00:41 |
|
|
* DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE, |
* DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE, |
* PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE. |
* PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE. |
* |
* |
* $OpenXM: OpenXM_contrib2/asir2000/engine/init.c,v 1.3 2000/08/22 05:04:05 noro Exp $ |
* $OpenXM: OpenXM_contrib2/asir2000/engine/init.c,v 1.5 2000/12/05 01:24:52 noro Exp $ |
*/ |
*/ |
#include "ca.h" |
#include "ca.h" |
#include "version.h" |
#include "version.h" |
|
|
int current_mod = 0; |
int current_mod = 0; |
|
|
#if PARI |
#if PARI |
#if defined(THINK_C) |
|
int paristack = 1<<16; |
int paristack = 1<<16; |
#else |
|
int paristack = 1<<20; |
|
#endif |
|
|
|
void (*addnumt[])() = { addq, addreal, addalg, addbf, addcplx, addmi, addlm, addgf2n, addgfpn }; |
void (*addnumt[])() = { addq, addreal, addalg, addbf, addcplx, addmi, addlm, addgf2n, addgfpn }; |
void (*subnumt[])() = { subq, subreal, subalg, subbf, subcplx, submi, sublm, subgf2n, subgfpn }; |
void (*subnumt[])() = { subq, subreal, subalg, subbf, subcplx, submi, sublm, subgf2n, subgfpn }; |
Line 223 void resume_timer() { |
|
Line 219 void resume_timer() { |
|
} |
} |
|
|
extern int lm_lazy, up_lazy; |
extern int lm_lazy, up_lazy; |
extern GC_dont_gc; |
extern int GC_dont_gc; |
|
extern int do_weyl; |
|
|
void reset_engine() { |
void reset_engine() { |
lm_lazy = 0; up_lazy = 0; |
lm_lazy = 0; up_lazy = 0; |
|
do_weyl = 0; |
GC_dont_gc = 0; |
GC_dont_gc = 0; |
} |
} |
|
|