aboutsummaryrefslogtreecommitdiff
path: root/Examples/test-suite/ocaml/using_private_runme.ml
diff options
context:
space:
mode:
authorHaibo Huang <hhb@google.com>2019-10-08 15:48:26 -0700
committerHaibo Huang <hhb@google.com>2019-11-14 22:14:23 +0000
commit80b4251e302efb18c145a4786249d695397ed42a (patch)
tree12b9dec2513f7caa92e7835bc17ab16ae5635df6 /Examples/test-suite/ocaml/using_private_runme.ml
parent189852d8cdfd5863c52ec7aa73affd926c5a3f43 (diff)
parent1e36f51346d95f8b9848e682c2eb986e9cb9b4f4 (diff)
downloadswig-80b4251e302efb18c145a4786249d695397ed42a.tar.gz
Upgrade swig to 'rel-4.0.1'llvm-r383902b
Also run autogen.sh to generate configure files. Exempt-From-Owner-Approval: add myself to owners Change-Id: I391aa20428836ae74dab8c8427627ca4dbc8ecf4
Diffstat (limited to 'Examples/test-suite/ocaml/using_private_runme.ml')
-rw-r--r--Examples/test-suite/ocaml/using_private_runme.ml10
1 files changed, 10 insertions, 0 deletions
diff --git a/Examples/test-suite/ocaml/using_private_runme.ml b/Examples/test-suite/ocaml/using_private_runme.ml
new file mode 100644
index 000000000..026cbfd91
--- /dev/null
+++ b/Examples/test-suite/ocaml/using_private_runme.ml
@@ -0,0 +1,10 @@
+open Swig
+open Using_private
+
+let _ =
+ let f = new_FooBar '() in
+ let _ = f -> "[x]" (3) in
+ assert (f -> blah (4) as int = 4);
+ assert (f -> defaulted () as int = -1);
+ assert (f -> defaulted (222) as int = 222)
+;;