diff --git a/extra/benchmark/yield/yield.factor b/extra/benchmark/yield/yield.factor new file mode 100644 index 0000000000..51c5cddfcf --- /dev/null +++ b/extra/benchmark/yield/yield.factor @@ -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