benchmark.yield: testing lots of yields.
parent
04dd210b37
commit
a61ea18ad7
|
@ -0,0 +1,9 @@
|
||||||
|
! Copyright (C) 2012 John Benediktsson
|
||||||
|
! See http://factorcode.org/license.txt for BSD license.
|
||||||
|
USING: math threads ;
|
||||||
|
IN: benchmark.yield
|
||||||
|
|
||||||
|
: yield-benchmark ( -- )
|
||||||
|
100,000 [ yield ] times ;
|
||||||
|
|
||||||
|
MAIN: yield-benchmark
|
Loading…
Reference in New Issue