pair-coverage. ( word seq -- )

Vocabulary

tools.coverage

Inputs

word	an object
seq	an object

Outputs

None

Definition

USING: accessors io kernel prettyprint sequences ;

IN: tools.coverage

: pair-coverage. ( word seq -- )
    [ drop ] [
        [ name>> ":" append print ] [ [ "    " write . ] each ]
        bi*
    ] if-empty ;