gforth/libffi.fs - diff

Return to libffi.fs CVS log

Up to [gforth] / gforth

version 1.21, 2008/06/01 12:18:56	version 1.22, 2008/06/17 20:18:11
Line 23	Line 23

require libcc.fs	require libcc.fs

clear-libs s" ffi" add-lib	c-library libffi
	s" ffi" add-lib

\c #include <ffi.h>	\c #include <ffi.h>
\c static Cell *gforth_RP;	\c static Cell *gforth_RP;
Line 142 c-function ffi-ret-float1 ffi_ret_float1	Line 143 c-function ffi-ret-float1 ffi_ret_float1
\c #define ffi_ret_double1(r) ((double )(gforth_ritem) = r)	\c #define ffi_ret_double1(r) ((double )(gforth_ritem) = r)
c-function ffi-ret-double1 ffi_ret_double1 r -- void	c-function ffi-ret-double1 ffi_ret_double1 r -- void
: ffi-ret-double ( r -- ) ffi-ret-double1 ffi-ret-void ;	: ffi-ret-double ( r -- ) ffi-ret-double1 ffi-ret-void ;
	end-c-library

\ common stuff, same as fflib.fs	\ common stuff, same as fflib.fs