ยปCore Development>Code coverage>Modules/_ctypes/libffi/testsuite/libffi.call/cls_sshort.c

Python code coverage for Modules/_ctypes/libffi/testsuite/libffi.call/cls_sshort.c

#countcontent
1n/a/* Area: closure_call
2n/a Purpose: Check return value sshort.
3n/a Limitations: none.
4n/a PR: none.
5n/a Originator: <andreast@gcc.gnu.org> 20031108 */
6n/a
7n/a/* { dg-do run } */
8n/a#include "ffitest.h"
9n/a
10n/astatic void cls_ret_sshort_fn(ffi_cif* cif __UNUSED__, void* resp, void** args,
11n/a void* userdata __UNUSED__)
12n/a{
13n/a *(ffi_arg*)resp = *(signed short *)args[0];
14n/a printf("%d: %d\n",*(signed short *)args[0],
15n/a (int)*(ffi_arg *)(resp));
16n/a}
17n/atypedef signed short (*cls_ret_sshort)(signed short);
18n/a
19n/aint main (void)
20n/a{
21n/a ffi_cif cif;
22n/a void *code;
23n/a ffi_closure *pcl = ffi_closure_alloc(sizeof(ffi_closure), &code);
24n/a ffi_type * cl_arg_types[2];
25n/a signed short res;
26n/a
27n/a cl_arg_types[0] = &ffi_type_sshort;
28n/a cl_arg_types[1] = NULL;
29n/a
30n/a /* Initialize the cif */
31n/a CHECK(ffi_prep_cif(&cif, FFI_DEFAULT_ABI, 1,
32n/a &ffi_type_sshort, cl_arg_types) == FFI_OK);
33n/a
34n/a CHECK(ffi_prep_closure_loc(pcl, &cif, cls_ret_sshort_fn, NULL, code) == FFI_OK);
35n/a
36n/a res = (*((cls_ret_sshort)code))(255);
37n/a /* { dg-output "255: 255" } */
38n/a printf("res: %d\n",res);
39n/a /* { dg-output "\nres: 255" } */
40n/a
41n/a exit(0);
42n/a}