version 1.117, 2012/03/13 18:40:56
|
version 1.118, 2012/03/13 19:33:31
|
Line 391 typedef Cell *semiabifunc(Cell *sp, Floa
|
Line 391 typedef Cell *semiabifunc(Cell *sp, Floa
|
|
|
/* engine/prim support routines */ |
/* engine/prim support routines */ |
Address gforth_alloc(Cell size); |
Address gforth_alloc(Cell size); |
char *cstr(Char *from, UCell size, int clear); |
char *cstr(Char *from, UCell size); |
char *tilde_cstr(Char *from, UCell size, int clear); |
char *tilde_cstr(Char *from, UCell size); |
Cell opencreate_file(char *s, Cell wfam, int flags, Cell *wiorp); |
Cell opencreate_file(char *s, Cell wfam, int flags, Cell *wiorp); |
DCell timeval2us(struct timeval *tvp); |
DCell timeval2us(struct timeval *tvp); |
DCell timespec2ns(struct timespec *tvp); |
DCell timespec2ns(struct timespec *tvp); |
Line 473 extern __thread Address gforth_UP;
|
Line 473 extern __thread Address gforth_UP;
|
extern __thread void * gforth_pointers[]; |
extern __thread void * gforth_pointers[]; |
#endif |
#endif |
|
|
|
extern void gforth_backlink(); |
|
|
#ifdef HAS_FFCALL |
#ifdef HAS_FFCALL |
extern void gforth_callback(Xt* fcall, void * alist); |
extern void gforth_callback(Xt* fcall, void * alist); |
#endif |
#endif |