mirror of
https://gitlab.com/scemama/QCaml.git
synced 2024-11-18 20:12:26 +01:00
15 lines
259 B
OCaml
15 lines
259 B
OCaml
(*
|
|
Tests for Sub1.B
|
|
*)
|
|
|
|
let test_string () =
|
|
Alcotest.(check (neg string)) "foo is not bar" "foo" "bar"
|
|
|
|
let test_string_hasty () =
|
|
assert ("foo" <> "bar")
|
|
|
|
let tests = [
|
|
"string", `Quick, test_string;
|
|
"string, hasty", `Quick, test_string_hasty;
|
|
]
|