summaryrefslogtreecommitdiffstats
path: root/testsuite/tests/lib-dynlink-csharp/entry.c
diff options
context:
space:
mode:
authorXavier Clerc <xavier.clerc@inria.fr>2010-04-08 12:44:07 +0000
committerXavier Clerc <xavier.clerc@inria.fr>2010-04-08 12:44:07 +0000
commitfa287cfba124e5bcc6c15d8274e19588567d0a7d (patch)
tree0e85f3f6d4db5c61167000c1f2a48f5470e1b881 /testsuite/tests/lib-dynlink-csharp/entry.c
parente09c0b1fcb364940c81c8fb657f04c61913ae44c (diff)
Tests moved to 'lib-dynlink-csharp'
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@10252 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'testsuite/tests/lib-dynlink-csharp/entry.c')
-rwxr-xr-xtestsuite/tests/lib-dynlink-csharp/entry.c13
1 files changed, 13 insertions, 0 deletions
diff --git a/testsuite/tests/lib-dynlink-csharp/entry.c b/testsuite/tests/lib-dynlink-csharp/entry.c
new file mode 100755
index 000000000..13ecd73df
--- /dev/null
+++ b/testsuite/tests/lib-dynlink-csharp/entry.c
@@ -0,0 +1,13 @@
+#include <caml/memory.h>
+#include <caml/alloc.h>
+#include <caml/mlvalues.h>
+#include <caml/callback.h>
+#include <caml/custom.h>
+#include <caml/fail.h>
+
+__declspec(dllexport) void __stdcall start_caml_engine() {
+ char * argv[2];
+ argv[0] = "--";
+ argv[1] = NULL;
+ caml_startup(argv);
+}