Re: [Factor-talk] context switch benchmarking

[Chris D. <chr...@do...>]

If all you want to test is coroutines, rather than the message passing
aspects of concurrency, you can use libs/coroutines:

"libs/coroutines" require
USE: coroutines
: gen ( -- co ) [ 100000 [ over coyield 2drop ] each f swap coyield ] cocreate ;
: run ( co -- ) f swap coresume [ run ] [ drop ] if ;

[ gen run ] time

This is the equivalent of the Python sample you posted. Unfortunately
continuations don't compile so the test runs interpreted.

Chris.
-- 
http://www.bluishcoder.co.nz