Rename and add sorting words

[factor.git] / extra / benchmark / sort / sort.factor

diff --git a/extra/benchmark/sort/sort.factor b/extra/benchmark/sort/sort.factor
index 70744c13de72f4a53b014a8a08ab7b3c0988fea7..9221f0ec28e44427d0a3b0ee3e221a6c535729f0 100644 (file)
--- a/extra/benchmark/sort/sort.factor
+++ b/extra/benchmark/sort/sort.factor
@@ -5,7 +5,7 @@ CONSTANT: numbers-to-sort $[ 300,000 200 random-integers ]
 CONSTANT: alist-to-sort $[ 1,000 <iota> dup zip ]
 
 : sort-benchmark ( -- )
-    10 [ numbers-to-sort natural-sort drop ] times
+    10 [ numbers-to-sort sort drop ] times
     5,000 [ alist-to-sort sort-keys drop ] times ;
 
 MAIN: sort-benchmark