sig
  type request = Get | Post of string
  exception Http of string
  val default_timeout : float Stdlib.ref
  val request :
    ?timeout:float ->
    ?headers:(string * string) list ->
    ?port:int ->
    host:string ->
    url:string -> request:Lastfm_generic.Http_t.request -> unit -> string
end