retain files in Pure.thy, notably $POLYML_EXE;
authorwenzelm
Mon, 27 Nov 2017 15:59:24 +0100
changeset 67097 d1b8464654c5
parent 67096 e77f13a6a501
child 67098 0f750a6dc754
retain files in Pure.thy, notably $POLYML_EXE;
src/Pure/Thy/sessions.scala
--- a/src/Pure/Thy/sessions.scala	Mon Nov 27 11:45:20 2017 +0100
+++ b/src/Pure/Thy/sessions.scala	Mon Nov 27 15:59:24 2017 +0100
@@ -238,8 +238,9 @@
             val loaded_files =
               if (inlined_files) {
                 if (Sessions.is_pure(info.name)) {
-                  (Thy_Header.PURE -> resources.pure_files(overall_syntax, info.dir)) ::
-                    dependencies.loaded_files.filterNot(p => p._1 == Thy_Header.PURE)
+                  val pure_files = resources.pure_files(overall_syntax, info.dir)
+                  dependencies.loaded_files.map({ case (name, files) =>
+                    (name, if (name == Thy_Header.PURE) pure_files ::: files else files) })
                 }
                 else dependencies.loaded_files
               }