24 result.
a = a1.
a + a2.
a;
25 result.
b = a1.
b + a2.
b;
26 result.
c = a1.
c + a2.
c;
27 result.
d = a1.
d + a2.
d;
28 result.
e = a1.
e + a2.
e;
31 printf(
"%g %d %d %g %d %g %d %d %g %d: %g %d %d %g %d\n",
32 a1.
a, a1.
b, a1.
c, a1.
d, a1.
e,
33 a2.
a, a2.
b, a2.
c, a2.
d, a2.
e,
34 result.
a, result.
b, result.
c, result.
d, result.
e);
39 cls_struct_19byte_gn(ffi_cif* cif
__UNUSED__,
void* resp,
void** args,
54 ffi_closure *pcl = ffi_closure_alloc(
sizeof(ffi_closure), &code);
56 ffi_type* cls_struct_fields[6];
57 ffi_type cls_struct_type;
58 ffi_type* dbl_arg_types[3];
64 cls_struct_type.size = 0;
65 cls_struct_type.alignment = 0;
66 cls_struct_type.type = FFI_TYPE_STRUCT;
67 cls_struct_type.elements = cls_struct_fields;
69 cls_struct_fields[0] = &ffi_type_double;
72 cls_struct_fields[3] = &ffi_type_double;
74 cls_struct_fields[5] =
NULL;
76 dbl_arg_types[0] = &cls_struct_type;
77 dbl_arg_types[1] = &cls_struct_type;
78 dbl_arg_types[2] =
NULL;
81 dbl_arg_types) == FFI_OK);
89 printf(
"res: %g %d %d %g %d\n", res_dbl.
a, res_dbl.
b, res_dbl.
c,
90 res_dbl.
d, res_dbl.
e);
97 printf(
"res: %g %d %d %g %d\n", res_dbl.
a, res_dbl.
b, res_dbl.
c,
98 res_dbl.
d, res_dbl.
e);