source:
CIVL/examples/languageFeatures/atomicStatement.cvl@
b50d2e7
| Last change on this file since b50d2e7 was 36b5ada, checked in by , 12 years ago | |
|---|---|
|
|
| File size: 453 bytes | |
| Rev | Line | |
|---|---|---|
| [36b5ada] | 1 | /* Commandline execution: |
| 2 | * civl verify -inputB=3 atomicStatement.cvl | |
| 3 | * */ | |
| 4 | ||
| [2c448829] | 5 | $input int B; |
| 6 | $input int N; | |
| 7 | $assume 0<N && N<B; | |
| [d410676] | 8 | int n = 3; |
| [9705dfd] | 9 | |
| 10 | void main(){ | |
| [2c448829] | 11 | int x; |
| [9705dfd] | 12 | |
| [2c448829] | 13 | $atomic{ |
| [90dd7d7] | 14 | $when(n > 1) n = 3; |
| 15 | ||
| 16 | $atomic{ | |
| 17 | x = N; | |
| 18 | x = x * 2; | |
| 19 | } | |
| 20 | $assert x == 2*N; | |
| 21 | // non-determinism allowed in $atomic block | |
| 22 | $atomic{ | |
| 23 | x = 3; | |
| 24 | $choose { | |
| 25 | $when (n>2) { x=2; } | |
| 26 | $when (n>1) { x=1; } | |
| 27 | default: {x=0; } | |
| 28 | } | |
| [9705dfd] | 29 | } |
| [90dd7d7] | 30 | $assert (x == 2 || x == 1); |
| [9705dfd] | 31 | } |
| 32 | } |
Note:
See TracBrowser
for help on using the repository browser.
