src/Pure/PIDE/protocol.scala
changeset 59203 5f0bd5afc16d
parent 59184 830bb7ddb3ab
child 59362 41f1645a4f63
equal deleted inserted replaced
59202:711c2446dc9d 59203:5f0bd5afc16d
    56           case Markup.ACCEPTED => accepted = true
    56           case Markup.ACCEPTED => accepted = true
    57           case Markup.FORKED => touched = true; forks += 1
    57           case Markup.FORKED => touched = true; forks += 1
    58           case Markup.JOINED => forks -= 1
    58           case Markup.JOINED => forks -= 1
    59           case Markup.RUNNING => touched = true; runs += 1
    59           case Markup.RUNNING => touched = true; runs += 1
    60           case Markup.FINISHED => runs -= 1
    60           case Markup.FINISHED => runs -= 1
    61           case Markup.WARNING => warned = true
    61           case Markup.WARNING | Markup.LEGACY => warned = true
    62           case Markup.FAILED | Markup.ERROR => failed = true
    62           case Markup.FAILED | Markup.ERROR => failed = true
    63           case _ =>
    63           case _ =>
    64         }
    64         }
    65       }
    65       }
    66       Status(touched, accepted, warned, failed, forks, runs)
    66       Status(touched, accepted, warned, failed, forks, runs)
   103   val proper_status_elements =
   103   val proper_status_elements =
   104     Markup.Elements(Markup.ACCEPTED, Markup.FORKED, Markup.JOINED, Markup.RUNNING,
   104     Markup.Elements(Markup.ACCEPTED, Markup.FORKED, Markup.JOINED, Markup.RUNNING,
   105       Markup.FINISHED, Markup.FAILED)
   105       Markup.FINISHED, Markup.FAILED)
   106 
   106 
   107   val liberal_status_elements =
   107   val liberal_status_elements =
   108     proper_status_elements + Markup.WARNING + Markup.ERROR
   108     proper_status_elements + Markup.WARNING + Markup.LEGACY + Markup.ERROR
   109 
   109 
   110 
   110 
   111   /* command timing */
   111   /* command timing */
   112 
   112 
   113   object Command_Timing
   113   object Command_Timing
   239       case XML.Elem(Markup(Markup.INFORMATION, _), _) => true
   239       case XML.Elem(Markup(Markup.INFORMATION, _), _) => true
   240       case XML.Elem(Markup(Markup.INFORMATION_MESSAGE, _), _) => true
   240       case XML.Elem(Markup(Markup.INFORMATION_MESSAGE, _), _) => true
   241       case _ => false
   241       case _ => false
   242     }
   242     }
   243 
   243 
   244   def is_warning_markup(msg: XML.Tree, name: String): Boolean =
       
   245     msg match {
       
   246       case XML.Elem(Markup(Markup.WARNING, _),
       
   247         List(XML.Elem(markup, _))) => markup.name == name
       
   248       case XML.Elem(Markup(Markup.WARNING_MESSAGE, _),
       
   249         List(XML.Elem(markup, _))) => markup.name == name
       
   250       case _ => false
       
   251     }
       
   252 
       
   253   def is_warning(msg: XML.Tree): Boolean =
   244   def is_warning(msg: XML.Tree): Boolean =
   254     msg match {
   245     msg match {
   255       case XML.Elem(Markup(Markup.WARNING, _), _) => true
   246       case XML.Elem(Markup(Markup.WARNING, _), _) => true
   256       case XML.Elem(Markup(Markup.WARNING_MESSAGE, _), _) => true
   247       case XML.Elem(Markup(Markup.WARNING_MESSAGE, _), _) => true
   257       case _ => false
   248       case _ => false
   258     }
   249     }
   259 
   250 
       
   251   def is_legacy(msg: XML.Tree): Boolean =
       
   252     msg match {
       
   253       case XML.Elem(Markup(Markup.LEGACY, _), _) => true
       
   254       case XML.Elem(Markup(Markup.LEGACY_MESSAGE, _), _) => true
       
   255       case _ => false
       
   256     }
       
   257 
   260   def is_error(msg: XML.Tree): Boolean =
   258   def is_error(msg: XML.Tree): Boolean =
   261     msg match {
   259     msg match {
   262       case XML.Elem(Markup(Markup.ERROR, _), _) => true
   260       case XML.Elem(Markup(Markup.ERROR, _), _) => true
   263       case XML.Elem(Markup(Markup.ERROR_MESSAGE, _), _) => true
   261       case XML.Elem(Markup(Markup.ERROR_MESSAGE, _), _) => true
   264       case _ => false
   262       case _ => false
   265     }
   263     }
   266 
       
   267   def is_legacy(msg: XML.Tree): Boolean = is_warning_markup(msg, Markup.LEGACY)
       
   268 
   264 
   269   def is_inlined(msg: XML.Tree): Boolean =
   265   def is_inlined(msg: XML.Tree): Boolean =
   270     !(is_result(msg) || is_tracing(msg) || is_state(msg))
   266     !(is_result(msg) || is_tracing(msg) || is_state(msg))
   271 
   267 
   272 
   268