Module Async_unix__.Syscall
module Syscall_result = Core.Unix.Syscall_result
val syscall : (unit -> 'a) -> ('a, exn) Core.Result.t
syscall f
repeatedly calls f
until it returns or raises an exception that isn't Unix_error (EINTR, _, _)
.
val syscall_result : 'a -> ('a -> 'b Syscall_result.t) -> 'b Syscall_result.t
syscall_result a f
repeatedly calls f a
until it returns a result that is not Syscall_result.create_error EINTR
.
val syscall_result2 : 'a -> 'b -> ('a -> 'b -> 'c Syscall_result.t) -> 'c Syscall_result.t