source:
CIVL/examples/languageFeatures/atomicWait.cvl@
b2a2faa
| Last change on this file since b2a2faa was 3ff27cf, checked in by , 11 years ago | |
|---|---|
|
|
| File size: 371 bytes | |
| Rev | Line | |
|---|---|---|
| [36b5ada] | 1 | /* Commandline execution: |
| 2 | * civl verify -inputN=3 atomicWait.cvl | |
| 3 | * */ | |
| [e6b02c8] | 4 | #include <civlc.cvh> |
| [0baeebd] | 5 | $input int N = 3; |
| [2c448829] | 6 | int sum = 0; |
| 7 | ||
| 8 | void foo(int i){ | |
| [e6b02c8] | 9 | sum += i; |
| [2c448829] | 10 | } |
| 11 | ||
| 12 | void main(){ | |
| [e6b02c8] | 13 | $atomic{ |
| 14 | $proc ps[N]; | |
| 15 | for(int j = 1; j < N+1; j ++){ | |
| 16 | ps[j-1] = $spawn foo(j); | |
| 17 | } | |
| 18 | for(int j = 1; j < N+1; j ++){ | |
| 19 | $wait(ps[j-1]); | |
| 20 | } | |
| 21 | } | |
| [3ff27cf] | 22 | $assert((sum == N*(N+1)/2)); |
| [2c448829] | 23 | } |
Note:
See TracBrowser
for help on using the repository browser.
