prettyprint: use color constants for -> word-prop.
parent
265f19e952
commit
7b46b0e39a
|
@ -1,12 +1,10 @@
|
||||||
! Copyright (C) 2003, 2010 Slava Pestov.
|
! Copyright (C) 2003, 2010 Slava Pestov.
|
||||||
! See http://factorcode.org/license.txt for BSD license.
|
! See http://factorcode.org/license.txt for BSD license.
|
||||||
USING: arrays accessors assocs classes colors combinators
|
USING: accessors arrays classes colors.constants combinators
|
||||||
continuations grouping io io.streams.string io.styles kernel
|
continuations generic grouping io io.streams.string io.styles
|
||||||
make math math.parser namespaces parser prettyprint.backend
|
kernel make math math.parser namespaces prettyprint.config
|
||||||
prettyprint.config prettyprint.custom prettyprint.sections
|
prettyprint.custom prettyprint.sections sequences strings
|
||||||
quotations sequences sorting strings vocabs vocabs.prettyprint
|
vocabs.prettyprint words ;
|
||||||
words sets generic ;
|
|
||||||
FROM: namespaces => set ;
|
|
||||||
IN: prettyprint
|
IN: prettyprint
|
||||||
|
|
||||||
: with-use ( obj quot -- )
|
: with-use ( obj quot -- )
|
||||||
|
@ -59,7 +57,7 @@ IN: prettyprint
|
||||||
SYMBOL: ->
|
SYMBOL: ->
|
||||||
|
|
||||||
\ ->
|
\ ->
|
||||||
{ { foreground T{ rgba f 1 1 1 1 } } { background T{ rgba f 0 0 0 1 } } }
|
{ { foreground COLOR: white } { background COLOR: black } }
|
||||||
"word-style" set-word-prop
|
"word-style" set-word-prop
|
||||||
|
|
||||||
: remove-step-into ( word -- )
|
: remove-step-into ( word -- )
|
||||||
|
|
Loading…
Reference in New Issue