src/Tools/jEdit/src/protocol_dockable.scala
author wenzelm
Thu, 03 Apr 2014 19:49:53 +0200
changeset 56391 b33df9837850
parent 56385 76acce58aeab
child 56715 52125652e82a
permissions -rw-r--r--
slightly more readable protocol trace (NB1: prover input is always marked as <prover_command/>; NB2: adding indentation would invalidate the XML);

/*  Title:      Tools/jEdit/src/protocol_dockable.scala
    Author:     Makarius

Dockable window for protocol messages.
*/

package isabelle.jedit


import isabelle._

import scala.actors.Actor._
import scala.swing.{TextArea, ScrollPane}

import org.gjt.sp.jedit.View


class Protocol_Dockable(view: View, position: String) extends Dockable(view, position)
{
  private val text_area = new TextArea
  set_content(new ScrollPane(text_area))


  /* main actor */

  private val main_actor = actor {
    loop {
      react {
        case input: Prover.Input =>
          Swing_Thread.later { text_area.append(input.toString + "\n\n") }

        case output: Prover.Output =>
          Swing_Thread.later { text_area.append(output.message.toString + "\n\n") }

        case bad => System.err.println("Protocol_Dockable: ignoring bad message " + bad)
      }
    }
  }

  override def init() { PIDE.session.all_messages += main_actor }
  override def exit() { PIDE.session.all_messages -= main_actor }
}