10static long double return_ldl(
long double ldl)
19 long double ldl, rldl;
21 args[0] = &ffi_type_longdouble;
26 &ffi_type_longdouble, args) == FFI_OK);
28 for (ldl = -127.0; ldl < 127.0; ldl++)
30 ffi_call(&cif, FFI_FN(return_ldl), &rldl, values);
31 CHECK(rldl == 2 * ldl);
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)