highlight-tokens ( tokens -- )

Vocabulary

xmode.highlight

Inputs

tokens

a sequence

Outputs

None

Word description

Highlight a sequence of token objects.

Definition

USING: accessors assocs io io.styles kernel sequences
xmode.highlight.private ;

IN: xmode.highlight

: highlight-tokens ( tokens -- )
    [
        [ str>> ] [ id>> ] bi
        [ name>> STYLES at BASE assoc-union ] [ BASE ] if*
        format
    ] each nl ;