steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

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
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
extra/benchmark/continuations/continuations.factor
View File

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