source: CIVL/examples/languageFeatures/atomicWait.cvl@ 57970ad

1.23 2.0 main test-branch
Last change on this file since 57970ad was a82987f, checked in by Manchun Zheng <zmanchun@…>, 12 years ago

$wait is re-implemented as a system function now; examples are updated accordingly.

git-svn-id: svn://vsl.cis.udel.edu/civl/trunk@664 fb995dde-84ed-4084-dfe6-e5aef3e2452c

  • Property mode set to 100644
File size: 343 bytes
Line 
1/* Commandline execution:
2 * civl verify -inputN=3 atomicWait.cvl
3 * */
4#include <civlc.h>
5$input int N;
6int sum = 0;
7
8void foo(int i){
9 sum += i;
10}
11
12void 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 ++){
19 $wait(ps[j-1]);
20 }
21 }
22 $assert(sum == N*(N+1)/2);
23}
Note: See TracBrowser for help on using the repository browser.