benchmark.continuations: more continuations.

John Benediktsson 2012-09-14 14:59:17 -07:00
parent 6e4b947bbb
commit 940279cc75
1 changed files with 1 additions and 1 deletions

View File

@ -2,6 +2,6 @@ USING: math kernel continuations ;
IN: benchmark.continuations
: continuations-benchmark ( -- )
100000 [ drop [ continue ] callcc0 ] each-integer ;
1,000,000 [ drop [ continue ] callcc0 ] each-integer ;
MAIN: continuations-benchmark