more errors;
authorwenzelm
Sat, 25 Jul 2020 12:43:29 +0200
changeset 72072 fed7b0ae20d8
parent 72071 d3cad9ecd0cc
child 72073 f56522a44564
more errors;
src/Pure/PIDE/resources.scala
--- a/src/Pure/PIDE/resources.scala	Fri Jul 24 20:43:32 2020 +0200
+++ b/src/Pure/PIDE/resources.scala	Sat Jul 25 12:43:29 2020 +0200
@@ -196,10 +196,15 @@
         val header = Thy_Header.read(reader, start, strict)
 
         val base_name = node_name.theory_base_name
-        if (base_name != header.name)
+        if (Long_Name.is_qualified(header.name)) {
+          error("Bad theory name " + quote(header.name) + " with qualification" +
+            Position.here(header.pos))
+        }
+        if (base_name != header.name) {
           error("Bad theory name " + quote(header.name) +
             " for file " + thy_path(Path.basic(base_name)) + Position.here(header.pos) +
             Completion.report_theories(header.pos, List(base_name)))
+        }
 
         val imports_pos =
           header.imports_pos.map({ case (s, pos) =>