# HG changeset patch
# User wenzelm
# Date 1571321444 -7200
# Node ID f21a76a4d01f8c15718b5f798a817684c9038201
# Parent  15ad4c045590982f48709ca54d3f03f7222aebfe
tuned;

diff -r 15ad4c045590 -r f21a76a4d01f src/Pure/Thy/export_theory.scala
--- a/src/Pure/Thy/export_theory.scala	Thu Oct 17 14:06:14 2019 +0200
+++ b/src/Pure/Thy/export_theory.scala	Thu Oct 17 16:10:44 2019 +0200
@@ -48,14 +48,11 @@
             for (theory <- Export.read_theory_names(db, session))
             yield {
               progress.echo("Reading theory " + theory)
-              if (theory == Thy_Header.PURE) read_pure_theory(store, cache = Some(cache))
-              else {
-                read_theory(Export.Provider.database(db, session, theory),
-                  session, theory, types = types, consts = consts,
-                  axioms = axioms, thms = thms, classes = classes, locales = locales,
-                  locale_dependencies = locale_dependencies, classrel = classrel, arities = arities,
-                  typedefs = typedefs, cache = Some(cache))
-              }
+              read_theory(Export.Provider.database(db, session, theory),
+                session, theory, types = types, consts = consts,
+                axioms = axioms, thms = thms, classes = classes, locales = locales,
+                locale_dependencies = locale_dependencies, classrel = classrel, arities = arities,
+                typedefs = typedefs, cache = Some(cache))
             }
           }
         }))
@@ -130,11 +127,14 @@
     cache: Option[Term.Cache] = None): Theory =
   {
     val parents =
-      provider(export_prefix + "parents") match {
-        case Some(entry) => split_lines(entry.uncompressed().text)
-        case None =>
-          error("Missing theory export in session " + quote(session_name) + ": " +
-            quote(theory_name))
+      if (theory_name == Thy_Header.PURE) Nil
+      else {
+        provider(export_prefix + "parents") match {
+          case Some(entry) => split_lines(entry.uncompressed().text)
+          case None =>
+            error("Missing theory export in session " + quote(session_name) + ": " +
+              quote(theory_name))
+        }
       }
     val theory =
       Theory(theory_name, parents,