Parameter Make.2-Ws

module IO : Cohttp.S.IO with type 'a t = 'a IO.t
type t
val create : ?⁠read_buf:Stdlib.Buffer.t -> ?⁠write_buf:Stdlib.Buffer.t -> mode:Websocket.Connection.mode -> Cohttp.Request.t -> IO.ic -> IO.oc -> t
val send : t -> Websocket.Frame.t -> unit IO.t
val send_multiple : t -> Websocket.Frame.t list -> unit IO.t
val recv : t -> Websocket.Frame.t IO.t
val req : t -> Cohttp.Request.t
val upgrade_connection : ?⁠read_buf:Stdlib.Buffer.t -> ?⁠write_buf:Stdlib.Buffer.t -> Cohttp.Request.t -> (t -> unit IO.t) -> [> `Expert of Cohttp.Response.t * (IO.ic -> IO.oc -> unit IO.t) ]