sig
  val make_string_uri :
    ?absolute:bool ->
    ?absolute_path:bool ->
    ?https:bool ->
    service:('a, unit, [< Eliom_service.get_service_kind ],
             [< Eliom_service.suff ], 'b, unit,
             [< Eliom_service.registrable ], 'c)
            Eliom_service.service ->
    ?hostname:string ->
    ?port:int ->
    ?fragment:string ->
    ?keep_nl_params:[ `All | `None | `Persistent ] ->
    ?nl_params:Eliom_parameter.nl_params_set -> '-> string
  val make_uri_components :
    ?absolute:bool ->
    ?absolute_path:bool ->
    ?https:bool ->
    service:('a, unit, [< Eliom_service.get_service_kind ],
             [< Eliom_service.suff ], 'b, unit,
             [< Eliom_service.registrable ], 'c)
            Eliom_service.service ->
    ?hostname:string ->
    ?port:int ->
    ?fragment:string ->
    ?keep_nl_params:[ `All | `None | `Persistent ] ->
    ?nl_params:Eliom_parameter.nl_params_set ->
    '-> string * (string * string) list * string option
  val make_post_uri_components :
    ?absolute:bool ->
    ?absolute_path:bool ->
    ?https:bool ->
    service:('a, 'b, [< Eliom_service.post_service_kind ],
             [< Eliom_service.suff ], 'c, 'd, [< Eliom_service.registrable ],
             'e)
            Eliom_service.service ->
    ?hostname:string ->
    ?port:int ->
    ?fragment:string ->
    ?keep_nl_params:[ `All | `None | `Persistent ] ->
    ?nl_params:Eliom_parameter.nl_params_set ->
    ?keep_get_na_params:bool ->
    '->
    '->
    string * (string * string) list * string option * (string * string) list
  val make_string_uri_from_components :
    string * (string * string) list * string option -> string
  val reconstruct_relative_url_path :
    string list -> string list -> string list
  val make_string_uri_ :
    ?absolute:bool ->
    ?absolute_path:bool ->
    ?https:bool ->
    service:('a, 'b,
             [< `Attached of
                  (Eliom_service.attached_service_kind,
                   [< Eliom_service.getpost ])
                  Eliom_service.a_s
              | `Nonattached of [< Eliom_service.getpost ] Eliom_service.na_s ],
             [< Eliom_service.suff ], 'c, 'd, [< Eliom_service.registrable ],
             'e)
            Eliom_service.service ->
    ?hostname:string ->
    ?port:int ->
    ?fragment:string ->
    ?keep_nl_params:[ `All | `None | `Persistent ] ->
    ?nl_params:Eliom_parameter.nl_params_set -> '-> string
  val make_post_uri_components__ :
    ?absolute:bool ->
    ?absolute_path:bool ->
    ?https:bool ->
    service:('a, 'b,
             [< `Attached of ([> `External ], 'c) Eliom_service.a_s
              | `Nonattached of 'Eliom_service.na_s ],
             [< Eliom_service.suff ], 'e, 'f, [< Eliom_service.registrable ],
             'g)
            Eliom_service.service ->
    ?hostname:string ->
    ?port:int ->
    ?fragment:string ->
    ?keep_nl_params:'->
    ?nl_params:Eliom_parameter.nl_params_set ->
    ?keep_get_na_params:bool ->
    '->
    '->
    string * (string * string) list * string option * (string * string) list
  val make_uri_components_ :
    ?absolute:bool ->
    ?absolute_path:bool ->
    ?https:bool ->
    service:('a, 'b,
             [< `Attached of ([> `External ], 'c) Eliom_service.a_s
              | `Nonattached of 'Eliom_service.na_s ],
             [< Eliom_service.suff ], 'e, 'f, [< Eliom_service.registrable ],
             'g)
            Eliom_service.service ->
    ?hostname:string ->
    ?port:int ->
    ?fragment:string ->
    ?keep_nl_params:[ `All | `None | `Persistent ] ->
    ?nl_params:Eliom_parameter.nl_params_set ->
    unit -> string * (string * string) list * string option
  val make_post_uri_components_ :
    ?absolute:bool ->
    ?absolute_path:bool ->
    ?https:bool ->
    service:('a, 'b,
             [< `Attached of ([> `External ], 'c) Eliom_service.a_s
              | `Nonattached of 'Eliom_service.na_s ],
             [< Eliom_service.suff ], 'e, 'f, [< Eliom_service.registrable ],
             'g)
            Eliom_service.service ->
    ?hostname:string ->
    ?port:int ->
    ?fragment:string ->
    ?keep_nl_params:'->
    ?nl_params:Eliom_parameter.nl_params_set ->
    ?keep_nl_params:[ `All | `None | `Persistent ] ->
    ?keep_get_na_params:bool ->
    '->
    unit ->
    string * (string * string) list * string option * (string * string) list
  val make_actual_path : string list -> string list
  val make_proto_prefix : ?hostname:string -> ?port:int -> bool -> string
  val make_cookies_info :
    bool option *
    ('a, 'b,
     [< `Attached of ([> `External ], 'c) Eliom_service.a_s
      | `Nonattached of 'd ],
     [< Eliom_service.suff ], 'e, 'f, [< Eliom_service.registrable ], 'g)
    Eliom_service.service -> (bool * Eliom_lib.Url.path) option
end