| \c (void *)a_rvalue, (void **)a_avalues) |
\c (void *)a_rvalue, (void **)a_avalues) |
| c-function ffi-call ffi_call1 a a a a -- void |
c-function ffi-call ffi_call1 a a a a -- void |
| |
|
| \c #define ffi-prep-closure1(a_ip, a_cif, a_closure) \ |
\c #define ffi_prep_closure1(a_ip, a_cif, a_closure) \ |
| \c ffi_prep_closure((ffi_closure *)a_closure, (ffi_cif *)a_cif, gforth_callback_ffi, (void *)a_ip) |
\c ffi_prep_closure((ffi_closure *)a_closure, (ffi_cif *)a_cif, gforth_callback_ffi, (void *)a_ip) |
| c-function ffi-prep-closure a a a -- n |
c-function ffi-prep-closure a a a -- n |
| |
|