(with-ansi) ( quot use-dim -- )

Vocabulary

io.streams.ansi

Inputs

quot	an object
use-dim	an object

Outputs

None

Definition

USING: io io.streams.ansi.private kernel namespaces ;

IN: io.streams.ansi

: (with-ansi) ( quot use-dim -- )
    [ output-stream get ] dip fg-colors bg-colors <ansi>
    swap with-output-stream* ; inline