51 val dir1 = append(dir, path.dir) |
51 val dir1 = append(dir, path.dir) |
52 Document.Node.Name(node, dir1, theory) |
52 Document.Node.Name(node, dir1, theory) |
53 } |
53 } |
54 } |
54 } |
55 |
55 |
56 def check_thy(name: Document.Node.Name): Document.Node.Deps = |
56 def check_header(name: Document.Node.Name, header: Thy_Header): Document.Node.Deps = |
57 { |
57 { |
58 val header = read_header(name) |
|
59 val name1 = header.name |
58 val name1 = header.name |
60 val imports = header.imports.map(import_name(name.dir, _)) |
59 val imports = header.imports.map(import_name(name.dir, _)) |
61 val uses = header.uses.map(p => (append(name.dir, Path.explode(p._1)), p._2)) |
60 val uses = header.uses.map(p => (append(name.dir, Path.explode(p._1)), p._2)) |
62 if (name.theory != name1) |
61 if (name.theory != name1) |
63 error("Bad file name " + thy_path(Path.basic(name.theory)) + " for theory " + quote(name1)) |
62 error("Bad file name " + thy_path(Path.basic(name.theory)) + " for theory " + quote(name1)) |
64 Document.Node.Deps(imports, uses) |
63 Document.Node.Deps(imports, uses) |
65 } |
64 } |
|
65 |
|
66 def check_thy(name: Document.Node.Name): Document.Node.Deps = |
|
67 check_header(name, read_header(name)) |
66 } |
68 } |
67 |
69 |