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

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