| 
            Last change
 on this file since 85a3806 was             c26bea2a, checked in by Peter A. Buhr <pabuhr@…>, 2 years ago           | 
        
        
          | 
             
first attempt at renaming directory tests/concurrent to tests/concurrency to harmonize with other concurrency directory names 
 
           | 
        
        
          
            
              - 
Property                 mode
 set to                 
100644
               
             
           | 
        
        
          | 
            File size:
            659 bytes
           | 
        
      
      
| Line |   | 
|---|
| 1 | #include <fstream.hfa>
 | 
|---|
| 2 | #include <kernel.hfa>
 | 
|---|
| 3 | #include <monitor.hfa>
 | 
|---|
| 4 | #include <thread.hfa>
 | 
|---|
| 5 | 
 | 
|---|
| 6 | monitor global_t {
 | 
|---|
| 7 |         int value;
 | 
|---|
| 8 | };
 | 
|---|
| 9 | 
 | 
|---|
| 10 | void ?{}(global_t & this) {
 | 
|---|
| 11 |         this.value = 0;
 | 
|---|
| 12 | }
 | 
|---|
| 13 | 
 | 
|---|
| 14 | static global_t global;
 | 
|---|
| 15 | 
 | 
|---|
| 16 | void increment3( global_t & mutex this ) {
 | 
|---|
| 17 |         this.value += 1;
 | 
|---|
| 18 | }
 | 
|---|
| 19 | 
 | 
|---|
| 20 | void increment2( global_t & mutex this ) {
 | 
|---|
| 21 |         increment3( this );
 | 
|---|
| 22 | }
 | 
|---|
| 23 | 
 | 
|---|
| 24 | void increment( global_t & mutex this ) {
 | 
|---|
| 25 |         increment2( this );
 | 
|---|
| 26 | }
 | 
|---|
| 27 | 
 | 
|---|
| 28 | thread MyThread {};
 | 
|---|
| 29 | 
 | 
|---|
| 30 | void main( MyThread & this ) {
 | 
|---|
| 31 |         for(int i = 0; i < 750_000; i++) {
 | 
|---|
| 32 |                 increment( global );
 | 
|---|
| 33 |         }
 | 
|---|
| 34 | }
 | 
|---|
| 35 | 
 | 
|---|
| 36 | int main(int argc, char* argv[]) {
 | 
|---|
| 37 |         assert( global.__mon.entry_queue.tail != NULL );
 | 
|---|
| 38 |         processor p;
 | 
|---|
| 39 |         {
 | 
|---|
| 40 |                 MyThread f[4];
 | 
|---|
| 41 |         }
 | 
|---|
| 42 |         sout | global.value;
 | 
|---|
| 43 | }
 | 
|---|
       
      
  Note:
 See   
TracBrowser
 for help on using the repository browser.