factor: trim using lists

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

diff --git a/extra/benchmark/fib3/fib3.factor b/extra/benchmark/fib3/fib3.factor
index c2b86f6bfaae102641bc96b98d9b9cc329e909d2..06b3207442e1476ce09297a0bdd3f0cdc7c3f3a5 100644 (file)
--- a/extra/benchmark/fib3/fib3.factor
+++ b/extra/benchmark/fib3/fib3.factor
@@ -1,9 +1,9 @@
-USING: math kernel debugger ;
+USING: math kernel ;
 IN: benchmark.fib3
 
 : fib ( m -- n )
     dup 1 <= [ drop 1 ] [ dup 1 - fib swap 2 - fib + ] if ;
 
-: fib-main 34 fib 9227465 assert= ;
+: fib3-benchmark ( -- ) 34 fib 9227465 assert= ;
 
-MAIN: fib-main
+MAIN: fib3-benchmark