blob: 6d1617d2702a6741110effac62db228373a0c02a (
plain) (
tree)
|
|
(* Anything helper functions that would be imported for each module *)
let print_endline_int i = print_endline (Int.to_string i)
let time f =
let before = Unix.gettimeofday () in
let result = f () in
let after = Unix.gettimeofday () in
print_endline (Printf.sprintf "%f" (after -. before)) ;
result
|