=================================================================== RCS file: /home/cvs/OpenXM/src/ox_math/Attic/serv2.h,v retrieving revision 1.1 retrieving revision 1.5 diff -u -p -r1.1 -r1.5 --- OpenXM/src/ox_math/Attic/serv2.h 1999/10/29 08:06:42 1.1 +++ OpenXM/src/ox_math/Attic/serv2.h 1999/11/29 12:09:58 1.5 @@ -1,22 +1,26 @@ /* -*- mode: C; coding: euc-japan -*- */ -/* $OpenXM$ */ -/* $Id: serv2.h,v 1.1 1999/10/29 08:06:42 ohara Exp $ */ +/* $OpenXM: OpenXM/src/ox_math/serv2.h,v 1.4 1999/11/18 21:56:44 ohara Exp $ */ #ifndef _SERV2_H_ #define _SERV2_H_ #include "ox.h" -int MATH_evaluateStringByLocalParser(char *str); -int MATH_init(); -int MATH_exit(); -char *MATH_getObject(); -cmo *MATH_getObject2(); -int MATH_executeFunction(char *function, int argc, cmo *argv[]); +#define FLAG_MLTKSYM_IS_INDETERMINATE 0 +#define FLAG_MLTKSYM_IS_STRING 1 +#define ERROR_ID_UNKNOWN_SM 10 +#define ERROR_ID_FAILURE_MLINK 11 + +int ml_evaluateStringByLocalParser(char *str); +int ml_init(); +int ml_exit(); +cmo *ml_get_object(); +int ml_executeFunction(char *function, int argc, cmo *argv[]); + int initialize_stack(); int push(cmo *m); -cmo* pop(); +cmo *pop(); int sm_popCMO(int fd_write); int sm_popString_old(int fd_write); int sm_popString(int fd_write); @@ -25,5 +29,7 @@ int sm_executeStringByLocalParser(); int sm_executeFunction(int fd_write); int receive_sm_command(int fd_read); -int execute_sm_command(int fd_write, int code); +int execute_sm_command(int fd_write, int code); + +int shutdown(); #endif