src/Pure/Thy/sessions.scala
changeset 66966 f3f9a492bee6
parent 66965 9cec50354099
child 66967 e365c91c72a9
equal deleted inserted replaced
66965:9cec50354099 66966:f3f9a492bee6
   121     imports: Option[Base] = None)
   121     imports: Option[Base] = None)
   122   {
   122   {
   123     def platform_path: Base = copy(known = known.platform_path)
   123     def platform_path: Base = copy(known = known.platform_path)
   124     def standard_path: Base = copy(known = known.standard_path)
   124     def standard_path: Base = copy(known = known.standard_path)
   125 
   125 
       
   126     def theory_qualifier(name: Document.Node.Name): String =
       
   127       global_theories.getOrElse(name.theory, Long_Name.qualifier(name.theory))
       
   128 
   126     def loaded_theory(name: String): Boolean = loaded_theories.defined(name)
   129     def loaded_theory(name: String): Boolean = loaded_theories.defined(name)
   127     def loaded_theory(name: Document.Node.Name): Boolean = loaded_theory(name.theory)
   130     def loaded_theory(name: Document.Node.Name): Boolean = loaded_theory(name.theory)
   128 
   131 
   129     def loaded_theory_syntax(name: String): Option[Outer_Syntax] =
   132     def loaded_theory_syntax(name: String): Option[Outer_Syntax] =
   130       if (loaded_theory(name)) Some(loaded_theories.get_node(name)) else None
   133       if (loaded_theory(name)) Some(loaded_theories.get_node(name)) else None
   258               def session_node(name: String): Graph_Display.Node =
   261               def session_node(name: String): Graph_Display.Node =
   259                 Graph_Display.Node("[" + name + "]", "session." + name)
   262                 Graph_Display.Node("[" + name + "]", "session." + name)
   260 
   263 
   261               def node(name: Document.Node.Name): Graph_Display.Node =
   264               def node(name: Document.Node.Name): Graph_Display.Node =
   262               {
   265               {
   263                 val qualifier = resources.theory_qualifier(name)
   266                 val qualifier = imports_base.theory_qualifier(name)
   264                 if (qualifier == info.name)
   267                 if (qualifier == info.name)
   265                   Graph_Display.Node(name.theory_base_name, "theory." + name.theory)
   268                   Graph_Display.Node(name.theory_base_name, "theory." + name.theory)
   266                 else session_node(qualifier)
   269                 else session_node(qualifier)
   267               }
   270               }
   268 
   271