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-set2.bpl | |
parent | c5c2c9465a53e4b35a20ad5efe73882dc6a5af34 (diff) |
added parallel calls
Diffstat (limited to 'Test/og/linear-set2.bpl')
-rw-r--r-- | Test/og/linear-set2.bpl | 16 |
1 files changed, 10 insertions, 6 deletions
diff --git a/Test/og/linear-set2.bpl b/Test/og/linear-set2.bpl index 0df45254..5d627348 100644 --- a/Test/og/linear-set2.bpl +++ b/Test/og/linear-set2.bpl @@ -33,15 +33,16 @@ requires tidls' != nil && 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 != nil);
- call {:async} thread(lsChild, xls1);
+ async call thread(lsChild, xls1);
havoc lsChild;
assume (lsChild != nil);
- call {:async} thread(lsChild, xls2);
+ async call thread(lsChild, xls2);
}
procedure thread({:linear "tid"} tidls': X, {:linear "x"} xls': [X]bool)
@@ -55,10 +56,13 @@ requires tidls' != nil && xls' != None(); assume l == nil;
l := tidls;
- assert {:yield} tidls != nil && xls != None();
+ yield;
+ assert tidls != nil && xls != None();
x := 0;
- assert {:yield} tidls != nil && xls != None();
+ yield;
+ assert tidls != nil && xls != None();
assert x == 0;
- assert {:yield} tidls != nil && xls != None();
+ yield;
+ assert tidls != nil && xls != None();
l := nil;
}
|