sig
module Helper_thread :
sig
type t = In_thread.Helper_thread.t
val create : ?name:string -> unit -> t Core.Std.Or_error.t
end
val pipe_of_squeue : 'a Core.Std.Squeue.t -> 'a Async_core.Pipe.Reader.t
val run :
?thread:Helper_thread.t ->
?name:string -> (unit -> 'a) -> 'a Async_core.Deferred.t
val syscall :
name:string ->
(unit -> 'a) -> ('a, exn) Core.Std.Result.t Async_core.Deferred.t
val syscall_exn : name:string -> (unit -> 'a) -> 'a Async_core.Deferred.t
val ounit_tests : unit -> OUnit.test
end