source:
CIVL/examples/languageFeatures/atomicWait.cvl@
b231753
| Last change on this file since b231753 was a82987f, checked in by , 12 years ago | |
|---|---|
|
|
| File size: 343 bytes | |
| Rev | Line | |
|---|---|---|
| [36b5ada] | 1 | /* Commandline execution: |
| 2 | * civl verify -inputN=3 atomicWait.cvl | |
| 3 | * */ | |
| [2c448829] | 4 | #include <civlc.h> |
| 5 | $input int N; | |
| 6 | int sum = 0; | |
| 7 | ||
| 8 | void foo(int i){ | |
| 9 | sum += i; | |
| 10 | } | |
| 11 | ||
| 12 | void main(){ | |
| 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 ++){ | |
| [a82987f] | 19 | $wait(ps[j-1]); |
| [2c448829] | 20 | } |
| 21 | } | |
| [09b9231b] | 22 | $assert(sum == N*(N+1)/2); |
| [2c448829] | 23 | } |
Note:
See TracBrowser
for help on using the repository browser.
