sig
val sleep : float -> unit Lwt.t
val yield : unit -> unit Lwt.t
val run : 'a Lwt.t -> 'a
val http_get : string -> (string * string) list -> (int * string) Lwt.t
val http_post : string -> (string * string) list -> (int * string) Lwt.t
val http_get_post :
string ->
(string * string) list -> (string * string) list -> (int * string) Lwt.t
val http_post_with_content_type :
string -> string -> (string * string) list -> (int * string) Lwt.t
val register_event : JSOO.obj -> string -> ('a -> unit Lwt.t) -> 'a -> unit
end