16 unsigned char c[
sizeof (double)];
21static double dblit(
double d)
35 args[0] = &ffi_type_double;
40 &ffi_type_double, args) == FFI_OK);
46 memset(result[1].c,
CANARY,
sizeof (
double));
48 ffi_call(&cif, FFI_FN(dblit), &result[0].d, values);
54 CHECK(result[0].d == dblit(d));
57 for (i = 0; i <
sizeof (double); ++i)
void ffi_call(ffi_cif *cif, void(*fn)(void), void *rvalue, void **avalue)
ffi_status ffi_prep_cif(ffi_cif *cif, ffi_abi abi, unsigned int nargs, ffi_type *rtype, ffi_type **atypes)