factor: trim using lists

[factor.git] / extra / benchmark / nsieve-bits / nsieve-bits.factor

diff --git a/extra/benchmark/nsieve-bits/nsieve-bits.factor b/extra/benchmark/nsieve-bits/nsieve-bits.factor
index 675718c8d89b2db486164be964bb4214686611a2..9d4069e6def9fff0e42e5940bcde97f59fa53ec1 100644 (file)
--- a/extra/benchmark/nsieve-bits/nsieve-bits.factor
+++ b/extra/benchmark/nsieve-bits/nsieve-bits.factor
@@ -1,5 +1,5 @@
 USING: math math.parser sequences sequences.private kernel
-bit-arrays make io math.ranges multiline fry locals ;
+bit-arrays make io ;
 IN: benchmark.nsieve-bits
 
 : clear-flags ( step i seq -- )
@@ -27,7 +27,7 @@ IN: benchmark.nsieve-bits
     print ; inline
 
 : nsieve-bits-main ( n -- )
-    [ 2^ 10000 * nsieve-bits. ] 
+    [ 2^ 10000 * nsieve-bits. ]
     [ 1 - 2^ 10000 * nsieve-bits. ]
     [ 2 - 2^ 10000 * nsieve-bits. ]
     tri ;