benchmark.continuations: more continuations.
parent
52fab586be
commit
a206daacde
|
@ -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
|
||||
|
|
Loading…
Reference in New Issue