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

Update strings.tables for Doug's renamings

db4
Slava Pestov 2009-01-30 03:37:01 -06:00
parent 990c99a97e
commit 612e84d34d
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
basis/strings/tables/tables.factor
View File

@ -8,7 +8,7 @@ IN: strings.tables
: format-column ( seq ? -- seq ) : format-column ( seq ? -- seq )
[ [
dup [ length ] map supremum dup [ length ] map supremum
'[ _ CHAR: \s pad-right ] map '[ _ CHAR: \s pad-tail ] map
] unless ; ] unless ;
: map-last ( seq quot -- seq ) : map-last ( seq quot -- seq )