CFRunLoop (cf.Cf.Bindings.C.CFRunLoop)

module Mode : sig ... end

module Observer : sig ... end

module RunResult : sig ... end

val typ : unit Ctypes_static.ptr Ctypes.typ

val add_observer : 
  ( unit Ctypes_static.ptr ->
    unit Ctypes_static.ptr ->
    unit Ctypes_static.ptr ->
    unit F.return )
    F.result

val remove_observer : 
  ( unit Ctypes_static.ptr ->
    unit Ctypes_static.ptr ->
    unit Ctypes_static.ptr ->
    unit F.return )
    F.result

val get_current : ( unit -> unit Ctypes_static.ptr F.return ) F.result

val run : ( unit -> unit F.return ) F.result

val run_in_mode : 
  ( unit Ctypes_static.ptr -> float -> bool -> RunResult.t F.return ) F.result

val stop : ( unit Ctypes_static.ptr -> unit F.return ) F.result