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

#	count	content
1	n/a	/* Area: closure_call
2	n/a	Purpose: Check multiple long long values passing.
3	n/a	Also, exceed the limit of gpr and fpr registers on PowerPC
4	n/a	Darwin.
5	n/a	Limitations: none.
6	n/a	PR: none.
7	n/a	Originator: <andreast@gcc.gnu.org> 20031026 */
8	n/a
9	n/a	/* { dg-do run } */
10	n/a
11	n/a	#include "ffitest.h"
12	n/a
13	n/a	static void
14	n/a	closure_test_fn0(ffi_cif* cif __UNUSED__, void* resp, void** args,
15	n/a	void* userdata)
16	n/a	{
17	n/a	(ffi_arg)resp =
18	n/a	(int)(unsigned long long )args[0] + (int)(unsigned long long )args[1] +
19	n/a	(int)(unsigned long long )args[2] + (int)(unsigned long long )args[3] +
20	n/a	(int)(unsigned long long )args[4] + (int)(unsigned long long )args[5] +
21	n/a	(int)(unsigned long long )args[6] + (int)(unsigned long long )args[7] +
22	n/a	(int)(unsigned long long )args[8] + (int)(unsigned long long )args[9] +
23	n/a	(int)(unsigned long long )args[10] +
24	n/a	(int)(unsigned long long )args[11] +
25	n/a	(int)(unsigned long long )args[12] +
26	n/a	(int)(unsigned long long )args[13] +
27	n/a	(int)(unsigned long long )args[14] +
28	n/a	(int )args[15] + (intptr_t)userdata;
29	n/a
30	n/a	printf("%d %d %d %d %d %d %d %d %d %d %d %d %d %d %d %d %d: %d\n",
31	n/a	(int)(unsigned long long )args[0],
32	n/a	(int)(unsigned long long )args[1],
33	n/a	(int)(unsigned long long )args[2],
34	n/a	(int)(unsigned long long )args[3],
35	n/a	(int)(unsigned long long )args[4],
36	n/a	(int)(unsigned long long )args[5],
37	n/a	(int)(unsigned long long )args[6],
38	n/a	(int)(unsigned long long )args[7],
39	n/a	(int)(unsigned long long )args[8],
40	n/a	(int)(unsigned long long )args[9],
41	n/a	(int)(unsigned long long )args[10],
42	n/a	(int)(unsigned long long )args[11],
43	n/a	(int)(unsigned long long )args[12],
44	n/a	(int)(unsigned long long )args[13],
45	n/a	(int)(unsigned long long )args[14],
46	n/a	(int )args[15],
47	n/a	(int)(intptr_t)userdata, (int)(ffi_arg )resp);
48	n/a
49	n/a	}
50	n/a
51	n/a	typedef int (*closure_test_type0)(unsigned long long, unsigned long long,
52	n/a	unsigned long long, unsigned long long,
53	n/a	unsigned long long, unsigned long long,
54	n/a	unsigned long long, unsigned long long,
55	n/a	unsigned long long, unsigned long long,
56	n/a	unsigned long long, unsigned long long,
57	n/a	unsigned long long, unsigned long long,
58	n/a	unsigned long long, int);
59	n/a
60	n/a	int main (void)
61	n/a	{
62	n/a	ffi_cif cif;
63	n/a	void *code;
64	n/a	ffi_closure *pcl = ffi_closure_alloc(sizeof(ffi_closure), &code);
65	n/a	ffi_type * cl_arg_types[17];
66	n/a	int i, res;
67	n/a
68	n/a	for (i = 0; i < 15; i++) {
69	n/a	cl_arg_types[i] = &ffi_type_uint64;
70	n/a	}
71	n/a	cl_arg_types[15] = &ffi_type_sint;
72	n/a	cl_arg_types[16] = NULL;
73	n/a
74	n/a	/* Initialize the cif */
75	n/a	CHECK(ffi_prep_cif(&cif, FFI_DEFAULT_ABI, 16,
76	n/a	&ffi_type_sint, cl_arg_types) == FFI_OK);
77	n/a
78	n/a	CHECK(ffi_prep_closure_loc(pcl, &cif, closure_test_fn0,
79	n/a	(void ) 3 / userdata */, code) == FFI_OK);
80	n/a
81	n/a	res = (*((closure_test_type0)code))
82	n/a	(1LL, 2LL, 3LL, 4LL, 127LL, 429LL, 7LL, 8LL, 9LL, 10LL, 11LL, 12LL,
83	n/a	13LL, 19LL, 21LL, 1);
84	n/a	/* { dg-output "1 2 3 4 127 429 7 8 9 10 11 12 13 19 21 1 3: 680" } */
85	n/a	printf("res: %d\n",res);
86	n/a	/* { dg-output "\nres: 680" } */
87	n/a
88	n/a	exit(0);
89	n/a	}