Fix issue 99. When annotate a quantifier expr that has a SplitQuantifier, we

need exclude the private terms (the ones that includes the quantifier expr's bv)
from it exported terms.

2 files changed, 13 insertions, 0 deletions

diff --git a/Test/dafny4/Bug99.dfy b/Test/dafny4/Bug99.dfy
new file mode 100644
index 00000000..3f95ce9f
--- /dev/null
+++ b/Test/dafny4/Bug99.dfy
@@ -0,0 +1,11 @@
+// RUN: %dafny  /autoTriggers:1 /compile:0 "%s" > "%t"

+// RUN: %diff "%s.expect" "%t"

+

+predicate P(e:int, p:int) { true }

+predicate Q(i:int, t:int)

+

+lemma Tester(x:int)

+{

+    assert forall i :: Q(i, x) ==> (forall p {:trigger P(i, p)} :: P(i, p));

+		

+}

diff --git a/Test/dafny4/Bug99.dfy.expect b/Test/dafny4/Bug99.dfy.expect
new file mode 100644
index 00000000..73ba063c
--- /dev/null
+++ b/Test/dafny4/Bug99.dfy.expect
@@ -0,0 +1,2 @@
+

+Dafny program verifier finished with 4 verified, 0 errors