source: benchmark/ctxswitch/cfa_thrd2.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: 395 bytes
Line 
1#include <thread.hfa>
2
3#include "bench.h"
4
5volatile bool done = false;
6
7thread Fibre {};
8
9void main(__attribute__((unused)) Fibre & this) {
10 while ( ! done ) {
11 yield();
12 }
13}
14
15int main( int argc, char * argv[] ) {
16 BENCH_START()
17 Fibre f1;
18 BENCH(
19 for ( times ) {
20 yield();
21 },
22 result
23 )
24 printf( "%g\n", result );
25 done = true;
26}
27
28// Local Variables: //
29// tab-width: 4 //
30// End: //
Note: See TracBrowser for help on using the repository browser.