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

Diff for /OpenXM/src/ox_toolkit/sample1.c between version 1.2 and 1.6

version 1.2, 2000/03/10 12:24:39 version 1.6, 2003/03/23 20:17:35
Line 1 
Line 1 
 /* -*- mode: C -*- */  /* -*- mode: C -*- */
 /* $OpenXM: OpenXM/src/ox_toolkit/sample1.c,v 1.1 1999/12/16 06:09:42 ohara Exp $ */  /* $OpenXM: OpenXM/src/ox_toolkit/sample1.c,v 1.5 2003/02/04 20:43:55 ohara Exp $ */
   
 /*  /*
    This sample program explains how to construct     This sample program explains how to construct
Line 19 
Line 19 
 /* This program uses High-level functions of OpenXM C library. */  /* This program uses High-level functions of OpenXM C library. */
 int main()  int main()
 {  {
         ox_file_t s;      OXFILE *s;
         cmo_list *c;      cmo_list *c;
   
         /* starting an OpenXM server */      ox_stderr_init(stderr);
       /* starting an OpenXM server */
     s = ox_start("localhost", "ox", "ox_sm1");      s = ox_start("localhost", "ox", "ox_sm1");
   
         ox_push_cmo(s, (cmo *)new_cmo_int32(32));      ox_push_cmo(s, (cmo *)new_cmo_int32(32));
         ox_push_cmo(s, (cmo *)new_cmo_string("Hello"));      ox_push_cmo(s, (cmo *)new_cmo_string("Hello"));
   
         /* making a list {10000, -2342, 3141592653289793238462643383279}.      /* making a list {10000, -2342, 3141592653289793238462643383279}.
        the elements are a bignum. */         the elements are a bignum. */
         c = new_cmo_list();      c = new_cmo_list();
   
         append_cmo_list(c, new_cmo_zz_set_si(10000));  #if defined(WITH_GMP)
         append_cmo_list(c, new_cmo_zz_set_si(-2342));      list_append(c, new_cmo_zz_set_si(10000));
         append_cmo_list(c, new_cmo_zz_set_string("3141592653289793238462643383279"));      list_append(c, new_cmo_zz_set_si(-2342));
       list_append(c, new_cmo_zz_set_string("3141592653289793238462643383279"));
   #endif /* WITH_GMP */
   
         /* sending the list above. */      /* sending the list above. */
         ox_push_cmo(s, (cmo *)c);      ox_push_cmo(s, (cmo *)c);
   
         ox_push_cmd(s, SM_popCMO);      ox_push_cmd(s, SM_popCMO);
         ox_push_cmd(s, SM_popCMO);      ox_push_cmd(s, SM_popCMO);
         ox_push_cmd(s, SM_popCMO);      ox_push_cmd(s, SM_popCMO);
   
     ox_close(s);      ox_close(s);
     return 0;      return 0;

Legend:
Removed from v.1.2  
changed lines
  Added in v.1.6

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>