Absolute_http (p.savvy.0.4.0.doc.savvy.json_uri.Json_uri.Absolute

type t

val of_uri : t -> (t, [ `Msg of string ]) result

val to_uri : t -> t

val of_string : string -> t

val to_string : ?pct_encoder:pct_encoder -> t -> string

val make : 
  scheme:[ `Http | `Https ] ->
  host:string ->
  ?userinfo:string ->
  ?port:int ->
  ?path:string ->
  ?query:(string * string list) list ->
  ?fragment:string ->
  unit ->
  t

val host : t -> string

val scheme : t -> [ `Http | `Https ]