Module FutureSource

Sourcemodule UUID : sig ... end
Sourcemodule UUIDMap : Map.S with type key = UUID.t
Sourcemodule UUIDSet : Set.S with type elt = UUID.t
Sourceexception NotReady of string
Sourcetype 'a computation
Sourcetype 'a value = [
  1. | `Val of 'a
  2. | `Exn of Exninfo.iexn
]
Sourcetype fix_exn = Stateid.exn_info option
Sourceval create : fix_exn:fix_exn -> (unit -> 'a) -> 'a computation
Sourceval from_val : 'a -> 'a computation
Sourcetype 'a assignment = [
  1. | `Val of 'a
  2. | `Exn of Exninfo.iexn
  3. | `Comp of unit -> 'a
]
Sourceval create_delegate : ?blocking:bool -> name:string -> fix_exn -> 'a computation * ('a assignment -> unit)
Sourceval replace : 'a computation -> 'a computation -> unit
Sourceval is_over : 'a computation -> bool
Sourceval is_exn : 'a computation -> bool
Sourceval peek_val : 'a computation -> 'a option
Sourceval uuid : 'a computation -> UUID.t
Sourceval chain : 'a computation -> ('a -> 'b) -> 'b computation
Sourceval force : 'a computation -> 'a
Sourceval compute : 'a computation -> 'a value
Sourceval print : ('a -> Pp.t) -> 'a computation -> Pp.t

Debug: print a computation given an inner printing function.