Return to asirconv.c CVS log | Up to [local] / OpenXM / src / kan96xx / plugin |
File: [local] / OpenXM / src / kan96xx / plugin / asirconv.c (download)
Revision 1.2, Sun Jan 16 07:55:46 2000 UTC (24 years, 8 months ago) by takayama
Congratulation of sm1 version 3.* ! |
/* $OpenXM: OpenXM/src/kan96xx/plugin/asirconv.c,v 1.2 2000/01/16 07:55:46 takayama Exp $ */ #include <stdio.h> #define NS (char *)NULL typedef enum {start,output,setdic,cleardic} prAction; char *KakPrint(prAction act,char *lw,char *rw); int KasirKanlex0(prAction act); void KasirKanParseAstring(char *s); void KasirKanFsappendc(int c); #define BSIZE 100000 static char KakOut[BSIZE]; char *KasirKanConvert(char *ans) { char *akOut; KasirKanlex0(start); /* Initialize lex() */ KakPrint(start,NS,NS); /* Initialize output buffer */ KasirKanParseAstring(ans); KasirKanFsappendc(';'); KasirKanparse(); akOut = KakPrint(output,NS,NS); return(akOut); }