2 Purpose: Check strlen function call with additional arguments.
5 Originator: From the original ffitest.c */
11 static size_t ABI_ATTR
my_f(float a
, char *s
, int i
)
13 return (size_t) ((int) strlen(s
) + (int) a
+ i
);
19 ffi_type
*args
[MAX_ARGS
];
20 void *values
[MAX_ARGS
];
25 args
[2] = &ffi_type_sint
;
26 args
[1] = &ffi_type_pointer
;
27 args
[0] = &ffi_type_float
;
28 values
[2] = (void*) &v1
;
29 values
[1] = (void*) &s
;
30 values
[0] = (void*) &v2
;
32 /* Initialize the cif */
33 CHECK(ffi_prep_cif(&cif
, ABI_NUM
, 3,
34 &ffi_type_sint
, args
) == FFI_OK
);
39 ffi_call(&cif
, FFI_FN(my_f
), &rint
, values
);
45 ffi_call(&cif
, FFI_FN(my_f
), &rint
, values
);
48 s
= "1234567890123456789012345";
51 ffi_call(&cif
, FFI_FN(my_f
), &rint
, values
);