swig/SWIG/Examples/test-suite/ocaml/sneaky1_runme.ml
Art Yerkes 75808b52ea Changed test cases to open Swig.
Changed test case runme line a bit to link swig.cmo.


git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@5207 626c5289-ae23-0410-ae9c-e8d60b6d4f22
2003-10-25 21:17:06 +00:00

9 lines
266 B
Standard ML

(* Stolen from ruby test cases *)
open Swig
open Sneaky1
let x = Sneaky1._add (C_list [ C_int 3; C_int 4 ])
let y = Sneaky1._sub (C_list [ C_int 3; C_int 4 ])
let z = Sneaky1._mul (C_list [ C_int 3; C_int 4 ])
let w = Sneaky1._divide (C_list [ C_int 3; C_int 4 ])