map-github-pages-json ( base-url params param-string -- jsonlines )

Vocabulary

github

Inputs

base-url	an object
params	an object
param-string	an object

Outputs

jsonlines

an object

Definition

USING: formatting kernel math sequences ;

IN: github

: map-github-pages-json
    ( base-url params param-string -- jsonlines )
    [ 0 [ dup ] ] 3dip '[
        1 + _ _ pick suffix _ vsprintf append
        github-get-json dup empty? [ 2drop f f ] when
    ] produce nip concat ; inline