Merge pull request #1470 from ZackerySpytz/OCaml-dynamic_cast-test

[OCaml] Fix the dynamic_cast test
This commit is contained in:
William S Fulton 2019-02-15 19:10:15 +00:00 committed by GitHub
commit 1f4b3a4553
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23
2 changed files with 14 additions and 0 deletions

View file

@ -0,0 +1,9 @@
open Swig
open Dynamic_cast
let f = new_Foo '()
let b = new_Bar '()
let x = f -> blah ()
let y = b -> blah ()
assert (_do_test '(y) as string = "Bar::test")