find-unused. ( name -- )

Vocabulary

lint.vocabs

Inputs

name	a vocab name string

Outputs

None

Word description

Finds unused imports in given vocab and outputs it to the current output-stream.

Examples

USING: lint.vocabs ; "lint.vocabs" find-unused.
No unused vocabs found in lint.vocabs.

Definition

USING: kernel lint.vocabs.private sequences ;

IN: lint.vocabs

: find-unused. ( name -- )
    dup find-unused dup empty?
    [ print-no-unused-vocabs ] [ print-unused-vocabs ] if ;