aboutsummaryrefslogtreecommitdiff
path: root/Examples/test-suite/ocaml/sneaky1_runme.ml
blob: 37678b38e25a8add1e9dfec30ce5f39e9b728254 (plain)
1
2
3
4
5
6
7
8
(* Stolen from ruby test cases *)

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 ])