tuned;
authorwenzelm
Thu, 10 Dec 2020 14:31:34 +0100
changeset 72864 612fbd881492
parent 72863 a261946dafa3
child 72865 ebf72a3b8daa
tuned;
src/Pure/Tools/build_job.scala
--- a/src/Pure/Tools/build_job.scala	Thu Dec 10 14:13:03 2020 +0100
+++ b/src/Pure/Tools/build_job.scala	Thu Dec 10 14:31:34 2020 +0100
@@ -49,15 +49,17 @@
               i <- Markup.Serial.unapply(markup.properties)
             } yield i -> tree)
 
-        val markup_index_blobs =
+        val thy_xml = read_xml(Export.MARKUP)
+        val blobs_xml =
+          for (i <- (1 to blobs.length).toList)
+          yield read_xml(Export.MARKUP + i)
+
+        val markups_index =
           Command.Markup_Index.markup :: blobs.map(Command.Markup_Index.blob)
         val markups =
           Command.Markups.make(
-            for ((index, i) <- markup_index_blobs.zipWithIndex)
-            yield {
-              val xml = read_xml(Export.MARKUP + (if (i == 0) "" else i.toString))
-              index -> Markup_Tree.from_XML(xml)
-            })
+            for ((index, xml) <- markups_index.zip(thy_xml :: blobs_xml))
+            yield index -> Markup_Tree.from_XML(xml))
 
         val command =
           Command.unparsed(thy_source, theory = true, id = id, node_name = node_name,