From ebbfa70e87f01ac2072d92448cc9993bc6c1e167 Mon Sep 17 00:00:00 2001
From: John Benediktsson <mrjbq7@gmail.com>
Date: Wed, 5 Sep 2012 21:03:52 -0700
Subject: [PATCH] benchmark.sort: changing to not depend on benchmark.random.

---
 extra/benchmark/sort/sort.factor | 9 ++++-----
 1 file changed, 4 insertions(+), 5 deletions(-)

diff --git a/extra/benchmark/sort/sort.factor b/extra/benchmark/sort/sort.factor
index 983a9e86b1..4171bb7196 100644
--- a/extra/benchmark/sort/sort.factor
+++ b/extra/benchmark/sort/sort.factor
@@ -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