[BACK]Return to ox_toolkit.h CVS log [TXT][DIR] Up to [local] / OpenXM / src / ox_toolkit

Diff for /OpenXM/src/ox_toolkit/ox_toolkit.h between version 1.32 and 1.42

version 1.32, 2005/07/26 12:52:05 version 1.42, 2016/07/14 08:16:19
Line 1 
Line 1 
 /* -*- mode: C -*- */  /* -*- mode: C -*- */
 /* $OpenXM: OpenXM/src/ox_toolkit/ox_toolkit.h,v 1.31 2005/07/20 17:48:03 ohara Exp $ */  /* $OpenXM: OpenXM/src/ox_toolkit/ox_toolkit.h,v 1.41 2016/04/01 18:12:39 ohara Exp $ */
   
 #ifndef _OX_TOOLKIT_H_  #ifndef _OX_TOOLKIT_H_
   
 #define _OX_TOOLKIT_H_  #define _OX_TOOLKIT_H_
   
 #ifdef __cplusplus  
 extern "C" {  
 #endif  
   
 #include <stdio.h>  #include <stdio.h>
 #include <gmp.h>  #include <gmp.h>
   #include <mpfr.h>
 #include <ox/cmotag.h>  #include <ox/cmotag.h>
 #include <ox/oxMessageTag.h>  #include <ox/oxMessageTag.h>
 #include <ox/smCommand.h>  #include <ox/smCommand.h>
 #include <gc/gc.h>  #include <gc/gc.h>
   
 #define OX_PROTOCOL_VERSION     20050304  #if defined(_MSC_VER)
 #define OX_TOOLKIT_VERSION      "ox_toolkit version 2005.7.20"  #include <malloc.h>
   #else
   #include <sys/select.h>
   #endif
   
 #define MALLOC(x) GC_MALLOC((x))  #define MALLOC(x) GC_MALLOC((x))
 #define MALLOC_ATOMIC(x) GC_MALLOC_ATOMIC((x))  #define MALLOC_ATOMIC(x) GC_MALLOC_ATOMIC((x))
Line 25  extern "C" {
Line 25  extern "C" {
 /* #define FREE(x)   free((x)) */  /* #define FREE(x)   free((x)) */
 #define FREE(x)  #define FREE(x)
   
   #ifdef __cplusplus
   extern "C" {
   #endif
   
 #if !defined(__GNUC__) && !defined(__inline__)  #if !defined(__GNUC__) && !defined(__inline__)
 #define __inline__  #define __inline__
 #endif  #endif
   
 /* Mathcap Local Database */  /* Mathcap Local Database */
 typedef struct {  typedef struct {
         int  *cmd;      int tag;
         int  *cmo;      int flag;
   } table;
   
   typedef struct mathcap {
       table *cmotbl;
       table *smtbl;
 } mathcap;  } mathcap;
   
 /* OpenXM File Descripter */  /* OpenXM File Descripter */
Line 52  typedef struct OXFILE{
Line 61  typedef struct OXFILE{
     double (*receive_double)(struct OXFILE *oxfp);      double (*receive_double)(struct OXFILE *oxfp);
 } OXFILE;  } 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 {  typedef struct cmo {
     int tag;      int tag;
 } cmo;  } cmo;
Line 113  typedef struct {
Line 134  typedef struct {
   
 typedef struct {  typedef struct {
     int tag;      int tag;
     cmo *num;  /* Bunshi (cmo_zz) */      mpq_t mpq;
     cmo *den;  /* Bunbo (cmo_zz) */  
 } cmo_qq;  } cmo_qq;
   
 typedef struct {  typedef struct {
     int tag;      int tag;
       mpfr_t mpfr;
   } cmo_bf;
   
   typedef struct {
       int tag;
       cmo *re,*im;
   } cmo_complex;
   
   typedef struct {
       int tag;
     double d; /* machine dependent */      double d; /* machine dependent */
 } cmo_double;  } cmo_double;
   
Line 178  cmo_int32*         new_cmo_int32(int i);
Line 208  cmo_int32*         new_cmo_int32(int i);
 cmo_string*        new_cmo_string(char* s);  cmo_string*        new_cmo_string(char* s);
 cmo_mathcap*       new_cmo_mathcap(cmo* ob);  cmo_mathcap*       new_cmo_mathcap(cmo* ob);
 cmo_list*          new_cmo_list();  cmo_list*          new_cmo_list();
 cmo_list*          new_cmo_list_set(void *a[], int n);  cmo_list*          new_cmo_list_array(void *a[], int n);
 cmo_list*          new_cmo_list_map(void *a[], int n, void *(* mapf)(void *));  cmo_list*          new_cmo_list_array_map(void *a[], int n, void *(* mapf)(void *));
 cmo_monomial32*    new_cmo_monomial32();  cmo_monomial32*    new_cmo_monomial32();
 cmo_monomial32*    new_cmo_monomial32_size(int size);  cmo_monomial32*    new_cmo_monomial32_size(int size);
 cmo_zz*            new_cmo_zz();  cmo_zz*            new_cmo_zz();
Line 188  cmo_zz*            new_cmo_zz_set_si(int integer);
Line 218  cmo_zz*            new_cmo_zz_set_si(int integer);
 cmo_zz*            new_cmo_zz_set_mpz(mpz_ptr z);  cmo_zz*            new_cmo_zz_set_mpz(mpz_ptr z);
 cmo_zz*            new_cmo_zz_noinit();  cmo_zz*            new_cmo_zz_noinit();
 cmo_zz*            new_cmo_zz_set_string(char* s);  cmo_zz*            new_cmo_zz_set_string(char* s);
 cmo_qq*            new_cmo_qq_noinit();  cmo_qq*            new_cmo_qq();
 cmo_qq*            new_cmo_qq_set_mpq(mpq_ptr q);  cmo_qq*            new_cmo_qq_set_mpq(mpq_ptr q);
 cmo_qq*            new_cmo_qq_set_mpz(mpz_ptr num, mpz_ptr den);  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_zero*          new_cmo_zero();
 cmo_double*        new_cmo_double(double d);  cmo_double*        new_cmo_double(double d);
 cmo_distributed_polynomial* new_cmo_distributed_polynomial();  cmo_distributed_polynomial* new_cmo_distributed_polynomial();
Line 251  cmo_list*          list_append_monomial(cmo_list* , cm
Line 285  cmo_list*          list_append_monomial(cmo_list* , cm
 cmo_list*          list_appendl(cmo_list*, ...);  cmo_list*          list_appendl(cmo_list*, ...);
 int                list_length(cmo_list* );  int                list_length(cmo_list* );
 cmo*               list_nth(cmo_list* , int n);  cmo*               list_nth(cmo_list* , int n);
 void**             list_to_array(cmo_list *c);  cmo*               list_first_cmo(cmo_list *);
 void**             list_to_array_map(cmo_list *c, void *(* mapf)(void *));  
   
 int                cmolen_cmo(cmo* m);  int                cmolen_cmo(cmo* m);
 void               dump_buffer_init(char *s);  void               dump_buffer_init(char *s);
Line 263  void               dump_ox_data(ox_data* m);
Line 296  void               dump_ox_data(ox_data* m);
 void               print_cmo(cmo* c);  void               print_cmo(cmo* c);
 void               resize_mpz(mpz_ptr mpz, int size);  void               resize_mpz(mpz_ptr mpz, int size);
   
   int                cmo_to_int(cmo *n);
   
 typedef cmo *(*hook_t)(OXFILE *, cmo *);  typedef cmo *(*hook_t)(OXFILE *, cmo *);
   
 int add_hook_before_send_cmo(hook_t func);  int add_hook_before_send_cmo(hook_t func);
Line 282  char*    get_symbol_by_tag(int tag);
Line 317  char*    get_symbol_by_tag(int tag);
   
 /* for mathcap database */  /* for mathcap database */
 mathcap *new_mathcap();  mathcap *new_mathcap();
 void mathcap_init(char *version, char *sysname);  void mathcap_init(int ver, char *vstr, char *sysname, int cmos[], int sms[]);
 cmo_mathcap* mathcap_get(mathcap *);  cmo_mathcap* mathcap_get(mathcap *);
 mathcap *mathcap_update(mathcap *, cmo_mathcap *mc);  mathcap *mathcap_update(mathcap *, cmo_mathcap *mc);
   int mathcap_allowQ_cmo(mathcap *, cmo *ob);
   
 int oxf_read(void *buffer, size_t size, size_t num, OXFILE *oxfp);  int oxf_read(void *buffer, size_t size, size_t num, OXFILE *oxfp);
 int oxf_write(void *buffer, size_t size, size_t num, OXFILE *oxfp);  int oxf_write(void *buffer, size_t size, size_t num, OXFILE *oxfp);
Legend:
Removed from v.1.32  
changed lines
  Added in v.1.42
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>