version 1.41, 2005/11/02 05:18:42 |
version 1.51, 2013/06/13 17:57:21 |
|
|
* DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE, |
* DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE, |
* PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE. |
* PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE. |
* |
* |
* $OpenXM: OpenXM_contrib2/asir2000/parse/parse.h,v 1.40 2005/10/26 07:33:03 noro Exp $ |
* $OpenXM: OpenXM_contrib2/asir2000/parse/parse.h,v 1.50 2013/06/13 07:45:28 ohara Exp $ |
*/ |
*/ |
# if defined(VISUAL) |
# if defined(VISUAL) |
#include <time.h> |
#include <time.h> |
|
|
I_FORMULA, I_LIST, I_STR, I_NEWCOMP, I_CAR, I_CDR, I_CAST, |
I_FORMULA, I_LIST, I_STR, I_NEWCOMP, I_CAR, I_CDR, I_CAST, |
I_INDEX, I_EV, I_TIMER, I_GF2NGEN, I_GFPNGEN, I_GFSNGEN, |
I_INDEX, I_EV, I_TIMER, I_GF2NGEN, I_GFPNGEN, I_GFSNGEN, |
I_LOP, I_OPT, I_GETOPT, I_POINT, I_PAREN, I_MINUS, |
I_LOP, I_OPT, I_GETOPT, I_POINT, I_PAREN, I_MINUS, |
I_NARYOP, I_CONS |
I_NARYOP, I_CONS, I_FUNC_QARG, I_FUNC_HEAD, |
} fid; |
} fid; |
|
|
/* identifiers for statements */ |
/* identifiers for statements */ |
Line 123 typedef struct oPV { |
|
Line 123 typedef struct oPV { |
|
typedef struct oINFILE { |
typedef struct oINFILE { |
char *name; |
char *name; |
FILE *fp; |
FILE *fp; |
|
JMP_BUF jmpbuf; |
|
int ready_for_longjmp; |
int ln; |
int ln; |
struct oINFILE *next; |
struct oINFILE *next; |
char *tname; |
char *tname; |
Line 195 typedef struct oPFINS { |
|
Line 197 typedef struct oPFINS { |
|
|
|
typedef struct oFNODE { |
typedef struct oFNODE { |
short id; |
short id; |
char normalized; |
unsigned normalized:1; |
char expanded; |
unsigned expanded:2; |
|
unsigned coef:1; |
pointer arg[1]; |
pointer arg[1]; |
} *FNODE; |
} *FNODE; |
|
|
Line 464 void tty_reset(void); |
|
Line 467 void tty_reset(void); |
|
void set_timer(int); |
void set_timer(int); |
void reset_timer(void); |
void reset_timer(void); |
void int_handler(int); |
void int_handler(int); |
void int_handler(int); |
|
void segv_handler(int); |
void segv_handler(int); |
void bus_handler(int); |
void bus_handler(int); |
void fpe_handler(int); |
void fpe_handler(int); |
Line 483 int yyparse(void); |
|
Line 485 int yyparse(void); |
|
void nodetod(NODE,DP *); |
void nodetod(NODE,DP *); |
void poppvs(void); |
void poppvs(void); |
int length(NODE); |
int length(NODE); |
int get_heapsize(void); |
size_t get_heapsize(void); |
int searchpvar(char *); |
int searchpvar(char *); |
void mkparif(char *,FUNC *); |
void mkparif(char *,FUNC *); |
void makevar(char *,P *); |
void makevar(char *,P *); |
Line 512 void printv(VL,V); |
|
Line 514 void printv(VL,V); |
|
void sprintv(VL,V); |
void sprintv(VL,V); |
int arf_comp(VL, Obj, Obj); |
int arf_comp(VL, Obj, Obj); |
int complist(VL, LIST, LIST); |
int complist(VL, LIST, LIST); |
int complist(VL, LIST, LIST); |
|
int getcompsize(int); |
int getcompsize(int); |
int getpvar(VS,char *,int); |
int getpvar(VS,char *,int); |
int getpvar(VS,char *,int); |
|
int gettype(unsigned int); |
int gettype(unsigned int); |
int indextotype(int,int); |
int indextotype(int,int); |
int loadfile(char *); |
int loadfile(char *); |
Line 892 pointer evalmapf(FUNC f,FNODE a); |
|
Line 892 pointer evalmapf(FUNC f,FNODE a); |
|
pointer eval_rec_mapf(FUNC f,FNODE a); |
pointer eval_rec_mapf(FUNC f,FNODE a); |
pointer beval_rec_mapf(FUNC f,NODE node); |
pointer beval_rec_mapf(FUNC f,NODE node); |
pointer bevalf(FUNC f,NODE a); |
pointer bevalf(FUNC f,NODE a); |
pointer evalif(FNODE f,FNODE a); |
pointer bevalf_with_opts(FUNC f,NODE a,NODE opts); |
|
pointer evalif(FNODE f,FNODE a,FNODE opt); |
pointer evalpf(PF pf,NODE args,NODE deriv); |
pointer evalpf(PF pf,NODE args,NODE deriv); |
void evalnodebody(NODE sn,NODE *dnp); |
void evalnodebody(NODE sn,NODE *dnp); |
void gen_searchf(char *name,FUNC *r); |
void gen_searchf(char *name,FUNC *r); |