sig
type track = (string * string) list * string
type error =
Http of string
| Init of string
| Adjust of string * string
| Playlist
| Empty
exception Error of Lastfm.Radio.error
val string_of_error : Lastfm.Radio.error -> string
val get : string -> Lastfm.Radio.track list
val parse : string -> Lastfm.login option * (string * string option)
val init : Lastfm.login option -> string
val adjust : string -> string -> unit
val url : string -> string option -> string
val playlist : string -> string option -> string
val tracks : string -> string option -> Lastfm.Radio.track list
val clear : string -> unit
end