summaryrefslogtreecommitdiff
path: root/Test/hofs/ReadsReads.dfy
diff options
context:
space:
mode:
authorGravatar Dan Rosén <danr@chalmers.se>2014-08-11 14:57:27 -0700
committerGravatar Dan Rosén <danr@chalmers.se>2014-08-11 14:57:27 -0700
commit4cbe4583b329a39dee2b4b456758cafbe7e2fa79 (patch)
tree6bb2377f06036fd41d939d168365d4e47cc7a327 /Test/hofs/ReadsReads.dfy
parentc377658acba5472b6d0c1e1452ce4c4c8f1fc28e (diff)
Add higher-order-functions and some other goodies
* The reads clause now needs to be self framing. * The requires clause now needs to be framed by the reads clause. * There are one-shot lambdas, with a single arrow, but they will probably be removed. * There is a {:heapQuantifier} attribute to quantifiers, but they will probably be removed. * Add smart handling of type variables * Add < and > for datatype & type parameter
Diffstat (limited to 'Test/hofs/ReadsReads.dfy')
-rw-r--r--Test/hofs/ReadsReads.dfy59
1 files changed, 59 insertions, 0 deletions
diff --git a/Test/hofs/ReadsReads.dfy b/Test/hofs/ReadsReads.dfy
new file mode 100644
index 00000000..bc80713d
--- /dev/null
+++ b/Test/hofs/ReadsReads.dfy
@@ -0,0 +1,59 @@
+// RUN: %dafny /compile:0 /print:"%t.print" /dprint:"%t.dprint" "%s" > "%t"
+// RUN: %diff "%s.expect" "%t"
+
+function MyReadsOk(f : A -> B, a : A) : set<object>
+ reads f.reads(a);
+{
+ f.reads(a)
+}
+
+function MyReadsOk2(f : A -> B, a : A) : set<object>
+ reads f.reads(a);
+{
+ (f.reads)(a)
+}
+
+function MyReadsOk3(f : A -> B, a : A) : set<object>
+ reads (f.reads)(a);
+{
+ f.reads(a)
+}
+
+function MyReadsOk4(f : A -> B, a : A) : set<object>
+ reads (f.reads)(a);
+{
+ (f.reads)(a)
+}
+
+function MyReadsBad(f : A -> B, a : A) : set<object>
+{
+ f.reads(a)
+}
+
+function MyReadsBad2(f : A -> B, a : A) : set<object>
+{
+ (f.reads)(a)
+}
+
+function MyReadsOk'(f : A -> B, a : A, o : object) : bool
+ reads f.reads(a);
+{
+ o in f.reads(a)
+}
+
+function MyReadsBad'(f : A -> B, a : A, o : object) : bool
+{
+ o in f.reads(a)
+}
+
+function MyRequiresOk(f : A -> B, a : A) : bool
+ reads f.reads(a);
+{
+ f.requires(a)
+}
+
+function MyRequiresBad(f : A -> B, a : A) : bool
+{
+ f.requires(a)
+}
+