Webs_bazaar.WebsocketWebsocket upgrade logic.
References.
val upgradable : Webs.Http.Headers.t -> boolupgradable hs is true iff hs has a header Webs.Http.Headers.connection with an "upgrade" value and a header Webs.Http.Headers.upgrade with a "websocket" value.
val upgrade :
Webs.Http.Request.t ->
(Webs.Http.Response.t, Webs.Http.Response.t) Stdlib.resultupgrade responds to upgrade the request to a websocket
val sec_websocket_accept : Webs.Http.Headers.Name.tval sec_websocket_extensions : Webs.Http.Headers.Name.tval sec_websocket_key : Webs.Http.Headers.Name.tval sec_websocket_protocol : Webs.Http.Headers.Name.tval sec_websocket_version : Webs.Http.Headers.Name.t