(find-imports) ( vector sequence-parser -- vector )

Vocabulary

lint.vocabs.private

Inputs

vector	an object
sequence-parser	an object

Outputs

vector

an object

Definition

USING: kernel sequences ;

IN: lint.vocabs.private

: (find-imports) ( vector sequence-parser -- vector )
    dup take-imports rot prepend swap
    [ (find-imports) ] ?keep-parsing-with ;