Module Timeout.Unix

val timeout : ('a -> 'b) -> 'a -> float -> (unit -> unit) -> 'b