do-vocab-list ( assoc -- seq )

Vocabulary

fuel.help.private

Inputs

assoc

an object

Outputs

seq

an object

Definition

USING: arrays assocs kernel sequences ;

IN: fuel.help.private

: do-vocab-list ( assoc -- seq )
    [
        [ drop f ] [
            [ vocab-help-root-heading ] [ vocab-help-table ] bi*
            [ 2array ] [ drop f ] if*
        ] if-empty
    ] { } assoc>map sift ;