Upstream version 1.3.40
[profile/ivi/swig.git] / Examples / test-suite / ocaml / sneaky1_runme.ml
1 (* Stolen from ruby test cases *)
2
3 open Swig
4 open Sneaky1
5
6 let x = Sneaky1._add (C_list [ C_int 3; C_int 4 ])
7 let y = Sneaky1._subtract (C_list [ C_int 3; C_int 4 ])
8 let z = Sneaky1._mul (C_list [ C_int 3; C_int 4 ])
9 let w = Sneaky1._divide (C_list [ C_int 3; C_int 4 ])