12 lines
431 B
OCaml
12 lines
431 B
OCaml
type case = string * (unit -> unit)
|
|
|
|
val check : string -> bool -> unit
|
|
val fail : string -> string -> unit
|
|
val check_equal_int : string -> int -> int -> unit
|
|
val check_equal_string : string -> string -> string -> unit
|
|
val check_true : string -> string -> bool -> unit
|
|
val expect_diagnostic : string -> (unit -> unit) -> unit
|
|
val run_suite : string -> case list -> unit
|
|
val failure_count : unit -> int
|
|
val case_count : unit -> int
|