summaryrefslogtreecommitdiff
path: root/Test/snapshots/Snapshots40.v2.bpl
diff options
context:
space:
mode:
Diffstat (limited to 'Test/snapshots/Snapshots40.v2.bpl')
-rw-r--r--Test/snapshots/Snapshots40.v2.bpl15
1 files changed, 15 insertions, 0 deletions
diff --git a/Test/snapshots/Snapshots40.v2.bpl b/Test/snapshots/Snapshots40.v2.bpl
new file mode 100644
index 00000000..842d33f5
--- /dev/null
+++ b/Test/snapshots/Snapshots40.v2.bpl
@@ -0,0 +1,15 @@
+procedure {:checksum "-1"} Foo(b: bool);
+
+implementation {:id "Foo"} {:checksum "2"} Foo(b: bool)
+{
+ var r: int;
+
+ assert b;
+ call r := Sum(42);
+ assert r != 0;
+ assert r == (42 * 43) div 2;
+}
+
+procedure {:checksum "3"} Sum(n: int) returns (r: int);
+ requires 0 <= n;
+ ensures r == (n * (n + 1)) div 2;