source:
CIVL/examples/contracts/with.cvl@
8b2639d
| Last change on this file since 8b2639d was 15a2fae, checked in by , 10 years ago | |
|---|---|
|
|
| File size: 399 bytes | |
| Rev | Line | |
|---|---|---|
| [13b3e46] | 1 | #include<collate.cvh> |
| 2 | ||
| [15a2fae] | 3 | $input int N=2; |
| [13b3e46] | 4 | |
| [15a2fae] | 5 | $gcollator gcollator=$gcollator_create($here, N); |
| 6 | ||
| 7 | void process(int id){ | |
| 8 | $collator collator=$collator_create(gcollator, $here, id); | |
| [05fdac6] | 9 | $collate_state cs=$collate_arrives(collator, $here); |
| [15a2fae] | 10 | |
| [a55a02c] | 11 | $with (cs) { |
| [13b3e46] | 12 | $assert($true); |
| 13 | } | |
| [a55a02c] | 14 | $collate_departs(collator); |
| [13b3e46] | 15 | $free(collator); |
| [15a2fae] | 16 | } |
| 17 | ||
| 18 | ||
| 19 | int main(){ | |
| 20 | $parfor(int i: 0 .. N-1) | |
| 21 | process(i); | |
| [13b3e46] | 22 | $free(gcollator); |
| 23 | } |
Note:
See TracBrowser
for help on using the repository browser.
