From 3e02ba454e79233a6a5969843649a2541084ed62 Mon Sep 17 00:00:00 2001 From: Slava Pestov Date: Sun, 13 Sep 2009 00:54:04 -0500 Subject: [PATCH] benchmark.gc1: reduce memory usage --- extra/benchmark/gc1/gc1.factor | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/extra/benchmark/gc1/gc1.factor b/extra/benchmark/gc1/gc1.factor index 8b0a3e6a43..da3b6bab66 100644 --- 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