summaryrefslogtreecommitdiff
path: root/Source/Dafny/Triggers/QuantifierSplitter.cs
diff options
context:
space:
mode:
authorGravatar qunyanm <unknown>2015-11-25 10:27:02 -0800
committerGravatar qunyanm <unknown>2015-11-25 10:27:02 -0800
commitb8fad094ad74180ca16670bebe602737d856b5da (patch)
treee14e7b6caac6fc2282b585b4bdbcd30b4a0a077a /Source/Dafny/Triggers/QuantifierSplitter.cs
parent7dfa02c3da9f68b10b20e6afcd81767d3c6ebf02 (diff)
Fix issue 103. Emit the quantifiers for ForallStmt before AutoTrigger so that
the auto-triggers can be computed for ForallStmt.
Diffstat (limited to 'Source/Dafny/Triggers/QuantifierSplitter.cs')
-rw-r--r--Source/Dafny/Triggers/QuantifierSplitter.cs12
1 files changed, 12 insertions, 0 deletions
diff --git a/Source/Dafny/Triggers/QuantifierSplitter.cs b/Source/Dafny/Triggers/QuantifierSplitter.cs
index 865aa33e..e46b64fb 100644
--- a/Source/Dafny/Triggers/QuantifierSplitter.cs
+++ b/Source/Dafny/Triggers/QuantifierSplitter.cs
@@ -114,6 +114,18 @@ namespace Microsoft.Dafny.Triggers {
}
}
+ protected override void VisitOneStmt(Statement stmt) {
+ Contract.Requires(stmt != null);
+ if (stmt is ForallStmt) {
+ ForallStmt s = (ForallStmt)stmt;
+ if (s.ForallExpressions != null) {
+ foreach (Expression expr in s.ForallExpressions) {
+ VisitOneExpr(expr);
+ }
+ }
+ }
+ }
+
/// <summary>
/// See comments above definition of splits for reason why this method exists
/// </summary>