aboutsummaryrefslogtreecommitdiff
path: root/Examples/test-suite/ocaml/valuewrapper_runme.ml
diff options
context:
space:
mode:
Diffstat (limited to 'Examples/test-suite/ocaml/valuewrapper_runme.ml')
-rw-r--r--Examples/test-suite/ocaml/valuewrapper_runme.ml8
1 files changed, 8 insertions, 0 deletions
diff --git a/Examples/test-suite/ocaml/valuewrapper_runme.ml b/Examples/test-suite/ocaml/valuewrapper_runme.ml
new file mode 100644
index 000000000..0e2d73136
--- /dev/null
+++ b/Examples/test-suite/ocaml/valuewrapper_runme.ml
@@ -0,0 +1,8 @@
+open Swig
+open Valuewrapper
+
+let _ =
+ let x1 = new_Xi '(5) and y1 = new_YXi '() in
+ assert (y1 -> spam (x1) as int = 0);
+ assert (y1 -> spam () as int = 0)
+;;