with-ansi ( quot -- )

Vocabulary

io.streams.ansi

Inputs

quot

an object

Outputs

None

Definition

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

IN: io.streams.ansi

: with-ansi ( quot -- )
    output-stream get <ansi> swap with-output-stream* ; inline