1 USING: math math.private kernel sequences ;
2 IN: benchmark.empty-loop-0
4 : empty-loop-0 ( n -- )
5 dup 0 fixnum< [ drop ] [ 1 fixnum-fast empty-loop-0 ] if ;
7 : empty-loop-0-benchmark ( -- )
8 50000000 empty-loop-0 ;
10 MAIN: empty-loop-0-benchmark