module Utils:sig..end
type output = {
|
log : |
(* |
The logging produced while running the
tests.
| *) |
|
outcomes : |
(* |
The results of running the tests.
| *) |
type raw_summary = {
|
total : |
|
errors : |
|
failures : |
|
passes : |
|
passed : |
type summary = {
|
report : |
(* |
A report summarising the test results.
| *) |
|
passed : |
(* |
A flag indicating whether all the tests
passed.
| *) |
val run : Webtest.Suite.t -> (output -> unit) -> unitrun suite callback runs suite, passes the output to callback.val summarise_raw : Webtest.Suite.outcome list -> raw_summarysummarise outcomes converts a list of test outcomes into a raw
summary.val summary_of_raw : raw_summary -> summarysummary_of_raw creates a basic summary from a raw summary.val summarise : Webtest.Suite.outcome list -> summarysummarise outcomes converts a list of test outcomes into a summary.