swig/Examples/test-suite/ocaml/using_pointers_runme.ml
Zackery Spytz f78358d9aa [OCaml] Runtime tests for template_opaque, using_extend and some others
Add runtime tests for namespace_virtual_method, template_opaque,
using_extend, using_inherit, using_pointers, using_private, and
varargs_overload.
2019-01-27 06:50:51 -07:00

10 lines
202 B
OCaml

open Swig
open Using_pointers
let f = new_FooBar '()
try
ignore (f -> exception_spec (1)); assert false
with Failure _ -> ()
try
ignore (f -> exception_spec (2)); assert false
with Failure _ -> ()