take-imports ( sequence-parser -- vector )

Vocabulary

lint.vocabs.private

Inputs

sequence-parser

an object

Outputs

vector

an object

Definition

USING: combinators kernel sequences.parser ;

IN: lint.vocabs.private

: take-imports ( sequence-parser -- vector )
    dup consume {
        { "USING:" [ ";" take-until-object ] }
        { "USE:" [ 1 take-n ] }
        [ 2drop f ]
    } case ;