2006-06-15 Zoltan Varga <vargaz@gmail.com>

[mono.git] / mono / tests / libtest.c

diff --git a/mono/tests/libtest.c b/mono/tests/libtest.c
index fbb54efe79b6439d92e4d282912a6f9c5f936a7b..96fd60c2958520a3e231351b1b7e2eaab6c23851 100644 (file)
--- a/mono/tests/libtest.c
+++ b/mono/tests/libtest.c
@@ -1822,6 +1822,18 @@ mono_test_marshal_return_string_array_delegate (ReturnStringArrayDelegate d)
        return res;
 }
 
+STDCALL int
+add_delegate (int i, int j)
+{
+       return i + j;
+}
+
+STDCALL gpointer
+mono_test_marshal_return_fnptr (void)
+{
+       return &add_delegate;
+}
+
 /*
  * COM INTEROP TESTS
  */