sequences: more use of minimum/maximum

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

diff --git a/extra/benchmark/benchmark.factor b/extra/benchmark/benchmark.factor
index 36c10f35ca1e45c447f0ab1cbee02fcf6f6ba44e..9fdce4715f8dde3cfaee54f8187c94719e3fde04 100644 (file)
--- a/extra/benchmark/benchmark.factor
+++ b/extra/benchmark/benchmark.factor
@@ -9,7 +9,7 @@ IN: benchmark
 SYMBOL: benchmarks-disabled?
 
 : run-timing-benchmark ( vocab -- time )
-    5 swap '[ gc [ _ run ] benchmark ] replicate infimum ;
+    5 swap '[ gc [ _ run ] benchmark ] replicate minimum ;
 
 : run-profile-benchmark ( vocab -- profile )
     compact-gc '[ _ run ] profile most-recent-profile-data ;