Websocket.Connection
type mode =
| Client of int -> string
| Server
module type S = sig ... end
module Make : functor (IO : Cohttp.S.IO) -> S with module IO = IO