version 1.48, 2008/09/01 06:20:33 |
version 1.55, 2015/08/14 13:51:56 |
|
|
* 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.47 2007/04/30 02:14:34 noro Exp $ |
* $OpenXM: OpenXM_contrib2/asir2000/parse/parse.h,v 1.54 2015/08/06 10:01:53 fujimoto Exp $ |
*/ |
*/ |
# if defined(VISUAL) |
# if defined(VISUAL) || defined(__MINGW32__) |
#include <time.h> |
#include <time.h> |
#else |
#else |
#include <sys/time.h> |
#include <sys/time.h> |
Line 341 extern NODE current_option; |
|
Line 341 extern NODE current_option; |
|
#define fflush w_fflush |
#define fflush w_fflush |
#endif |
#endif |
|
|
#if defined(__GNUC__) || defined(VISUAL) || (defined(__MACH__) && defined(__ppc__)) || defined(__FreeBSD__) |
#if defined(__GNUC__) || defined(VISUAL) || defined(__MINGW32__) || (defined(__MACH__) && defined(__ppc__)) || defined(__FreeBSD__) |
NODE mknode(int,...); |
NODE mknode(int,...); |
FNODE mkfnode(int,fid,...); |
FNODE mkfnode(int,fid,...); |
SNODE mksnode(int,sid,...); |
SNODE mksnode(int,sid,...); |
Line 467 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 486 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 515 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 654 void dp_mbase(NODE hlist,NODE *mbase); |
|
Line 651 void dp_mbase(NODE hlist,NODE *mbase); |
|
void dp_idiv(DP p,Q c,DP *rp); |
void dp_idiv(DP p,Q c,DP *rp); |
void dp_ptozp2(DP p0,DP p1,DP *hp,DP *rp); |
void dp_ptozp2(DP p0,DP p1,DP *hp,DP *rp); |
void dp_ptozp(DP p,DP *rp); |
void dp_ptozp(DP p,DP *rp); |
int eqdl(int nv,DL dl1,DL dl2); |
|
void _dpmod_to_vect(DP f,DL *at,int *b); |
void _dpmod_to_vect(DP f,DL *at,int *b); |
void _tf_to_vect_compress(NODE tf,DL *at,CDP *b); |
void _tf_to_vect_compress(NODE tf,DL *at,CDP *b); |
void dp_to_vect(DP f,DL *at,Q *b); |
void dp_to_vect(DP f,DL *at,Q *b); |
|
|
void sprompt(char *ptr); |
void sprompt(char *ptr); |
void process_args(int ac,char **av); |
void process_args(int ac,char **av); |
void sig_init() ; |
void sig_init() ; |
static void (*old_int)(int);; |
|
void asir_save_handler() ; |
void asir_save_handler() ; |
void asir_set_handler() ; |
void asir_set_handler() ; |
void asir_reset_handler() ; |
void asir_reset_handler() ; |
Line 895 pointer evalmapf(FUNC f,FNODE a); |
|
Line 890 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 bevalf_with_opts(FUNC f,NODE a,NODE opts); |
pointer evalif(FNODE f,FNODE a,FNODE opt); |
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); |