package ounit2

You can search for identifiers within the package.

in-package search v0.2.0

package ounit2

ounit2
- OUnit
- OUnit2
  - Conf
ounit2.advanced
- OUnitAssert
- OUnitBracket
- OUnitCache
- OUnitCheckEnv
  - EnvElement
  - SetEnv
- OUnitChooser
  - Plugin
- OUnitConf
- OUnitCore
- OUnitDiff
  - DIFF_ELEMENT
  - EInt
  - EString
  - ListSimpleMake
    
    D
  - S
  - SetMake
    
    D
- OUnitLogger
  - Test
- OUnitLoggerCI
- OUnitLoggerHTML
- OUnitLoggerHTMLData
- OUnitLoggerJUnit
- OUnitLoggerStd
- OUnitPlugin
  - Make
    
    Settings
  - SETTINGS
- OUnitPropList
- OUnitResultSummary
- OUnitRunner
  - GenericWorker
    
    MapPath
- OUnitRunnerProcesses
- OUnitShared
  - Mutex
- OUnitState
- OUnitTest
  - MapPath
  - Path
  - SetTestPath
- OUnitTestData
- OUnitUtils
ounit2.threads
- OUnitThreads

Legend:
Library
Module
Module type
Parameter
Class
Class type

Build worker based runner.

type message_to_worker =

| Exit
| AckLock of bool
| RunTest of OUnitTest.path

val string_of_message_to_worker : message_to_worker -> string

type message_from_worker =

| AckExit
| Log of OUnitTest.log_event_t
| Lock of int
| Unlock of int
| TestDone of OUnitTest.result_full * OUnitTest.result_list

val string_of_message_from_worker : message_from_worker -> string

module MapPath : sig ... end

type map_test_cases =
  (OUnitTest.path * OUnitTest.test_length * (OUnitTest.ctxt -> unit)) MapPath.t

type ('a, 'b) channel = {

send_data : 'a -> unit;
receive_data : unit -> 'b;
close : unit -> unit;

}

type worker_channel = (message_from_worker, message_to_worker) channel

val wrap_channel : 
  string ->
  ('a -> string) ->
  ('b -> string) ->
  ('b, 'a) channel ->
  ('b, 'a) channel

val main_worker_loop : 
  yield:(unit -> 'a) ->
  shard_id:string ->
  worker_log_file:bool ->
  OUnitConf.conf ->
  worker_channel ->
  map_test_cases ->
  unit

type 'a worker = {

channel : (message_to_worker, message_from_worker) channel;
close_worker : unit -> string option;
select_fd : 'a;
shard_id : string;
is_running : unit -> bool;

}

type 'a worker_creator =
  shard_id:string ->
  master_id:string ->
  worker_log_file:bool ->
  OUnitConf.conf ->
  map_test_cases ->
  'a worker

type 'a workers_waiting_selector =
  timeout:float ->
  'a worker list ->
  'a worker list

val runner : 'a worker_creator -> 'a workers_waiting_selector -> runner