[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.20 and 1.29

version 1.20, 2003/06/02 10:25:57 version 1.29, 2005/03/03 06:21:23
Line 1 
Line 1 
 /* -*- mode: C -*- */  /* -*- mode: C -*- */
 /* $OpenXM: OpenXM/src/ox_toolkit/ox_toolkit.h,v 1.19 2003/05/29 15:50:49 ohara Exp $ */  /* $OpenXM: OpenXM/src/ox_toolkit/ox_toolkit.h,v 1.28 2005/03/03 04:40:51 ohara Exp $ */
   
 #ifndef _OX_TOOLKIT_H_  #ifndef _OX_TOOLKIT_H_
   
Line 10  extern "C" {
Line 10  extern "C" {
 #endif  #endif
   
 #include <stdio.h>  #include <stdio.h>
 #if defined(WITH_GMP)  
 #include <gmp.h>  #include <gmp.h>
 #else  
 #include "gmp_fake.h"  
 #endif /* WITH_GMP */  
 #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>
   
 #define MALLOC(x) malloc((x))  #define MALLOC(x) GC_MALLOC((x))
   #define MALLOC_ATOMIC(x) GC_MALLOC_ATOMIC((x))
 #define ALLOCA(x) alloca((x))  #define ALLOCA(x) alloca((x))
 #define FREE(x)   free((x))  /* #define FREE(x)   free((x)) */
   #define FREE(x)
   
 #if !defined(__GNUC__) && !defined(__inline__)  #if !defined(__GNUC__) && !defined(__inline__)
 #define __inline__  #define __inline__
Line 51  typedef struct OXFILE{
Line 50  typedef struct OXFILE{
     char *wbuf;      char *wbuf;
     int wbuf_size;      int wbuf_size;
     int wbuf_count;      int wbuf_count;
       int (*send_double)(struct OXFILE *oxfp, double int64);
       double (*receive_double)(struct OXFILE *oxfp);
 } OXFILE;  } OXFILE;
   
 typedef struct cmo {  typedef struct cmo {
Line 91  typedef struct cell {
Line 92  typedef struct cell {
     struct cmo *cmo;      struct cmo *cmo;
     struct cell *next;      struct cell *next;
     struct cell *prev;      struct cell *prev;
       int exp;
 } cell;  } cell;
   
 typedef struct {  typedef struct {
Line 131  typedef struct {
Line 133  typedef struct {
     cmo *ringdef;      cmo *ringdef;
 } cmo_distributed_polynomial;  } cmo_distributed_polynomial;
   
   /* The following is a derived class from cmo_list.
      that is, list_append can be used. */
   typedef struct {
       int tag;
       int length;   /* number of monomials */
       cell head[1]; /* list of monomials */
       int var;      /* name of the main variable */
   } cmo_polynomial_in_one_variable;
   
   typedef struct {
       int tag;
       cmo_list *ringdef; /* list of variables */
       cmo *coef;  /* ZZ, QQ, int32, Poly_in_1var, Tree, Zero, DPoly */
   } cmo_recursive_polynomial;
   
   typedef struct {
       int tag;
       cmo_string *name;
       cmo_list *attributes;
       cmo_list *leaves;
   } cmo_tree;
   
   typedef struct {
       int tag;
       cmo_list *args;
       cmo_tree *body;
   } cmo_lambda;
   
 typedef cmo ox;  typedef cmo ox;
   
 typedef ox ox_sync_ball;  typedef ox ox_sync_ball;
Line 164  cmo_distributed_polynomial* new_cmo_distributed_polyno
Line 194  cmo_distributed_polynomial* new_cmo_distributed_polyno
 cmo_dms_generic*   new_cmo_dms_generic();  cmo_dms_generic*   new_cmo_dms_generic();
 cmo_ring_by_name*  new_cmo_ring_by_name(cmo* ob);  cmo_ring_by_name*  new_cmo_ring_by_name(cmo* ob);
 cmo_indeterminate* new_cmo_indeterminate(cmo* ob);  cmo_indeterminate* new_cmo_indeterminate(cmo* ob);
   cmo_polynomial_in_one_variable* new_cmo_polynomial_in_one_variable(int var);
   cmo_recursive_polynomial* new_cmo_recursive_polynomial(cmo_list* ringdef, cmo* coef);
   cmo_tree*          new_cmo_tree(cmo_string* name, cmo_list *attributes, cmo_list *leaves);
   cmo_lambda*        new_cmo_lambda(cmo_list* args, cmo_tree* body);
 cmo_error2*        new_cmo_error2(cmo* ob);  cmo_error2*        new_cmo_error2(cmo* ob);
   
 ox_data*           new_ox_data(cmo* c);  ox_data*           new_ox_data(cmo* c);
Line 208  cell*              list_first(cmo_list *);
Line 242  cell*              list_first(cmo_list *);
 int                list_endof(cmo_list *, cell *el);  int                list_endof(cmo_list *, cell *el);
 cell*              list_next(cell *el);  cell*              list_next(cell *el);
 cmo_list*          list_append(cmo_list*, cmo *ob);  cmo_list*          list_append(cmo_list*, cmo *ob);
   cmo_list*          list_append_monomial(cmo_list* , cmo* coef, int exp);
 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);
Line 253  int oxf_read(void *buffer, size_t size, size_t num, OX
Line 288  int oxf_read(void *buffer, size_t size, size_t num, OX
 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);
   
 /* for OXFILE */  /* for OXFILE */
 int oxf_listen(short *portp);  int oxf_listen(int *portp);
 OXFILE *oxf_connect_active(char *hostname, short port);  OXFILE *oxf_connect_active(char *hostname, short port);
 OXFILE *oxf_connect_passive(int listened);  OXFILE *oxf_connect_passive(int listened);
 OXFILE *oxf_open(int fd);  OXFILE *oxf_open(int fd);
Legend:
Removed from v.1.20  
changed lines
  Added in v.1.29
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>