simon/moonpool
1
0
Fork 0
mirror of https://github.com/c-cube/moonpool.git synced 2025-12-14 14:56:17 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

detail in fut

Browse source
This commit is contained in:
Simon Cruanes 2024-08-27 15:03:40 -04:00
parent b9c3e1fc7e
commit 2780b156eb
No known key found for this signature in database
GPG key ID: EBFFF6F283F3A2B4
2 changed files with 3 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
src/core/fut.ml
View file

@ -442,4 +442,5 @@ module Infix_local = Infix [@@deprecated "use Infix"]
module Private_ = struct module Private_ = struct
let[@inline] unsafe_promise_of_fut x = x let[@inline] unsafe_promise_of_fut x = x
let[@inline] as_computation self = self.st
end end

2
src/core/fut.mli
View file

@ -285,6 +285,8 @@ module Infix_local = Infix
module Private_ : sig module Private_ : sig
val unsafe_promise_of_fut : 'a t -> 'a promise val unsafe_promise_of_fut : 'a t -> 'a promise
(** please do not use *) (** please do not use *)
val as_computation : 'a t -> 'a Picos.Computation.t
end end
(**/**) (**/**)