[ctypes-commit] ctypes/source _ctypes_test.c,1.42,1.43

[Thomas H. <th...@us...>]

Update of /cvsroot/ctypes/ctypes/source
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv19539

Modified Files:
	_ctypes_test.c 
Log Message:
More test functions for testing parameter flags.


Index: _ctypes_test.c
===================================================================
RCS file: /cvsroot/ctypes/ctypes/source/_ctypes_test.c,v
retrieving revision 1.42
retrieving revision 1.43
diff -C2 -d -r1.42 -r1.43
*** _ctypes_test.c	16 Feb 2005 13:17:32 -0000	1.42
--- _ctypes_test.c	9 Mar 2005 07:28:37 -0000	1.43
***************
*** 475,478 ****
--- 475,502 ----
  }
  
+ EXPORT(HWND) my_GetDesktopWindow(void)
+ {
+ #ifdef MS_WIN32
+ 	return GetDesktopWindow();
+ #else
+ 	return 42;
+ #endif
+ }
+ 
+ EXPORT(int) my_GetWindowRect(HWND hwnd, RECT *prect)
+ {
+ #ifdef MS_WIN32
+ 	return GetWindowRect(hwnd, prect);
+ #else
+ 	return hwnd == 0;
+ #endif
+ }
+ 
+ EXPORT(int) TwoOutArgs(int a, int *pi, int b, int *pj)
+ {
+ 	*pi = a;
+ 	*pj = b;
+ }
+ 
  #ifdef MS_WIN32
  EXPORT(S2H) __stdcall s_ret_2h_func(S2H inp) { return ret_2h_func(inp); }