summaryrefslogtreecommitdiff
path: root/Test/og
diff options
context:
space:
mode:
Diffstat (limited to 'Test/og')
-rw-r--r--Test/og/DeviceCache.bpl2
-rw-r--r--Test/og/civl-paper.bpl1
-rw-r--r--Test/og/lock.bpl1
3 files changed, 4 insertions, 0 deletions
diff --git a/Test/og/DeviceCache.bpl b/Test/og/DeviceCache.bpl
index ec61e188..dd2968ee 100644
--- a/Test/og/DeviceCache.bpl
+++ b/Test/og/DeviceCache.bpl
@@ -161,6 +161,8 @@ ensures {:phase 1} Inv(ghostLock, currsize, newsize);
j := j + 1;
par tid := YieldToReadCache(tid);
}
+
+ par tid := YieldToReadCache(tid);
}
procedure {:yields} Init({:linear "tid"} xls':[X]bool) returns ({:linear "tid"} xls:[X]bool);
diff --git a/Test/og/civl-paper.bpl b/Test/og/civl-paper.bpl
index 4f2da717..27c700f3 100644
--- a/Test/og/civl-paper.bpl
+++ b/Test/og/civl-paper.bpl
@@ -92,6 +92,7 @@ ensures {:right 1} |{ A: assert tid != nil; assume lock == nil; lock := tid; ret
A:
assume status;
+ par YieldLock();
return;
B:
diff --git a/Test/og/lock.bpl b/Test/og/lock.bpl
index 69aba91e..92b803a4 100644
--- a/Test/og/lock.bpl
+++ b/Test/og/lock.bpl
@@ -36,6 +36,7 @@ ensures {:atomic 1} |{ A: assume !b; b := true; return true; }|;
A:
assume status;
+ yield;
return;
B: