swig/Examples/test-suite/ocaml/memberin_extend_runme.ml
Zackery Spytz 35e417a4db [OCaml] Runtime tests for default_arg_values, inherit_missing and some others
Add runtime tests for default_arg_values, inherit_missing,
memberin_extend, rename_predicates, template_inherit,
template_tbase_template, and typedef_classforward_same_name.
2019-02-01 12:59:29 -07:00

10 lines
314 B
OCaml

open Swig
open Memberin_extend
let _ =
let em1 = new_ExtendMe '() and em2 = new_ExtendMe '() in
assert (em1 -> "[thing]" ("em1thing") = C_void);
assert (em2 -> "[thing]" ("em2thing") = C_void);
assert (em1 -> "[thing]" () as string = "em1thing");
assert (em2 -> "[thing]" () as string = "em2thing");
;;