OpenXM/src/ox_toolkit/sample1.c - diff

Return to sample1.c CVS log

Up to [local] / OpenXM / src / ox_toolkit

version 1.1, 1999/12/16 06:09:42

version 1.3, 2000/10/10 05:23:21

Line 1

/* -*- mode: C -*- */

/* $OpenXM$ */

/* $OpenXM: OpenXM/src/ox_toolkit/sample1.c,v 1.2 2000/03/10 12:24:39 ohara Exp $ */

This sample program explains how to construct

Line 14

#include <stdio.h>

#include <stdlib.h>

#include <unistd.h>

#include "ox.h"

#include "ox_toolkit.h"

/* This program uses High-level functions of OpenXM C library. */

int main()

{

ox_file_t s;

OXFILE *s;

cmo_list *c;

/* starting an OpenXM server */

s = ox_start("localhost", "ox", "ox_sm1");

ox_push_cmo(s, (cmo *)new_cmo_int32(32));

ox_push_cmo(s, (cmo *)new_cmo_string("Hello"));

/* making a list {10000, -2342, 3141592653289793238462643383279}.

the elements are a bignum. */

c = new_cmo_list();

append_cmo_list(c, new_cmo_zz_set_si(10000));

list_append(c, new_cmo_zz_set_si(10000));

append_cmo_list(c, new_cmo_zz_set_si(-2342));

list_append(c, new_cmo_zz_set_si(-2342));

append_cmo_list(c, new_cmo_zz_set_string("3141592653289793238462643383279"));

list_append(c, new_cmo_zz_set_string("3141592653289793238462643383279"));

/* sending the list above. */

ox_push_cmo(s, (cmo *)c);

ox_push_cmd(s, SM_popCMO);

ox_close(s);

return 0;