Skip to content
Snippets Groups Projects
Commit 4f975ded authored by Lars Hupel's avatar Lars Hupel
Browse files

dummy support for strings

parent 4a2e8eec
No related branches found
No related tags found
No related merge requests found
......@@ -5,6 +5,8 @@ begin
axiomatization
error :: "nat \<Rightarrow> 'a"
typedecl string
declare [[code abort: error]]
declare null_rec[simp]
......
......@@ -127,6 +127,9 @@ final class Types(context: LeonContext, program: Program, system: System)(implic
case Some(datatype) => datatype.typ
}}.map { Type(_, args) }
}
case StringType =>
context.reporter.warning("Strings are not yet supported, translating to unspecified type")
Future.successful { Type("Leon_Library.string", Nil) }
case _ if strict =>
context.reporter.fatalError(s"Unsupported type $tree, can't be inferred")
case _ =>
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment