source: benchmark/ctxswitch/cfa_cor_then.cfa@ 9317419

ADT ast-experimental
Last change on this file since 9317419 was 2316525, checked in by Peter A. Buhr <pabuhr@…>, 6 years ago

update benchmarks for concurrency paper

  • Property mode set to 100644
File size: 427 bytes
Line 
1#include <kernel.hfa>
2#include <thread.hfa>
3
4#include "bench.h"
5
6void noOp(void) {}
7
8coroutine C {} c;
9
10void ?{}( C & this ) {
11 prime(this);
12}
13
14void main( __attribute__((unused)) C & this ) {
15 while () {
16 suspend_then(noOp);
17 }
18}
19
20int main( int argc, char * argv[] ) {
21 BENCH_START()
22 BENCH(
23 for ( times ) {
24 resume( c );
25 },
26 result
27 )
28 printf( "%g\n", result );
29}
30
31// Local Variables: //
32// tab-width: 4 //
33// End: //
Note: See TracBrowser for help on using the repository browser.