c283f61209
Changed test case runme line a bit to link swig.cmo. git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@5207 626c5289-ae23-0410-ae9c-e8d60b6d4f22
8 lines
181 B
OCaml
8 lines
181 B
OCaml
open Swig
|
|
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)")
|