8 lines
167 B
Factor
8 lines
167 B
Factor
|
USING: math kernel continuations ;
|
||
|
|
IN: benchmark.continuations
|
||
|
|
|
||
|
|
: continuations-main
|
||
|
|
100000 [ drop [ continue ] callcc0 ] each-integer ;
|
||
|
|
|
||
|
|
MAIN: continuations-main
|