simplified message markup, using plain XML.Elem directly;
authorwenzelm
Fri, 21 May 2010 20:10:45 +0200
changeset 37044 d93b849cbecd
parent 37043 f8e24980af05
child 37045 83ea8b551280
simplified message markup, using plain XML.Elem directly;
src/Pure/General/output.scala
src/Pure/PIDE/state.scala
src/Pure/System/isabelle_process.scala
src/Pure/build-jars
src/Tools/jEdit/src/jedit/output_dockable.scala
--- a/src/Pure/General/output.scala	Fri May 21 18:10:19 2010 +0200
+++ /dev/null	Thu Jan 01 00:00:00 1970 +0000
@@ -1,24 +0,0 @@
-/*  Title:      Pure/General/output.scala
-    Author:     Makarius
-
-Prover output messages.
-*/
-
-package isabelle
-
-
-object Output
-{
-  object Message
-  {
-    def apply(name: String, atts: XML.Attributes, body: List[XML.Tree]): XML.Tree =
-      XML.Elem(Markup.MESSAGE, (Markup.CLASS, name) :: atts, body)
-
-    def unapply(tree: XML.Tree): Option[(String, XML.Attributes, List[XML.Tree])] =
-      tree match {
-        case XML.Elem(Markup.MESSAGE, (Markup.CLASS, name) :: atts, body) =>
-          Some(name, atts, body)
-        case _ => None
-      }
-  }
-}
--- a/src/Pure/PIDE/state.scala	Fri May 21 18:10:19 2010 +0200
+++ b/src/Pure/PIDE/state.scala	Fri May 21 20:10:45 2010 +0200
@@ -74,7 +74,7 @@
   {
     val changed: State =
       message match {
-        case XML.Elem(Markup.MESSAGE, (Markup.CLASS, Markup.STATUS) :: _, elems) =>
+        case XML.Elem(Markup.STATUS, _, elems) =>
           (this /: elems)((state, elem) =>
             elem match {
               case XML.Elem(Markup.UNPROCESSED, _, _) => state.set_status(Command.Status.UNPROCESSED)
--- a/src/Pure/System/isabelle_process.scala	Fri May 21 18:10:19 2010 +0200
+++ b/src/Pure/System/isabelle_process.scala	Fri May 21 20:10:45 2010 +0200
@@ -84,7 +84,7 @@
 
   class Result(val kind: Kind.Value, val props: List[(String, String)], val body: List[XML.Tree])
   {
-    def message = Output.Message(Kind.markup(kind), props, body)
+    def message = XML.Elem(Kind.markup(kind), props, body)
 
     override def toString: String =
     {
--- a/src/Pure/build-jars	Fri May 21 18:10:19 2010 +0200
+++ b/src/Pure/build-jars	Fri May 21 20:10:45 2010 +0200
@@ -26,7 +26,6 @@
   General/exn.scala
   General/linear_set.scala
   General/markup.scala
-  General/output.scala
   General/position.scala
   General/pretty.scala
   General/scan.scala
--- a/src/Tools/jEdit/src/jedit/output_dockable.scala	Fri May 21 18:10:19 2010 +0200
+++ b/src/Tools/jEdit/src/jedit/output_dockable.scala	Fri May 21 20:10:45 2010 +0200
@@ -61,8 +61,8 @@
     val show_tracing = tracing.selected
     val show_debug = debug.selected
     document.current_state(cmd).results filter {
-      case Output.Message(Markup.TRACING, _, _) => show_tracing
-      case Output.Message(Markup.DEBUG, _, _) => show_debug
+      case XML.Elem(Markup.TRACING, _, _) => show_tracing
+      case XML.Elem(Markup.DEBUG, _, _) => show_debug
       case _ => true
     }
   }