benchmark.gc1: reduce memory usage

2009-09-13 00:54:04 -05:00 · 2009-09-13 00:54:04 -05:00 · 3e02ba454e
parent 3a4ac18fac
commit 3e02ba454e
1 changed files with 1 additions and 1 deletions
--- a/extra/benchmark/gc1/gc1.factor
+++ b/extra/benchmark/gc1/gc1.factor
@ -3,6 +3,6 @@
 USING: math sequences kernel ;
 IN: benchmark.gc1

-: gc1 ( -- ) 6000000 [ >bignum 1 + ] map drop ;
+: gc1 ( -- ) 10 [ 600000 [ >bignum 1 + ] map drop ] times ;

 MAIN: gc1