Add benchmark.gc1

2009-04-24 00:12:23 -05:00 · 2009-04-24 00:12:23 -05:00 · 00b6107d3b
parent 04c6e8fcf8
commit 00b6107d3b
2 changed files with 9 additions and 0 deletions
--- a/extra/benchmark/gc1/authors.txt
+++ b/extra/benchmark/gc1/authors.txt
@ -0,0 +1 @@
 Slava Pestov
--- a/extra/benchmark/gc1/gc1.factor
+++ b/extra/benchmark/gc1/gc1.factor
@ -0,0 +1,8 @@
 ! Copyright (C) 2009 Slava Pestov.
 ! See http://factorcode.org/license.txt for BSD license.
 USING: math sequences kernel ;
 IN: benchmark.gc1
 : gc1 ( -- ) 6000000 [ >bignum 1+ ] map drop ;
 MAIN: gc1