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

val typ : unit Ctypes_static.ptr Ctypes.typ

module Activity : sig ... end

module Callback : sig ... end

module Context : sig ... end

val create : 
  ( unit Ctypes_static.ptr option ->
    Activity.select ->
    bool ->
    int ->
    ( unit Ctypes_static.ptr -> Activity.t -> unit Ctypes_static.ptr -> unit ) ->
    unit Ctypes_static.ptr Ctypes_static.ptr option ->
    unit Ctypes_static.ptr F.return )
    F.result

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