sig
  module Helper_thread :
    sig
      type t
      val create :
        ?name:string -> unit -> In_thread.Helper_thread.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:In_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