map-words ( string quot -- sequence )
Coverage tool

Prev:

each-word ( string quot -- )

Vocabulary
tools.coverage

Inputs

string	a string
quot	a quotation

Outputs

sequence

a sequence

Word description
Calls a quotation on every word in the vocabulary and its private vocabulary, if there is one, and collects the results.

Definition

USING: kernel sequences tools.coverage.private ;

IN: tools.coverage

: map-words ( string quot -- sequence )
    over ".private" tail?
    [ [ coverage-words ] dip map ] [
        [ [ private-vocab-name coverage-words ] dip map ]
        [ [ coverage-words ] dip map ] 2bi append
    ] if ; inline