Examples/test-suite/ocaml/director_frob_runme.ml - third_party/swig - Git at Google

 open Swig
 open Director_frob

 let foo = new_Bravo '()
 assert (foo -> abs_method () as string = "Bravo::abs_method()")
	open Swig
	open Director_frob

	let foo = new_Bravo '()
	assert (foo -> abs_method () as string = "Bravo::abs_method()")