Cf.RunLoopmodule Mode : sig ... endmodule Observer : sig ... endmodule RunResult : sig ... endval typ : t Ctypes.typval remove_observer : t -> Observer.t -> Mode.t -> unitval add_observer : t -> Observer.t -> Mode.t -> unitval run_in_mode :
?return_after_source_handled:bool ->
?seconds:float ->
Mode.t ->
RunResult.tval get_current : unit -> tval stop : t -> unitval release : t -> unit