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

rename a word

db4
Doug Coleman 2009-01-30 12:49:22 -06:00
parent fe886fc8f3
commit 4d15909fb7
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
extra/benchmark/knucleotide/knucleotide.factor
View File

@ -46,7 +46,7 @@ IN: benchmark.knucleotide
tuck length tuck length
small-groups H{ } tally small-groups H{ } tally
at [ 0 ] unless* at [ 0 ] unless*
number>string 8 CHAR: \s pad-right write ; number>string 8 CHAR: \s pad-tail write ;
: process-input ( input -- ) : process-input ( input -- )
dup 1 handle-table nl dup 1 handle-table nl