diff options
Diffstat (limited to 'Test/civl/par-incr.bpl')
-rw-r--r-- | Test/civl/par-incr.bpl | 31 |
1 files changed, 31 insertions, 0 deletions
diff --git a/Test/civl/par-incr.bpl b/Test/civl/par-incr.bpl new file mode 100644 index 00000000..7be8f561 --- /dev/null +++ b/Test/civl/par-incr.bpl @@ -0,0 +1,31 @@ +// RUN: %boogie -noinfer -typeEncoding:m -useArrayTheory "%s" > "%t" +// RUN: %diff "%s.expect" "%t" + +var {:layer 0} x: int; + +procedure {:yields} {:layer 0,1} Incr(); +ensures {:right} |{ A: x := x + 1; return true; }|; + +procedure {:yields} {:layer 1,2} Incr2() +ensures {:right} |{ A: x := x + 2; return true; }|; +{ + yield; + par Incr() | Incr(); + yield; +} + +procedure {:yields} {:layer 1} Yield() +{ + yield; +} + +procedure {:yields} {:layer 2,3} Incr4() +ensures {:atomic} |{ A: x := x + 4; return true; }|; +{ + yield; + par Incr2() | Incr2() | Yield(); + yield; +} + + + |