summaryrefslogtreecommitdiff
path: root/Test/dafny0/ComputationsLoop.dfy
diff options
context:
space:
mode:
authorGravatar Nada Amin <namin@alum.mit.edu>2014-08-05 11:03:55 +0200
committerGravatar Nada Amin <namin@alum.mit.edu>2014-08-05 11:03:55 +0200
commita2b04d603976cc54ab40d981b4c2866b58c9945e (patch)
tree068ba022062538a8e9da9145df710bd124a50bc6 /Test/dafny0/ComputationsLoop.dfy
parenta5be808ee60f37b3e74e03660eab66c95154083e (diff)
Tests for non-terminating computations. Already passing.
Diffstat (limited to 'Test/dafny0/ComputationsLoop.dfy')
-rw-r--r--Test/dafny0/ComputationsLoop.dfy13
1 files changed, 13 insertions, 0 deletions
diff --git a/Test/dafny0/ComputationsLoop.dfy b/Test/dafny0/ComputationsLoop.dfy
new file mode 100644
index 00000000..b89455a2
--- /dev/null
+++ b/Test/dafny0/ComputationsLoop.dfy
@@ -0,0 +1,13 @@
+// RUN: %dafny /compile:0 /print:"%t.print" /dprint:"%t.dprint" "%s" > "%t"
+// RUN: %diff "%s.expect" "%t"
+
+function KeepDoin'It(x: nat): nat
+ decreases x;
+{
+ KeepDoin'It(x + 1)
+}
+
+lemma Test(r: nat)
+{
+ assert KeepDoin'It(20) == r;
+} \ No newline at end of file