top-100-apple-podcasts ( code/f -- json )

Vocabulary

itunes

Inputs

code/f

an object

Outputs

json

an object

Definition

USING: hashtables kernel sequences ;

IN: itunes

: top-100-apple-podcasts ( code/f -- json )
    "US" or [ [ "code" ] ] dip [ ] curry compose { } like
    [ [ { "limit" "100" } ] ] dip
    [ { "explicit" "true" } { "genre" "26" } ] curry compose
    { } like parse-hashtable >top-apple-podcasts ;