=================================================================== RCS file: /home/cvs/OpenXM/src/ox_toolkit/ox_toolkit.h,v retrieving revision 1.34 retrieving revision 1.42 diff -u -p -r1.34 -r1.42 --- OpenXM/src/ox_toolkit/ox_toolkit.h 2007/03/14 10:30:54 1.34 +++ OpenXM/src/ox_toolkit/ox_toolkit.h 2016/07/14 08:16:19 1.42 @@ -1,27 +1,34 @@ /* -*- mode: C -*- */ -/* $OpenXM: OpenXM/src/ox_toolkit/ox_toolkit.h,v 1.33 2005/10/12 04:03:37 takayama Exp $ */ +/* $OpenXM: OpenXM/src/ox_toolkit/ox_toolkit.h,v 1.41 2016/04/01 18:12:39 ohara Exp $ */ #ifndef _OX_TOOLKIT_H_ - #define _OX_TOOLKIT_H_ -#ifdef __cplusplus -extern "C" { -#endif #include #include +#include #include #include #include #include +#if defined(_MSC_VER) +#include +#else +#include +#endif + #define MALLOC(x) GC_MALLOC((x)) #define MALLOC_ATOMIC(x) GC_MALLOC_ATOMIC((x)) #define ALLOCA(x) alloca((x)) /* #define FREE(x) free((x)) */ #define FREE(x) +#ifdef __cplusplus +extern "C" { +#endif + #if !defined(__GNUC__) && !defined(__inline__) #define __inline__ #endif @@ -54,6 +61,18 @@ typedef struct OXFILE{ double (*receive_double)(struct OXFILE *oxfp); } OXFILE; +#if 0 +#define OX_FD_SETSIZE FD_SETSIZE +#else +#define OX_FD_SETSIZE 32 +#endif + +typedef struct { + int count; + fd_set fdset; + OXFILE *p[OX_FD_SETSIZE]; +} OXFILE_set; + typedef struct cmo { int tag; } cmo; @@ -120,6 +139,16 @@ typedef struct { typedef struct { int tag; + mpfr_t mpfr; +} cmo_bf; + +typedef struct { + int tag; + cmo *re,*im; +} cmo_complex; + +typedef struct { + int tag; double d; /* machine dependent */ } cmo_double; @@ -192,6 +221,10 @@ cmo_zz* new_cmo_zz_set_string(char* s); cmo_qq* new_cmo_qq(); cmo_qq* new_cmo_qq_set_mpq(mpq_ptr q); cmo_qq* new_cmo_qq_set_mpz(mpz_ptr num, mpz_ptr den); +cmo_bf* new_cmo_bf(); +cmo_bf* new_cmo_bf_set_mpfr(mpfr_ptr q); +cmo_complex* new_cmo_complex(); +cmo_complex* new_cmo_complex_set_re_im(cmo *re,cmo *im); cmo_zero* new_cmo_zero(); cmo_double* new_cmo_double(double d); cmo_distributed_polynomial* new_cmo_distributed_polynomial(); @@ -252,6 +285,7 @@ cmo_list* list_append_monomial(cmo_list* , cm cmo_list* list_appendl(cmo_list*, ...); int list_length(cmo_list* ); cmo* list_nth(cmo_list* , int n); +cmo* list_first_cmo(cmo_list *); int cmolen_cmo(cmo* m); void dump_buffer_init(char *s); @@ -261,6 +295,8 @@ void dump_ox_data(ox_data* m); void print_cmo(cmo* c); void resize_mpz(mpz_ptr mpz, int size); + +int cmo_to_int(cmo *n); typedef cmo *(*hook_t)(OXFILE *, cmo *);