path: root/portal/lib/portal.mli

open Markup

type t = async parser * (signal option -> unit)

val stanza_open : ?from:string -> string -> (signal, sync) stream

val stanza_close : (signal, sync) stream

val connect : string -> t Lwt.t