Module Timeout


module Timeout: sig .. end

val init : float -> unit
val timeout : float -> 'a -> 'a Event.event