r10585: rename to more closely align with src filename
[uffi.git] / examples / c-test-fns.c
index 05244b80601358519d072453e65da11a8763d399..fdc17b8ea38717203f3ea23d25b4732de38149de 100644 (file)
@@ -6,7 +6,7 @@
  *  Programer:    Kevin M. Rosenberg
  *  Date Started: Mar 2002
  *
- *  CVS Id:   $Id: c-test-fns.c,v 1.2 2002/03/21 04:04:45 kevin Exp $
+ *  CVS Id:   $Id$
  *
  * This file, part of UFFI, is Copyright (c) 2002 by Kevin M. Rosenberg
  *
 
 #ifdef WIN32
 #include <windows.h>
+
+BOOL WINAPI DllEntryPoint(HINSTANCE hinstdll,
+                          DWORD fdwReason,
+                          LPVOID lpvReserved)
+{
+        return 1;
+}
+       
+#define DLLEXPORT __declspec(dllexport)
+
+#else
+#define DLLEXPORT 
 #endif
 
 #include <ctype.h>
 #include <stdlib.h>
+#include <math.h>
 
 
 /* Test of constant input string */
+DLLEXPORT
 int
-#ifdef WIN32
-WINAPI
-#endif
 cs_count_upper (char* psz)
 {
   int count = 0;
@@ -47,10 +58,8 @@ cs_count_upper (char* psz)
 }
 
 /* Test of input and output of a string */
+DLLEXPORT
 void
-#ifdef WIN32
-WINAPI
-#endif
 cs_to_upper (char* psz)
 {
   if (psz) {
@@ -62,10 +71,8 @@ cs_to_upper (char* psz)
 }
 
 /* Test of an output only string */
+DLLEXPORT
 void
-#ifdef WIN32
-WINAPI
-#endif
 cs_make_random (int size, char* buffer)
 {
   int i;
@@ -74,5 +81,15 @@ cs_make_random (int size, char* buffer)
 }
 
     
+/* Test of input/output vector */
+DLLEXPORT
+void
+half_double_vector (int size, double* vec)
+{
+  int i;
+  for (i = 0; i < size; i++)
+    vec[i] /= 2.;
+}
 
     
+