sig
type output = { log : string list; outcomes : Webtest.Suite.outcome list; }
type raw_summary = {
total : int;
errors : int;
failures : int;
passes : int;
passed : bool;
}
type summary = { report : string; passed : bool; }
val run : Webtest.Suite.t -> (Webtest.Utils.output -> unit) -> unit
val summarise_raw : Webtest.Suite.outcome list -> Webtest.Utils.raw_summary
val summary_of_raw : Webtest.Utils.raw_summary -> Webtest.Utils.summary
val summarise : Webtest.Suite.outcome list -> Webtest.Utils.summary
end