summaryrefslogtreecommitdiff
path: root/Test/dafny4/Bug118.dfy
diff options
context:
space:
mode:
Diffstat (limited to 'Test/dafny4/Bug118.dfy')
-rw-r--r--Test/dafny4/Bug118.dfy12
1 files changed, 12 insertions, 0 deletions
diff --git a/Test/dafny4/Bug118.dfy b/Test/dafny4/Bug118.dfy
new file mode 100644
index 00000000..1e2dddeb
--- /dev/null
+++ b/Test/dafny4/Bug118.dfy
@@ -0,0 +1,12 @@
+// RUN: %dafny /compile:0 "%s" > "%t"
+// RUN: %diff "%s.expect" "%t"
+
+class Foo {
+ ghost var Repr: set<object>
+}
+
+function SeqRepr(s:seq<Foo>) : set<object>
+ reads set b | b in s
+{
+ set o,b | b in s && b != null && o in b.Repr :: o // Works if you say "set b,o | ..."
+} \ No newline at end of file