Tuned messages, following isabelle.Export.message

This commit is contained in:
Makarius Wenzel 2022-12-04 18:20:54 +01:00
parent afcd78610b
commit 8037fd15f2
1 changed files with 7 additions and 11 deletions

View File

@ -39,24 +39,20 @@ object DOF_Document_Build
{ {
class Engine extends Document_Build.Bash_Engine("dof") class Engine extends Document_Build.Bash_Engine("dof")
{ {
def the_document_entry( def the_document_entry(context: Document_Build.Context, name: String): Export.Entry = {
context: Document_Build.Context,
entry_name: String,
command: String
): Export.Entry = {
val entries = val entries =
for { for {
name <- context.document_theories node_name <- context.document_theories
entry <- context.session_context.get(name.theory, entry_name) entry <- context.session_context.get(node_name.theory, name)
} yield entry } yield entry
entries match { entries match {
case List(entry) => entry case List(entry) => entry
case Nil => case Nil =>
error("No '" + command + "' command in document theories of session " + error("Missing export " + quote(name) + " for document theories of session " +
quote(context.session)) quote(context.session))
case dups => case dups =>
error("Multiple '" + command + "' commands in theories " + error("Multiple exports " + quote(name) + " for theories " +
commas_quote(dups.map(_.theory_name).sorted.distinct)) commas_quote(dups.map(_.theory_name).sorted.distinct))
} }
} }
@ -74,7 +70,7 @@ object DOF_Document_Build
// root.tex from exports // root.tex from exports
File.write(directory.doc_dir + Path.explode("root.tex"), File.write(directory.doc_dir + Path.explode("root.tex"),
the_document_entry(context, "dof/use_template", "use_template").text) the_document_entry(context, "dof/use_template").text)
// copy Isabelle/DOF LaTeX styles // copy Isabelle/DOF LaTeX styles
List(Path.explode("DOF/latex"), Path.explode("ontologies")) List(Path.explode("DOF/latex"), Path.explode("ontologies"))
@ -83,7 +79,7 @@ object DOF_Document_Build
// ontologies.tex from exports // ontologies.tex from exports
File.write(directory.doc_dir + Path.explode("ontologies.tex"), File.write(directory.doc_dir + Path.explode("ontologies.tex"),
split_lines(the_document_entry(context, "dof/use_ontology", "use_ontology").text) split_lines(the_document_entry(context, "dof/use_ontology").text)
.map(name => "\\usepackage{DOF-" + name + "}\n").mkString) .map(name => "\\usepackage{DOF-" + name + "}\n").mkString)
// create dof-config.sty // create dof-config.sty