src/Pure/PIDE/markup.scala
changeset 72116 7773ec172572
parent 72112 3546dd4ade74
child 72119 d115d50a19c0
equal deleted inserted replaced
72115:c998827f1df9 72116:7773ec172572
   574         case List(PROPERTY, (NAME, a)) => Some(a)
   574         case List(PROPERTY, (NAME, a)) => Some(a)
   575         case _ => None
   575         case _ => None
   576       }
   576       }
   577   }
   577   }
   578 
   578 
   579   object ML_Pid extends Function("ML_pid")
   579   object ML_Statistics extends Function("ML_statistics")
   580   {
   580   {
   581     def unapply(props: Properties.T): Option[Long] =
   581     def unapply(props: Properties.T): Option[Long] =
   582       props match {
   582       props match {
   583         case List(PROPERTY, (ID, Value.Long(pid))) => Some(pid)
   583         case List(PROPERTY, ("pid", Value.Long(pid))) => Some(pid)
   584         case _ => None
   584         case _ => None
   585       }
   585       }
   586   }
   586   }
   587 
   587 
   588   val command_timing_properties: Set[String] = Set(FILE, OFFSET, NAME, Elapsed.name)
   588   val command_timing_properties: Set[String] = Set(FILE, OFFSET, NAME, Elapsed.name)
   591   object Theory_Timing extends Properties_Function("theory_timing")
   591   object Theory_Timing extends Properties_Function("theory_timing")
   592   object Session_Timing extends Properties_Function("session_timing")
   592   object Session_Timing extends Properties_Function("session_timing")
   593   {
   593   {
   594     val Threads = new Properties.Int("threads")
   594     val Threads = new Properties.Int("threads")
   595   }
   595   }
   596   object ML_Statistics extends Properties_Function("ML_statistics")
       
   597   object Task_Statistics extends Properties_Function("task_statistics")
   596   object Task_Statistics extends Properties_Function("task_statistics")
   598 
   597 
   599   object Loading_Theory extends Name_Function("loading_theory")
   598   object Loading_Theory extends Name_Function("loading_theory")
   600   object Build_Session_Finished extends Function("build_session_finished")
   599   object Build_Session_Finished extends Function("build_session_finished")
   601 
   600