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

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

#countcontent
1n/a/* Area: closure_call
2n/a Purpose: Check return value long long.
3n/a Limitations: none.
4n/a PR: none.
5n/a Originator: <andreast@gcc.gnu.org> 20030828 */
6n/a
7n/a/* { dg-do run } */
8n/a/* { dg-options "-Wno-format" { target alpha*-dec-osf* } } */
9n/a#include "ffitest.h"
10n/a
11n/astatic void cls_ret_ulonglong_fn(ffi_cif* cif __UNUSED__, void* resp,
12n/a void** args, void* userdata __UNUSED__)
13n/a{
14n/a *(unsigned long long *)resp= 0xfffffffffffffffLL ^ *(unsigned long long *)args[0];
15n/a
16n/a printf("%" PRIuLL ": %" PRIuLL "\n",*(unsigned long long *)args[0],
17n/a *(unsigned long long *)(resp));
18n/a}
19n/atypedef unsigned long long (*cls_ret_ulonglong)(unsigned long long);
20n/a
21n/aint main (void)
22n/a{
23n/a ffi_cif cif;
24n/a void *code;
25n/a ffi_closure *pcl = ffi_closure_alloc(sizeof(ffi_closure), &code);
26n/a ffi_type * cl_arg_types[2];
27n/a unsigned long long res;
28n/a
29n/a cl_arg_types[0] = &ffi_type_uint64;
30n/a cl_arg_types[1] = NULL;
31n/a
32n/a /* Initialize the cif */
33n/a CHECK(ffi_prep_cif(&cif, FFI_DEFAULT_ABI, 1,
34n/a &ffi_type_uint64, cl_arg_types) == FFI_OK);
35n/a CHECK(ffi_prep_closure_loc(pcl, &cif, cls_ret_ulonglong_fn, NULL, code) == FFI_OK);
36n/a res = (*((cls_ret_ulonglong)code))(214LL);
37n/a /* { dg-output "214: 1152921504606846761" } */
38n/a printf("res: %" PRIdLL "\n", res);
39n/a /* { dg-output "\nres: 1152921504606846761" } */
40n/a
41n/a res = (*((cls_ret_ulonglong)code))(9223372035854775808LL);
42n/a /* { dg-output "\n9223372035854775808: 8070450533247928831" } */
43n/a printf("res: %" PRIdLL "\n", res);
44n/a /* { dg-output "\nres: 8070450533247928831" } */
45n/a
46n/a exit(0);
47n/a}