448c3c62ab
way through the alphabet. git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@4519 626c5289-ae23-0410-ae9c-e8d60b6d4f22
7 lines
171 B
OCaml
7 lines
171 B
OCaml
open Using_protected
|
|
|
|
let f = new_FooBar C_void
|
|
let _ = (invoke f) "x" (C_int 3)
|
|
|
|
let _ = if (invoke f) "blah" (C_int 4) <> (C_int 4) then
|
|
raise (Failure "blah(int)")
|