version 1.9, 1999/12/14 09:31:55 |
version 1.10, 1999/12/22 11:27:59 |
|
|
/* -*- mode: C; coding: euc-japan -*- */ |
/* -*- mode: C; coding: euc-japan -*- */ |
/* $OpenXM: OpenXM/src/ox_math/math2ox.c,v 1.8 1999/11/29 12:09:57 ohara Exp $ */ |
/* $OpenXM: OpenXM/src/ox_math/math2ox.c,v 1.9 1999/12/14 09:31:55 ohara Exp $ */ |
|
|
#include <sys/types.h> |
#include <sys/types.h> |
#include <sys/stat.h> |
#include <sys/stat.h> |
Line 78 int OX_parse(char *s) |
|
Line 78 int OX_parse(char *s) |
|
cmo *m; |
cmo *m; |
symbol *symp; |
symbol *symp; |
int len = strlen(s); |
int len = strlen(s); |
setmode_mygetc(s, len); |
init_parser(s); |
|
|
if(s != NULL && len > 0 && (m = parse()) != NULL) { |
if(s != NULL && len > 0 && (m = parse()) != NULL) { |
if (m->tag == OX_DATA) { |
if (m->tag == OX_DATA) { |
Line 144 int main(int argc, char *argv[]) |
|
Line 144 int main(int argc, char *argv[]) |
|
{ |
{ |
/* 構文解析器の設定 */ |
/* 構文解析器の設定 */ |
setflag_parse(PFLAG_ADDREV); |
setflag_parse(PFLAG_ADDREV); |
setgetc(mygetc); |
|
|
|
len_svs = 20; |
len_svs = 20; |
svs = (ox_file_t *)malloc(sizeof(ox_file_t)*len_svs); |
svs = (ox_file_t *)malloc(sizeof(ox_file_t)*len_svs); |
|
|