Return to libffi.fs CVS log | Up to [gforth] / gforth |
version 1.17, 2008/03/25 10:41:30 | version 1.18, 2008/04/19 19:15:14 |
---|---|
Line 23 | Line 23 |
require libcc.fs | require libcc.fs |
s" libffi.so" open-lib 0= [if] | |
.( cannot open libffi ) cr abort | |
[then] | |
\c #include <ffi.h> | \c #include <ffi.h> |
\c static Cell *gforth_RP; | \c static Cell *gforth_RP; |
\c static char *gforth_LP; | \c static char *gforth_LP; |