22 result.
a = b1.
a + b2.
a;
23 result.
b = b1.
b + b2.
b;
24 result.
c = b1.
c + b2.
c;
26 printf(
"%d %g %d %d %g %d: %d %g %d\n", b1.
a, b1.
b, b1.
c, b2.
a, b2.
b, b2.
c,
27 result.
a, result.
b, result.
c);
33 void** args,
void* userdata __UNUSED__)
47 ffi_closure *pcl = ffi_closure_alloc(
sizeof(ffi_closure), &code);
49 ffi_type* cls_struct_fields[4];
50 ffi_type cls_struct_type;
51 ffi_type* dbl_arg_types[5];
57 cls_struct_type.size = 0;
58 cls_struct_type.alignment = 0;
59 cls_struct_type.type = FFI_TYPE_STRUCT;
60 cls_struct_type.elements = cls_struct_fields;
62 cls_struct_fields[0] = &ffi_type_sint;
63 cls_struct_fields[1] = &ffi_type_double;
64 cls_struct_fields[2] = &ffi_type_sint;
65 cls_struct_fields[3] =
NULL;
67 dbl_arg_types[0] = &cls_struct_type;
68 dbl_arg_types[1] = &cls_struct_type;
69 dbl_arg_types[2] =
NULL;
72 dbl_arg_types) == FFI_OK);
80 printf(
"res: %d %g %d\n", res_dbl.
a, res_dbl.
b, res_dbl.
c);
91 printf(
"res: %d %g %d\n", res_dbl.
a, res_dbl.
b, res_dbl.
c);
static void cls_struct_16byte_gn(ffi_cif *cif __UNUSED__, void *resp, void **args, void *userdata __UNUSED__)
ffi_status ffi_prep_closure_loc(ffi_closure *closure, ffi_cif *cif, void(*fun)(ffi_cif *, void *, void **, void *), void *user_data, void *codeloc)
void ffi_call(ffi_cif *cif, void(*fn)(void), void *rvalue, void **avalue)
struct cls_struct_16byte cls_struct_16byte
cls_struct_16byte cls_struct_16byte_fn(struct cls_struct_16byte b1, struct cls_struct_16byte b2)
ffi_status ffi_prep_cif(ffi_cif *cif, ffi_abi abi, unsigned int nargs, ffi_type *rtype, ffi_type **atypes)