source: benchmark/ctxswitch/cfa_thrd2.cfa @ 4db0140

Last change on this file since 4db0140 was 2316525, checked in by Peter A. Buhr <pabuhr@…>, 5 years ago

update benchmarks for concurrency paper

  • Property mode set to 100644
File size: 395 bytes
RevLine 
[73abe95]1#include <thread.hfa>
[6810fcb]2
3#include "bench.h"
4
5volatile bool done = false;
6
7thread Fibre {};
8
[ffe2fad]9void main(__attribute__((unused)) Fibre & this) {
[2316525]10        while ( ! done ) {
[6810fcb]11                yield();
12        }
13}
14
[b4107c8]15int main( int argc, char * argv[] ) {
16        BENCH_START()
[6810fcb]17        Fibre f1;
18        BENCH(
[2316525]19                for ( times ) {
[6810fcb]20                        yield();
21                },
22                result
23        )
[b4107c8]24        printf( "%g\n", result );
[6810fcb]25        done = true;
[dc33b5b]26}
[b4107c8]27
28// Local Variables: //
29// tab-width: 4 //
30// End: //
Note: See TracBrowser for help on using the repository browser.