]> gitweb.factorcode.org Git - factor.git/blobdiff - extra/benchmark/empty-loop-1/empty-loop-1.factor
factor: trim using lists
[factor.git] / extra / benchmark / empty-loop-1 / empty-loop-1.factor
index 16303b4b4d5ce44041677d034a57d84c6f546673..a719f119c9c25ccf1bc64ac83db8805e1f5a60c4 100644 (file)
@@ -1,10 +1,10 @@
-USING: math math.private kernel sequences ;
+USING: math kernel ;
 IN: benchmark.empty-loop-1
 
 : empty-loop-1 ( n -- )
     [ drop ] each-integer ;
 
-: empty-loop-main ( -- )
+: empty-loop-1-benchmark ( -- )
     50000000 empty-loop-1 ;
 
-MAIN: empty-loop-main
+MAIN: empty-loop-1-benchmark