1 files changed, 57 insertions, 0 deletions
diff --git a/Test/civl/foo.bpl b/Test/civl/foo.bpl
new file mode 100644
index 00000000..8b7b4aa6
--- /dev/null
+++ b/Test/civl/foo.bpl
@@ -0,0 +1,57 @@
+// RUN: %boogie -noinfer "%s" > "%t"
+// RUN: %diff "%s.expect" "%t"
+var {:layer 0,1} g:int;
+
+procedure {:yields} {:layer 1} PB()
+{
+  yield;
+  call Incr();
+  yield;
+}
+
+procedure {:yields} {:layer 0,1} Incr();
+ensures {:atomic}
+|{A:
+  g := g + 1; return true;
+}|;
+
+procedure {:yields} {:layer 0,1} Set(v: int);
+ensures {:atomic}
+|{A:
+  g := v; return true;
+}|;
+
+procedure {:yields} {:layer 1} PC()
+ensures {:layer 1} g == 3;
+{
+  yield;
+  call Set(3);
+  yield;
+  assert {:layer 1} g == 3;
+}
+
+procedure {:yields} {:layer 1} PE()
+{
+  call PC();
+}
+
+procedure {:yields} {:layer 1} PD()
+{
+  call PC();
+  assert {:layer 1} g == 3;
+}
+
+procedure {:yields} {:layer 1} Main()
+{
+  yield;
+  while (*)
+  {
+    async call PB();
+    yield;
+    async call PE();
+    yield;
+    async call PD();
+    yield;
+  }
+  yield;
+}