--- gforth/libffi.fs 2008/06/17 20:18:11 1.22 +++ gforth/libffi.fs 2008/07/03 12:29:04 1.23 @@ -26,9 +26,18 @@ require libcc.fs c-library libffi s" ffi" add-lib -\c #include -\c static Cell *gforth_RP; -\c static unsigned char *gforth_LP; +s" os-type" environment? [IF] s" darwin" string-prefix? +[IF] + \c #define MACOSX + \c #include +[ELSE] + \c #include +[THEN] +[ELSE] + \c #include +[THEN] +\c extern Cell *gforth_RP; +\c extern unsigned char *gforth_LP; \c static void **gforth_clist; \c static void *gforth_ritem; \c typedef void *Label;