我正在尝试将 OUnit 与 OCaml 一起使用。
单元代码源码(unit.ml)如下:
open OUnit
let empty_list = []
let list_a = [1;2;3]
let test_list_length _ =
assert_equal 1 (List.length empty_list);
assert_equal 3 (List.length list_a)
(* etc, etc *)
let test_list_append _ =
let list_b = List.append empty_list [1;2;3] in
assert_equal list_b list_a
let suite = "OUnit Example" >::: ["test_list_length" >:: test_list_length;
"test_list_append" >:: test_list_append]
let _ =
run_test_tt_main suite
使用ocamlc unit.ml
,我收到一条错误消息Error: Unbound module OUnit
。为什么是这样?如何在 OCaml 中使用 OUnit。我用opam
.