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

#	count	content
1	n/a	/* Area: ffi_call
2	n/a	Purpose: Check fastcall strlen call on X86_WIN32 systems.
3	n/a	Limitations: none.
4	n/a	PR: none.
5	n/a	Originator: From the original ffitest.c */
6	n/a
7	n/a	/* { dg-do run { target i?86--cygwin i?86--mingw } } */
8	n/a
9	n/a	#include "ffitest.h"
10	n/a
11	n/a	static size_t __FASTCALL__ my_fastcall_strlen(char *s)
12	n/a	{
13	n/a	return (strlen(s));
14	n/a	}
15	n/a
16	n/a	int main (void)
17	n/a	{
18	n/a	ffi_cif cif;
19	n/a	ffi_type *args[MAX_ARGS];
20	n/a	void *values[MAX_ARGS];
21	n/a	ffi_arg rint;
22	n/a	char *s;
23	n/a	args[0] = &ffi_type_pointer;
24	n/a	values[0] = (void*) &s;
25	n/a
26	n/a	/* Initialize the cif */
27	n/a	CHECK(ffi_prep_cif(&cif, FFI_FASTCALL, 1,
28	n/a	&ffi_type_sint, args) == FFI_OK);
29	n/a
30	n/a	s = "a";
31	n/a	ffi_call(&cif, FFI_FN(my_fastcall_strlen), &rint, values);
32	n/a	CHECK(rint == 1);
33	n/a
34	n/a	s = "1234567";
35	n/a	ffi_call(&cif, FFI_FN(my_fastcall_strlen), &rint, values);
36	n/a	CHECK(rint == 7);
37	n/a
38	n/a	s = "1234567890123456789012345";
39	n/a	ffi_call(&cif, FFI_FN(my_fastcall_strlen), &rint, values);
40	n/a	CHECK(rint == 25);
41	n/a
42	n/a	printf("fastcall strlen tests passed\n");
43	n/a	exit(0);
44	n/a	}