QCheck.TestSourceA single property test
Fail the test with some additional message that will be reported.
Format version of fail_report
val make_cell :
?if_assumptions_fail:([ `Fatal | `Warning ] * float) ->
?count:int ->
?long_factor:int ->
?max_gen:int ->
?max_fail:int ->
?small:('a -> int) ->
?name:string ->
'a arbitrary ->
('a -> bool) ->
'a cellmake_cell arb prop builds a test that checks property prop on instances of the generator arb.
val make :
?if_assumptions_fail:([ `Fatal | `Warning ] * float) ->
?count:int ->
?long_factor:int ->
?max_gen:int ->
?max_fail:int ->
?small:('a -> int) ->
?name:string ->
'a arbitrary ->
('a -> bool) ->
tmake arb prop builds a test that checks property prop on instances of the generator arb. See make_cell for a description of the parameters.
Exception raised when a test failed, with the list of counter-examples. Test_fail (name, l) means test name failed on elements of l.
Exception raised when a test raised an exception e, with the sample that triggered the exception. Test_error (name, i, e, st) means name failed on i with exception e, and st is the stacktrace (if enabled) or an empty string.
val print_error :
?st:string ->
'a arbitrary ->
string ->
('a TestResult.counter_ex * exn) ->
stringcheck_result cell res checks that res is Ok _, and returns unit. Otherwise, it raises some exception.
Handler executed after each event during testing of an instance.
Callback executed after each instance of a test has been run. The callback is given the instance tested, and the current results of the test.
Callback executed after each test has been run. f name cell res means test cell, named name, gave res.
val check_cell :
?long:bool ->
?call:'a callback ->
?step:'a step ->
?handler:'a handler ->
?rand:Random.State.t ->
'a cell ->
'a TestResult.tcheck_cell ~long ~rand test generates up to count random values of type 'a using arbitrary and the random state st. The predicate law is called on them and if it returns false or raises an exception then we have a counter-example for the law.
val check_cell_exn :
?long:bool ->
?call:'a callback ->
?step:'a step ->
?rand:Random.State.t ->
'a cell ->
unitSame as check_cell but calls check_result on the result.
Checks the property against some test cases, and calls check_result, which might raise an exception in case of failure.