benchmark.sort: changing to not depend on benchmark.random.

db4
John Benediktsson 2012-09-05 21:03:52 -07:00
parent 1a86af31f1
commit ebbfa70e87
1 changed files with 4 additions and 5 deletions
extra/benchmark/sort

View File

@ -1,10 +1,9 @@
USING: kernel sequences sorting benchmark.random math.parser
io.files io.encodings.ascii ;
USING: io.files io.encodings.ascii kernel math math.parser
random sequences sorting ;
IN: benchmark.sort
: sort-benchmark ( -- )
random-numbers-path
ascii file-lines [ string>number ] map
natural-sort drop ;
10 300000 200 random-integers
[ natural-sort drop ] curry times ;
MAIN: sort-benchmark