factor: trim using lists

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

diff --git a/extra/benchmark/fib2/fib2.factor b/extra/benchmark/fib2/fib2.factor
index bedfedf6b0f450d12f1bbf29526f8aa9d9a0ed49..5f4e6b7b43a0370fcd203f4599874da63be0df39 100644 (file)
--- a/extra/benchmark/fib2/fib2.factor
+++ b/extra/benchmark/fib2/fib2.factor
@@ -1,4 +1,4 @@
-USING: math.private kernel debugger ;
+USING: math.private kernel ;
 IN: benchmark.fib2
 
 : fixnum-fib ( m -- n )
@@ -8,6 +8,6 @@ IN: benchmark.fib2
         1 fixnum- dup fixnum-fib swap 1 fixnum- fixnum-fib fixnum+
     ] if ;
 
-: fib-main 34 fixnum-fib 9227465 assert= ;
+: fib2-benchmark ( -- ) 34 fixnum-fib 9227465 assert= ;
 
-MAIN: fib-main
+MAIN: fib2-benchmark