source: tests/concurrent/monitor.c @ 3180aa1

ADTaaron-thesisarm-ehast-experimentalcleanup-dtorsdeferred_resnenumforall-pointer-decayjacob/cs343-translationjenkins-sandboxnew-astnew-ast-unique-exprno_listpersistent-indexerpthread-emulationqualifiedEnum
Last change on this file since 3180aa1 was 73abe95, checked in by Thierry Delisle <tdelisle@…>, 6 years ago

Replace extension-less headers with .hfa

  • Property mode set to 100644
File size: 668 bytes
RevLine 
[73abe95]1#include <fstream.hfa>
2#include <kernel.hfa>
3#include <monitor.hfa>
4#include <thread.hfa>
[3bb51e1]5
[bcda04c]6monitor global_t {
[3bb51e1]7        int value;
8};
9
[242a902]10void ?{}(global_t & this) {
11        this.value = 0;
[3bb51e1]12}
13
14static global_t global;
15
[83a071f9]16void increment3( global_t & mutex this ) {
17        this.value += 1;
[ef42b143]18}
19
[83a071f9]20void increment2( global_t & mutex this ) {
[ef42b143]21        increment3( this );
22}
23
[83a071f9]24void increment( global_t & mutex this ) {
[ef42b143]25        increment2( this );
[3bb51e1]26}
27
[bd4d011]28thread MyThread {};
[3bb51e1]29
[83a071f9]30void main( MyThread & this ) {
[cb0e6de]31        for(int i = 0; i < 1_000_000; i++) {
[83a071f9]32                increment( global );
[3bb51e1]33        }
34}
35
36int main(int argc, char* argv[]) {
[bcda04c]37        assert( global.__mon.entry_queue.tail != NULL );
[3bb51e1]38        processor p;
39        {
[bd4d011]40                MyThread f[4];
[3bb51e1]41        }
42        sout | global.value | endl;
[242a902]43}
Note: See TracBrowser for help on using the repository browser.