[BACK]Return to test.c CVS log [TXT][DIR] Up to [local] / OpenXM / doc / oxlib
File: [local] / OpenXM / doc / oxlib / test.c (download)

Revision 1.5, Wed Mar 28 05:09:38 2018 UTC (6 years, 1 month ago) by takayama
Branch: MAIN
CVS Tags: HEAD
Changes since 1.4: +2 -1 lines 

oxlib test programs work on Mac OS X.

/* $OpenXM: OpenXM/doc/oxlib/test.c,v 1.5 2018/03/28 05:09:38 takayama Exp $ */
#include <stdio.h>
#include "hhh.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);
	}
}