mirror of
https://github.com/c-cube/moonpool.git
synced 2025-12-06 03:05:30 -05:00
revert previous delayed await
This commit is contained in:
parent
bb9418d86a
commit
213d9bdd19
1 changed files with 1 additions and 1 deletions
|
|
@ -84,7 +84,7 @@ let with_handler (type st arg) ~(ops : st ops) (self : st) :
|
||||||
(* when triggers is signaled, reschedule task *)
|
(* when triggers is signaled, reschedule task *)
|
||||||
if not (Picos.Fiber.try_suspend fiber trigger fiber k reschedule) then
|
if not (Picos.Fiber.try_suspend fiber trigger fiber k reschedule) then
|
||||||
(* trigger was already signaled, run task now *)
|
(* trigger was already signaled, run task now *)
|
||||||
reschedule trigger fiber k)
|
Picos.Fiber.resume fiber k)
|
||||||
| Picos.Computation.Cancel_after _r ->
|
| Picos.Computation.Cancel_after _r ->
|
||||||
Some
|
Some
|
||||||
(fun k ->
|
(fun k ->
|
||||||
|
|
|
||||||
Loading…
Add table
Reference in a new issue