X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=examples%2Fc-test-fns.c;h=cab2dd67bad15a6b46fdaac8d7c62233c10ebdf5;hb=c55832db4eb5a0535762f291674b3b26d288ad17;hp=7358114f02d1f01d94ad4646e602fd362ef2a230;hpb=1796f8c038481234982c983cb0ee611c3ffac4c6;p=uffi.git

diff --git a/examples/c-test-fns.c b/examples/c-test-fns.c
index 7358114..cab2dd6 100644
--- a/examples/c-test-fns.c
+++ b/examples/c-test-fns.c
@@ -6,7 +6,7 @@
  *  Programer:    Kevin M. Rosenberg
  *  Date Started: Mar 2002
  *
- *  CVS Id:   $Id: c-test-fns.c,v 1.3 2002/03/21 05:29:57 kevin Exp $
+ *  CVS Id:   $Id: c-test-fns.c,v 1.4 2002/03/21 09:54:34 kevin Exp $
  *
  * This file, part of UFFI, is Copyright (c) 2002 by Kevin M. Rosenberg
  *
@@ -36,6 +36,8 @@ BOOL WINAPI DllEntryPoint(HINSTANCE hinstdll,
 
 #include <ctype.h>
 #include <stdlib.h>
+#include <math.h>
+
 
 /* Test of constant input string */
 DLLEXPORT
@@ -79,5 +81,16 @@ 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.;
+}
+
+