Skip to content
Snippets Groups Projects
Commit 54d6ebe2 authored by Etienne Kneuss's avatar Etienne Kneuss
Browse files

Keep precondition inside formula, print precondition

parent 1a6a2be3
No related branches found
No related tags found
No related merge requests found
...@@ -256,24 +256,17 @@ class ADTDual(synth: Synthesizer) extends Rule("ADTDual", synth) { ...@@ -256,24 +256,17 @@ class ADTDual(synth: Synthesizer) extends Rule("ADTDual", synth) {
val TopLevelAnds(exprs) = p.phi val TopLevelAnds(exprs) = p.phi
val (toRemove, toAdd, toPre) = exprs.collect { val (toRemove, toAdd) = exprs.collect {
case eq @ Equals(cc @ CaseClass(cd, args), e) if (variablesOf(e) -- as).isEmpty && (variablesOf(cc) -- xs).isEmpty => case eq @ Equals(cc @ CaseClass(cd, args), e) if (variablesOf(e) -- as).isEmpty && (variablesOf(cc) -- xs).isEmpty =>
(eq, (cd.fieldsIds zip args).map{ case (id, ex) => Equals(ex, CaseClassSelector(cd, e, id)) }, CaseClassInstanceOf(cd, e) ) (eq, CaseClassInstanceOf(cd, e) +: (cd.fieldsIds zip args).map{ case (id, ex) => Equals(ex, CaseClassSelector(cd, e, id)) } )
case eq @ Equals(e, cc @ CaseClass(cd, args)) if (variablesOf(e) -- as).isEmpty && (variablesOf(cc) -- xs).isEmpty => case eq @ Equals(e, cc @ CaseClass(cd, args)) if (variablesOf(e) -- as).isEmpty && (variablesOf(cc) -- xs).isEmpty =>
(eq, (cd.fieldsIds zip args).map{ case (id, ex) => Equals(ex, CaseClassSelector(cd, e, id)) }, CaseClassInstanceOf(cd, e) ) (eq, CaseClassInstanceOf(cd, e) +: (cd.fieldsIds zip args).map{ case (id, ex) => Equals(ex, CaseClassSelector(cd, e, id)) } )
}.unzip3 }.unzip
if (!toRemove.isEmpty) { if (!toRemove.isEmpty) {
val sub = p.copy(phi = And((exprs.toSet -- toRemove ++ toAdd.flatten).toSeq)) val sub = p.copy(phi = And((exprs.toSet -- toRemove ++ toAdd.flatten).toSeq))
val onSuccess: List[Solution] => Solution = { List(task.decompose(this, List(sub), forward, 80))
case List(s) =>
Solution(And(s.pre +: toPre), s.term)
case _ =>
Solution.none
}
List(task.decompose(this, List(sub), onSuccess, 80))
} else { } else {
Nil Nil
} }
......
...@@ -95,7 +95,7 @@ class Synthesizer(val r: Reporter, val solvers: List[Solver]) { ...@@ -95,7 +95,7 @@ class Synthesizer(val r: Reporter, val solvers: List[Solver]) {
val sol = synthesize(Problem(as, phi, xs), rules) val sol = synthesize(Problem(as, phi, xs), rules)
info("Scala code:") info("Scala code:")
info(ScalaPrinter(sol.term)) info(ScalaPrinter(IfExpr(sol.pre, sol.term, Error("Precondition failed").setType(sol.term.getType))))
a a
case _ => case _ =>
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment