OpenXM/doc/oxlib/test.c - view

Return to test.c CVS log

Up to [local] / OpenXM / doc / oxlib

File: [local] / OpenXM / doc / oxlib / test.c (download)

Revision 1.3, Mon Feb 25 07:24:33 2002 UTC (22 years, 2 months ago) by noro
Branch: MAIN
CVS Tags: RELEASE_1_2_1
Changes since 1.2: +3 -2 lines

Added a prompt.

/* $OpenXM: OpenXM/doc/oxlib/test.c,v 1.3 2002/02/25 07:24:33 noro Exp $ */
#include <asir/ox.h>

main() {
	char ibuf[BUFSIZ];
	char *obuf;
	int len,len0;

	asir_ox_init(1);  /* Use the network byte order */

	len0 = BUFSIZ;
	obuf = (char *)malloc(len0);
	while ( 1 ) {
		printf("Input> ");
		fgets(ibuf,BUFSIZ,stdin);
		if ( !strncmp(ibuf,"bye",3) )
			exit(0);
		asir_ox_execute_string(ibuf);
		len = asir_ox_peek_cmo_string_length();
		if ( len > len0 ) {
			len0 = len;
			obuf = (char *)realloc(obuf,len0);
		}
		asir_ox_pop_string(obuf,len0);
		printf("Output> %s\n",obuf);
	}
}