256colors. ( -- )

Vocabulary

io.streams.256color.private

Inputs

None

Outputs

None

Definition

USING: assocs formatting io kernel math sequences sorting ;

IN: io.streams.256color.private

: 256colors. ( -- )
    256colors sort-values [
        dup dup "\e[1;38;5;%sm%3s:\e[0m " printf dup rot first3
        "\e[38;5;%sm#%02x%02x%02x\e[0m " printf 6 mod 3 =
        [ nl ] when
    ] assoc-each ;