Skip to content
Snippets Groups Projects
Commit 95f6252c authored by Mikaël Mayer's avatar Mikaël Mayer
Browse files

Corrected the display with respect to maps outputed in leon ( -> Some)

parent 85a13c17
No related branches found
No related tags found
No related merge requests found
...@@ -117,7 +117,11 @@ abstract class RecursiveEvaluator(ctx: LeonContext, prog: Program, maxSteps: Int ...@@ -117,7 +117,11 @@ abstract class RecursiveEvaluator(ctx: LeonContext, prog: Program, maxSteps: Int
val res = pre_str + mp_map.map{ case (k, v) => val res = pre_str + mp_map.map{ case (k, v) =>
(e(application(fk, Seq(k))) match { case StringLiteral(s) => s case _ => throw EvalError(typeErrorMsg(k, StringType)) }) + (e(application(fk, Seq(k))) match { case StringLiteral(s) => s case _ => throw EvalError(typeErrorMsg(k, StringType)) }) +
inkv_str + inkv_str +
(e(application(fv, Seq(v))) match { case StringLiteral(s) => s case _ => throw EvalError(typeErrorMsg(k, StringType)) })}.mkString(betweenkv_str) + post_str (v match {
case CaseClass(some, Seq(v)) if some == program.library.Some.get.typed(Seq(tb)) =>
(e(application(fv, Seq(v))) match { case StringLiteral(s) => s case _ => throw EvalError(typeErrorMsg(k, StringType)) })
case _ => throw EvalError(typeErrorMsg(v, program.library.Some.get.typed(Seq(tb))))
})}.mkString(betweenkv_str) + post_str
StringLiteral(res) StringLiteral(res)
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment