module Http_client_conncache:sig..end
type channel_binding_id = int 
Http_client.channel_binding_id type conn_state = [ `Active of < > | `Inactive of channel_binding_id ] 
`Inactive, i.e. it is not used
 by any pipeline, or `Active obj, i.e. it is in use by the pipeline
 obj (this is the Http_client.pipeline coerced to < >).
 Since Ocamlnet-3.3, `Inactive connections carry the channel binding
 ID as argument.
type peer = [ `Direct of string * int
 | `Http_proxy of string * int
 | `Http_proxy_connect of (string * int) * (string * int)
 | `Socks5 of (string * int) * (string * int) ] 
class type connection_cache =object..end
class restrictive_cache :unit ->connection_cache
class aggressive_cache :unit ->connection_cache