PageRenderTime 6ms CodeModel.GetById 2ms app.highlight 1ms RepoModel.GetById 1ms app.codeStats 0ms

/trunk/Examples/test-suite/ocaml/class_ignore_runme.ml

#
OCaml | 7 lines | 5 code | 2 blank | 0 comment | 0 complexity | 494fe479ac072c934c35eb330c9bc28f MD5 | raw file
1open Swig
2open Class_ignore
3
4let a = new_Bar C_void
5let _ = (if _do_blah a <> C_string "Bar::blah" then
6  raise (Failure "We didn't really get a bar object."))
7