version 1.23, 2008/07/15 16:11:49
|
version 1.25, 2008/07/29 09:24:31
|
Line 24 s" callback" add-lib
|
Line 24 s" callback" add-lib
|
|
|
\c #include <avcall.h> |
\c #include <avcall.h> |
\c #include <callback.h> |
\c #include <callback.h> |
|
\c extern Cell *gforth_RP; |
|
\c extern unsigned char *gforth_LP; |
\c static av_alist alist; |
\c static av_alist alist; |
\c static va_alist gforth_clist; |
\c static va_alist gforth_clist; |
\c static float frv; |
\c static float frv; |
Line 31 s" callback" add-lib
|
Line 33 s" callback" add-lib
|
\c static double drv; |
\c static double drv; |
\c static long long llrv; |
\c static long long llrv; |
\c static void * prv; |
\c static void * prv; |
\c static Cell *gforth_RP; |
|
\c static char *gforth_LP; |
|
\c typedef void *Label; |
\c typedef void *Label; |
\c typedef Label *Xt; |
\c typedef Label *Xt; |
\c Label *gforth_engine(Xt *ip, Cell *sp, Cell *rp0, Float *fp, char *lp); |
\c Label *gforth_engine(Xt *ip, Cell *sp, Cell *rp0, Float *fp, char *lp); |