=================================================================== RCS file: /home/cvs/OpenXM/src/ox_math/mlo.h,v retrieving revision 1.6 retrieving revision 1.8 diff -u -p -r1.6 -r1.8 --- OpenXM/src/ox_math/mlo.h 2003/01/15 05:08:10 1.6 +++ OpenXM/src/ox_math/mlo.h 2003/03/23 21:56:11 1.8 @@ -1,10 +1,15 @@ -/* $OpenXM: OpenXM/src/ox_math/mlo.h,v 1.5 2000/03/10 12:38:47 ohara Exp $ */ +/* $OpenXM: OpenXM/src/ox_math/mlo.h,v 1.7 2003/02/12 08:28:41 ohara Exp $ */ #ifndef _MLO_H_ #define _MLO_H_ #include +#define RESERVE_INTERRUPTION 1 +#define INTERRUPTED 2 +#define RESERVE_ABORTION 4 +#define ABORTED 8 + /* definitions of Mathlink Local Objects. */ typedef struct { int tag; @@ -15,7 +20,9 @@ typedef struct { typedef cmo mlo; typedef cmo_string mlo_string; +#if defined(WITH_GMP) typedef cmo_zz mlo_zz; +#endif mlo_function *new_mlo_function(char *function); @@ -44,4 +51,9 @@ int ml_evaluateStringByLocalParser(char *str); int ml_executeFunction(char *function, int argc, cmo *argv[]); mlo *ml_return(); +/* state management for the OpenXM robust interruption */ +unsigned ml_state_set(unsigned fl); +unsigned ml_state_clear(unsigned fl); +unsigned ml_state(unsigned fl); +void ml_state_clear_all(); #endif