On this page
OUnit Testing Framework
Overview
Qualified supports the OUnit testing framework.
Basic Example
module Tests = struct
open OUnit
let suite = [
"Person module" >:::
[
"test_greet" >:: (fun _ ->
let person : Person.t = { Person.name = "Jack" } in
assert_equal "Hello, Jack!" (Person.greet person)
)
]
]
;;
end