From d652155ae013f36a1ee17653a8e458baad2d9c2c Mon Sep 17 00:00:00 2001
From: Checkmate50 <dgeisler50@gmail.com>
Date: Mon, 6 Jun 2016 23:14:18 -0600
Subject: Merging complete.  Everything looks good *crosses fingers*

---
 Test/test2/CallVerifiedUnder0.bpl | 42 +++++++++++++++++++++++++++++++++++++++
 1 file changed, 42 insertions(+)
 create mode 100644 Test/test2/CallVerifiedUnder0.bpl

(limited to 'Test/test2/CallVerifiedUnder0.bpl')

diff --git a/Test/test2/CallVerifiedUnder0.bpl b/Test/test2/CallVerifiedUnder0.bpl
new file mode 100644
index 00000000..5d99ec53
--- /dev/null
+++ b/Test/test2/CallVerifiedUnder0.bpl
@@ -0,0 +1,42 @@
+// RUN: %boogie -noinfer "%s" > "%t"
+// RUN: %diff "%s.expect" "%t"
+
+procedure A(P: bool);
+  requires P;
+
+procedure Test0()
+{
+    call {:verified_under false} A(false);  // error
+}
+
+
+procedure Test1()
+{
+    call {:verified_under true} A(false);
+}
+
+
+procedure Test2(P: bool, A: bool)
+{
+    call {:verified_under A} A(P);  // error
+}
+
+
+procedure Test3(P: bool, A: bool)
+  requires !A ==> P;
+{
+    call {:verified_under A} A(P);
+}
+
+
+procedure Test4(P: bool, A: bool)
+{
+    call {:verified_under A} {:verified_under true} A(P);  // error
+}
+
+
+procedure Test5(P: bool, A: bool)
+  requires !A ==> P;
+{
+    call {:verified_under A} {:verified_under true} A(P);
+}
-- 
cgit v1.2.3