Module Io_intf.With_thread_id

type 'result t = {
  1. result : 'result;
  2. thread_id : int;
}
val thread_id : 'a t -> int
val result : 'a t -> 'a
module Fields : sig ... end
val create : result:'a -> thread_id:int -> 'a t