S (websocket.Websocket.S)

module IO : Cohttp.S.IO

type mode =

| Client of int -> string
| Server

val make_read_frame : 
  ?buf:Stdlib.Buffer.t ->
  mode:mode ->
  IO.ic ->
  IO.oc ->
  unit ->
  Frame.t IO.t

val write_frame_to_buf : mode:mode -> Stdlib.Buffer.t -> Frame.t -> unit

module Request : 
  Cohttp.S.Http_io
    with type t = Cohttp.Request.t
     and type 'a IO.t = 'a IO.t
     and type IO.ic = IO.ic
     and type IO.oc = IO.oc

module Response : 
  Cohttp.S.Http_io
    with type t = Cohttp.Response.t
     and type 'a IO.t = 'a IO.t
     and type IO.ic = IO.ic
     and type IO.oc = IO.oc

module Connected_client : sig ... end