![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to libffi.fs CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [gforth] / gforth|
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; |