Module `OUnitState`Source

Manipulate the state of OUnit runner.

Sourcetype 'worker next_test_case_t =

| Not_enough_worker
| Try_again
| Next_test_case of OUnitTest.path * OUnitTest.test_fun * 'worker
| Finished

Sourcetype time = float

Sourcetype 'worker test_running = {

test_length : OUnitTest.test_length;
deadline : time;
next_health_check : time;
worker : 'worker;

}

Sourcetype 'worker t = {

tests_planned : (OUnitTest.path * (OUnitTest.test_length * OUnitTest.test_fun)) list;
tests_running : (OUnitTest.path * 'worker test_running) list;
tests_passed : (OUnitTest.result_full * OUnitTest.result_list) list;
idle_workers : 'worker list;
chooser : OUnitChooser.chooser;
cache : OUnitCache.cache;
health_check_interval : time;

}

Sourceval health_check_interval : float OUnitConf.var

Source

val create : 
  OUnitConf.conf ->
  OUnitChooser.chooser ->
  (OUnitTest.path * OUnitTest.test_length * OUnitTest.test_fun) list ->
  'a t

Sourceval filter_out : 'a -> ('a * 'b) list -> ('a * 'b) list

Sourceval maybe_dump_cache : OUnitConf.conf -> 'a t -> 'a t

Source

val add_test_results : 
  OUnitConf.conf ->
  (OUnitTest.result_full * OUnitTest.result_list) ->
  'a t ->
  'a t

Source

val test_finished : 
  OUnitConf.conf ->
  (OUnitTest.result_full * OUnitTest.result_list) ->
  'a ->
  'a t ->
  'a t

Sourceval add_worker : 'a -> 'a t -> 'a t

Sourceval remove_idle_worker : 'a -> 'a t -> 'a t

Sourceval count_worker : 'a t -> int

Sourceval count_tests_running : 'a t -> int

Sourceval get_workers : 'a t -> 'a list

Sourceval get_idle_workers : 'a t -> 'a list

Sourceval is_idle_worker : 'a -> 'a t -> bool

Sourceval get_tests_running : 'a t -> OUnitTest.path list

Source

val next_test_case : 
  OUnitConf.conf ->
  (OUnitTest.path, OUnitTest.result) OUnitLogger.logger ->
  'a t ->
  'a next_test_case_t * 'a t

Sourceval get_results : 'a t -> OUnitTest.result_full list

Get all the results.

Sourceval get_worker_need_health_check : 'a t -> (OUnitTest.path option * 'a) list

Get all the workers that need to be checked for their health.

Sourceval update_test_activity : OUnitTest.path -> 'a t -> 'a t

Update the activity of a worker, this postpone the next health check.

Source

val get_worker_timed_out : 
  'a t ->
  (OUnitTest.path * OUnitTest.test_length * 'a) list

Get all the workers that are timed out, i.e. that need to be stopped.

Sourceval timeout : 'a t -> float

Compute when is the next time, we should either run health check or timeout a test.

Install

Dune Dependency

Authors

Maintainers

Sources

doc/ounit2.advanced/OUnitState/index.html

Module `OUnitState`Source

package ounit2

Install

Dune Dependency

Authors

Maintainers

Sources

doc/ounit2.advanced/OUnitState/index.html

Module OUnitStateSource

Module `OUnitState`Source