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