open Base

let%test_unit "rev" =
  [%test_eq: int list] (List.rev [ 3; 2; 1 ]) [ 1; 2; 3 ]

let test stdout db = 
  let _ = stdout in
  let _ = db in
  Ok ()