r5495: *** empty log message ***

[uffi.git] / tests / uffi-c-test-lib.c

diff --git a/tests/uffi-c-test-lib.c b/tests/uffi-c-test-lib.c
index d8e9b49aa152a4782fa361f2413b47ba3cd294f6..c21a6e21376412b5ae28c8f8e73a25a95a215223 100644 (file)
--- a/tests/uffi-c-test-lib.c
+++ b/tests/uffi-c-test-lib.c
@@ -6,7 +6,7 @@
  *  Programer:    Kevin M. Rosenberg
  *  Date Started: Mar 2002
  *
- *  CVS Id:   $Id: uffi-c-test-lib.c,v 1.1 2003/04/29 14:08:02 kevin Exp $
+ *  CVS Id:   $Id: uffi-c-test-lib.c,v 1.2 2003/08/14 19:35:05 kevin Exp $
  *
  * This file, part of UFFI, is Copyright (c) 2002 by Kevin M. Rosenberg
  *
@@ -93,3 +93,19 @@ half_double_vector (int size, double* vec)
 
     
 
+DLLEXPORT
+void *
+cast_test_int () {
+  int *x = (int *) malloc(sizeof(int));
+  *x = 23;
+  return x;
+}
+
+DLLEXPORT
+void *
+cast_test_float ()
+{
+  double *y = (double *) malloc(sizeof(double));
+  *y = 3.21;
+  return y;
+}