[ctypes-commit] ctypes/source _ctypes_test.c,1.39,1.40

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

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

Modified Files:
	_ctypes_test.c 
Log Message:
Add stdcall functions returning structures.


Index: _ctypes_test.c
===================================================================
RCS file: /cvsroot/ctypes/ctypes/source/_ctypes_test.c,v
retrieving revision 1.39
retrieving revision 1.40
diff -C2 -d -r1.39 -r1.40
*** _ctypes_test.c	2 Dec 2004 16:00:44 -0000	1.39
--- _ctypes_test.c	2 Dec 2004 20:36:41 -0000	1.40
***************
*** 470,473 ****
--- 470,478 ----
  }
  
+ #ifdef MS_WIN32
+ EXPORT(S2H) __stdcall s_ret_2h_func(void) { return ret_2h_func(); }
+ EXPORT(S8I) __stdcall s_ret_8i_func(void) { return ret_8i_func(); }
+ #endif
+ 
  DL_EXPORT(void)
  init_ctypes_test(void)