swig/Examples/test-suite/ocaml/sneaky1_runme.ml
William S Fulton 53ceae6a0a fix for perl keyword
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@8990 626c5289-ae23-0410-ae9c-e8d60b6d4f22
2006-03-07 23:05:11 +00:00

9 lines
271 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._subtract (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 ])