source: benchmark/schedint/cfa4.cfa @ dc33b5b

ADTarm-ehast-experimentalenumforall-pointer-decayjacob/cs343-translationjenkins-sandboxnew-astnew-ast-unique-exprpthread-emulationqualifiedEnum
Last change on this file since dc33b5b was dc33b5b, checked in by Peter A. Buhr <pabuhr@…>, 5 years ago

update benchmarks and add benchmarks for qthreads

  • Property mode set to 100644
File size: 776 bytes
RevLine 
[73abe95]1#include <kernel.hfa>
2#include <monitor.hfa>
3#include <thread.hfa>
[9f0b975]4#include <stdio.h>
5
6#include "bench.h"
7
8int argc;
9char** argv;
10volatile int go = 0;
11
12condition c;
13monitor M {};
14M m1, m2, m3, m4;
15
16void __attribute__((noinline)) call( M & mutex a1, M & mutex a2, M & mutex a3, M & mutex a4 ) {
[4cedd9f]17        signal(c);
[9f0b975]18}
19
20int  __attribute__((noinline)) wait( M & mutex a1, M & mutex a2, M & mutex a3, M & mutex a4 ) {
21        go = 1;
22        BENCH(
[dc33b5b]23                for ( i; n ) {
[4cedd9f]24                        wait(c);
[9f0b975]25                },
26                result
27        )
28
[dc33b5b]29        printf("%g\n", result);
[9f0b975]30        go = 0;
31        return 0;
32}
33
34thread T {};
35void ^?{}( T & mutex this ) {}
[dc33b5b]36void main( T & ) {
[9f0b975]37        while(go == 0) { yield(); }
38        while(go == 1) { call(m1, m2, m3, m4); }
39
40}
41
[dc33b5b]42int main(__attribute__((unused)) int argc, __attribute__((unused)) char* argv[]) {
[9f0b975]43        T t;
44        return wait(m1, m2, m3, m4);
[dc33b5b]45}
Note: See TracBrowser for help on using the repository browser.