diff options
author | Unknown <qadeer@FAIZ-AHMED-FAIZ.redmond.corp.microsoft.com> | 2013-03-01 22:05:19 -0800 |
---|---|---|
committer | Unknown <qadeer@FAIZ-AHMED-FAIZ.redmond.corp.microsoft.com> | 2013-03-01 22:05:19 -0800 |
commit | abdbd2a717efd1e6184bf1113ed2cce63da0d0ea (patch) | |
tree | 192a5dac7dfcf28cc8278964f4dff4cb2a4273c3 /Test/og/linear-set.bpl | |
parent | c5c2c9465a53e4b35a20ad5efe73882dc6a5af34 (diff) |
added parallel calls
Diffstat (limited to 'Test/og/linear-set.bpl')
-rw-r--r-- | Test/og/linear-set.bpl | 16 |
1 files changed, 10 insertions, 6 deletions
diff --git a/Test/og/linear-set.bpl b/Test/og/linear-set.bpl index 04ad0df2..d188db3a 100644 --- a/Test/og/linear-set.bpl +++ b/Test/og/linear-set.bpl @@ -32,15 +32,16 @@ requires tidls' != None() && xls' == All(); assume tidls' == tidls && xls' == xls;
x := 42;
- assert {:yield} xls == All();
+ yield;
+ assert xls == All();
assert x == 42;
call xls1, xls2 := Split(xls);
havoc lsChild;
assume (lsChild != None());
- call {:async} thread(lsChild, xls1);
+ async call thread(lsChild, xls1);
havoc lsChild;
assume (lsChild != None());
- call {:async} thread(lsChild, xls2);
+ async call thread(lsChild, xls2);
}
procedure thread({:linear "tid"} tidls': [X]bool, {:linear "x"} xls': [X]bool)
@@ -54,10 +55,13 @@ requires tidls' != None() && xls' != None(); assume l == None();
l := tidls;
- assert {:yield} tidls != None() && xls != None();
+ yield;
+ assert tidls != None() && xls != None();
x := 0;
- assert {:yield} tidls != None() && xls != None();
+ yield;
+ assert tidls != None() && xls != None();
assert x == 0;
- assert {:yield} tidls != None() && xls != None();
+ yield;
+ assert tidls != None() && xls != None();
l := None();
}
|