steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Move prettyprint:-> to prettyprint.private

db4
Slava Pestov 2008-01-24 19:20:07 -04:00
parent 42a710e965
commit 1249e3a720
2 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
core/prettyprint/prettyprint-docs.factor Normal file → Executable file
View File

@ -1,6 +1,6 @@
USING: prettyprint.backend prettyprint.config USING: prettyprint.backend prettyprint.config
prettyprint.sections help.markup help.syntax io kernel words prettyprint.sections prettyprint.private help.markup help.syntax
definitions quotations strings ; io kernel words definitions quotations strings ;
IN: prettyprint IN: prettyprint
ARTICLE: "prettyprint-numbers" "Prettyprinting numbers" ARTICLE: "prettyprint-numbers" "Prettyprinting numbers"

4
core/prettyprint/prettyprint.factor
View File

@ -86,14 +86,14 @@ combinators quotations ;
: .s ( -- ) datastack stack. ; : .s ( -- ) datastack stack. ;
: .r ( -- ) retainstack stack. ; : .r ( -- ) retainstack stack. ;
<PRIVATE
SYMBOL: -> SYMBOL: ->
\ -> \ ->
{ { foreground { 1 1 1 1 } } { background { 0 0 0 1 } } } { { foreground { 1 1 1 1 } } { background { 0 0 0 1 } } }
"word-style" set-word-prop "word-style" set-word-prop
<PRIVATE
! This code is ugly and could probably be simplified ! This code is ugly and could probably be simplified
: remove-step-into : remove-step-into
building get dup empty? [ building get dup empty? [