USING: math kernel continuations ;
IN: benchmark.continuations
: continuations-main ( -- )
100000 [ drop [ continue ] callcc0 ] each-integer ;
MAIN: continuations-main