src/Pure/Thy/thy_load.scala

--- a/src/Pure/Thy/thy_load.scala	Thu Mar 01 14:48:32 2012 +0100
+++ b/src/Pure/Thy/thy_load.scala	Thu Mar 01 15:16:20 2012 +0100
@@ -53,9 +53,8 @@
     }
   }
 
-  def check_thy(name: Document.Node.Name): Document.Node.Deps =
+  def check_header(name: Document.Node.Name, header: Thy_Header): Document.Node.Deps =
   {
-    val header = read_header(name)
     val name1 = header.name
     val imports = header.imports.map(import_name(name.dir, _))
     val uses = header.uses.map(p => (append(name.dir, Path.explode(p._1)), p._2))
@@ -63,5 +62,8 @@
       error("Bad file name " + thy_path(Path.basic(name.theory)) + " for theory " + quote(name1))
     Document.Node.Deps(imports, uses)
   }
+
+  def check_thy(name: Document.Node.Name): Document.Node.Deps =
+    check_header(name, read_header(name))
 }