src/Tools/jEdit/src/document_model.scala
author wenzelm
Wed, 14 Mar 2012 15:37:51 +0100
changeset 46920 5f44c8bea84e
parent 46750 69efe9b2994c
child 47058 34761733526c
permissions -rw-r--r--
more explicit indication of swing thread context;
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
43282
5d294220ca43 moved sources -- eliminated Netbeans artifact of jedit package directory;
wenzelm
parents: 40851
diff changeset
     1
/*  Title:      Tools/jEdit/src/document_model.scala
36760
b82a698ef6c9 tuned headers;
wenzelm
parents: 36015
diff changeset
     2
    Author:     Fabian Immler, TU Munich
b82a698ef6c9 tuned headers;
wenzelm
parents: 36015
diff changeset
     3
    Author:     Makarius
b82a698ef6c9 tuned headers;
wenzelm
parents: 36015
diff changeset
     4
38222
dac5fa0ac971 replaced individual Document_Model history by all-inclusive one in Session;
wenzelm
parents: 38158
diff changeset
     5
Document model connected to jEdit buffer -- single node in theory graph.
36760
b82a698ef6c9 tuned headers;
wenzelm
parents: 36015
diff changeset
     6
*/
34407
aad6834ba380 added some headers and comments;
wenzelm
parents: 34406
diff changeset
     7
34784
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34783
diff changeset
     8
package isabelle.jedit
34760
dc7f5e0d9d27 misc modernization of names;
wenzelm
parents: 34759
diff changeset
     9
34318
c13e168a8ae6 original sources from Johannes Hölzl a48e0c6ab1aea77c52d596f7efc007a543d3d10c with minor modifications of directory layout;
wenzelm
parents:
diff changeset
    10
36015
6111de7c916a adapted to Scala 2.8.0 Beta 1;
wenzelm
parents: 34871
diff changeset
    11
import isabelle._
6111de7c916a adapted to Scala 2.8.0 Beta 1;
wenzelm
parents: 34871
diff changeset
    12
34693
3e995f100ad2 sealed Edit;
wenzelm
parents: 34685
diff changeset
    13
import scala.collection.mutable
34446
5c79f97ec1d1 superficial tuning;
wenzelm
parents: 34445
diff changeset
    14
34784
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34783
diff changeset
    15
import org.gjt.sp.jedit.Buffer
34783
cb95d6bbf5f1 clarified BufferListener: use adapter, listen to contentInserted instead of preContentInserted;
wenzelm
parents: 34778
diff changeset
    16
import org.gjt.sp.jedit.buffer.{BufferAdapter, BufferListener, JEditBuffer}
38158
8aaa21db41f3 Document_Model: include token marker here;
wenzelm
parents: 38152
diff changeset
    17
import org.gjt.sp.jedit.textarea.TextArea
8aaa21db41f3 Document_Model: include token marker here;
wenzelm
parents: 38152
diff changeset
    18
8aaa21db41f3 Document_Model: include token marker here;
wenzelm
parents: 38152
diff changeset
    19
import java.awt.font.TextAttribute
34318
c13e168a8ae6 original sources from Johannes Hölzl a48e0c6ab1aea77c52d596f7efc007a543d3d10c with minor modifications of directory layout;
wenzelm
parents:
diff changeset
    20
34760
dc7f5e0d9d27 misc modernization of names;
wenzelm
parents: 34759
diff changeset
    21
34784
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34783
diff changeset
    22
object Document_Model
34588
e8ac8794971f superficial tuning;
wenzelm
parents: 34583
diff changeset
    23
{
34784
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34783
diff changeset
    24
  /* document model of buffer */
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34783
diff changeset
    25
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34783
diff changeset
    26
  private val key = "isabelle.document_model"
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34783
diff changeset
    27
34788
3779c54a2d21 direct apply for Document_Model and Document_View;
wenzelm
parents: 34784
diff changeset
    28
  def apply(buffer: Buffer): Option[Document_Model] =
34784
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34783
diff changeset
    29
  {
38223
2a368e8e0a80 more explicit treatment of Swing thread context;
wenzelm
parents: 38222
diff changeset
    30
    Swing_Thread.require()
34784
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34783
diff changeset
    31
    buffer.getProperty(key) match {
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34783
diff changeset
    32
      case model: Document_Model => Some(model)
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34783
diff changeset
    33
      case _ => None
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34783
diff changeset
    34
    }
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34783
diff changeset
    35
  }
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34783
diff changeset
    36
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34783
diff changeset
    37
  def exit(buffer: Buffer)
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34783
diff changeset
    38
  {
38223
2a368e8e0a80 more explicit treatment of Swing thread context;
wenzelm
parents: 38222
diff changeset
    39
    Swing_Thread.require()
34788
3779c54a2d21 direct apply for Document_Model and Document_View;
wenzelm
parents: 34784
diff changeset
    40
    apply(buffer) match {
39636
610dc743932c permissive exit;
wenzelm
parents: 39179
diff changeset
    41
      case None =>
34784
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34783
diff changeset
    42
      case Some(model) =>
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34783
diff changeset
    43
        model.deactivate()
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34783
diff changeset
    44
        buffer.unsetProperty(key)
34653
2e033aaf128e commands carrying state-information
immler@in.tum.de
parents: 34652
diff changeset
    45
    }
34318
c13e168a8ae6 original sources from Johannes Hölzl a48e0c6ab1aea77c52d596f7efc007a543d3d10c with minor modifications of directory layout;
wenzelm
parents:
diff changeset
    46
  }
43397
dba359c0ae3b more robust init;
wenzelm
parents: 43394
diff changeset
    47
44615
a4ff8a787202 more abstract Document.Node.Name;
wenzelm
parents: 44479
diff changeset
    48
  def init(session: Session, buffer: Buffer, name: Document.Node.Name): Document_Model =
43397
dba359c0ae3b more robust init;
wenzelm
parents: 43394
diff changeset
    49
  {
dba359c0ae3b more robust init;
wenzelm
parents: 43394
diff changeset
    50
    exit(buffer)
44615
a4ff8a787202 more abstract Document.Node.Name;
wenzelm
parents: 44479
diff changeset
    51
    val model = new Document_Model(session, buffer, name)
43397
dba359c0ae3b more robust init;
wenzelm
parents: 43394
diff changeset
    52
    buffer.setProperty(key, model)
dba359c0ae3b more robust init;
wenzelm
parents: 43394
diff changeset
    53
    model.activate()
dba359c0ae3b more robust init;
wenzelm
parents: 43394
diff changeset
    54
    model
dba359c0ae3b more robust init;
wenzelm
parents: 43394
diff changeset
    55
  }
34318
c13e168a8ae6 original sources from Johannes Hölzl a48e0c6ab1aea77c52d596f7efc007a543d3d10c with minor modifications of directory layout;
wenzelm
parents:
diff changeset
    56
}
c13e168a8ae6 original sources from Johannes Hölzl a48e0c6ab1aea77c52d596f7efc007a543d3d10c with minor modifications of directory layout;
wenzelm
parents:
diff changeset
    57
38151
2837c952ca31 explicit Change.Snapshot and Document.Node;
wenzelm
parents: 38150
diff changeset
    58
44615
a4ff8a787202 more abstract Document.Node.Name;
wenzelm
parents: 44479
diff changeset
    59
class Document_Model(val session: Session, val buffer: Buffer, val name: Document.Node.Name)
34588
e8ac8794971f superficial tuning;
wenzelm
parents: 34583
diff changeset
    60
{
44385
e7fdb008aa7d propagate editor perspective through document model;
wenzelm
parents: 44379
diff changeset
    61
  /* header */
38222
dac5fa0ac971 replaced individual Document_Model history by all-inclusive one in Session;
wenzelm
parents: 38158
diff changeset
    62
46737
09ab89658a5d clarified module Thy_Load;
wenzelm
parents: 44776
diff changeset
    63
  def node_header(): Document.Node_Header =
46920
5f44c8bea84e more explicit indication of swing thread context;
wenzelm
parents: 46750
diff changeset
    64
  {
5f44c8bea84e more explicit indication of swing thread context;
wenzelm
parents: 46750
diff changeset
    65
    Swing_Thread.require()
5f44c8bea84e more explicit indication of swing thread context;
wenzelm
parents: 46750
diff changeset
    66
    Isabelle.buffer_lock(buffer) {
46748
8f3ae4d04a2d refined node_header -- more direct buffer access (again);
wenzelm
parents: 46740
diff changeset
    67
      Exn.capture {
8f3ae4d04a2d refined node_header -- more direct buffer access (again);
wenzelm
parents: 46740
diff changeset
    68
        Isabelle.thy_load.check_header(name,
8f3ae4d04a2d refined node_header -- more direct buffer access (again);
wenzelm
parents: 46740
diff changeset
    69
          Thy_Header.read(buffer.getSegment(0, buffer.getLength)))
8f3ae4d04a2d refined node_header -- more direct buffer access (again);
wenzelm
parents: 46740
diff changeset
    70
      }
8f3ae4d04a2d refined node_header -- more direct buffer access (again);
wenzelm
parents: 46740
diff changeset
    71
    }
46920
5f44c8bea84e more explicit indication of swing thread context;
wenzelm
parents: 46750
diff changeset
    72
  }
44385
e7fdb008aa7d propagate editor perspective through document model;
wenzelm
parents: 44379
diff changeset
    73
e7fdb008aa7d propagate editor perspective through document model;
wenzelm
parents: 44379
diff changeset
    74
e7fdb008aa7d propagate editor perspective through document model;
wenzelm
parents: 44379
diff changeset
    75
  /* perspective */
e7fdb008aa7d propagate editor perspective through document model;
wenzelm
parents: 44379
diff changeset
    76
44776
47e8c8daccae added "check" button: adhoc change to full buffer perspective;
wenzelm
parents: 44615
diff changeset
    77
  def buffer_range(): Text.Range = Text.Range(0, (buffer.getLength - 1) max 0)
47e8c8daccae added "check" button: adhoc change to full buffer perspective;
wenzelm
parents: 44615
diff changeset
    78
44385
e7fdb008aa7d propagate editor perspective through document model;
wenzelm
parents: 44379
diff changeset
    79
  def perspective(): Text.Perspective =
e7fdb008aa7d propagate editor perspective through document model;
wenzelm
parents: 44379
diff changeset
    80
  {
e7fdb008aa7d propagate editor perspective through document model;
wenzelm
parents: 44379
diff changeset
    81
    Swing_Thread.require()
44473
4f264fdf8d0e slightly more abstract Text.Perspective;
wenzelm
parents: 44438
diff changeset
    82
    Text.Perspective(
44385
e7fdb008aa7d propagate editor perspective through document model;
wenzelm
parents: 44379
diff changeset
    83
      for {
e7fdb008aa7d propagate editor perspective through document model;
wenzelm
parents: 44379
diff changeset
    84
        doc_view <- Isabelle.document_views(buffer)
44473
4f264fdf8d0e slightly more abstract Text.Perspective;
wenzelm
parents: 44438
diff changeset
    85
        range <- doc_view.perspective().ranges
44385
e7fdb008aa7d propagate editor perspective through document model;
wenzelm
parents: 44379
diff changeset
    86
      } yield range)
e7fdb008aa7d propagate editor perspective through document model;
wenzelm
parents: 44379
diff changeset
    87
  }
e7fdb008aa7d propagate editor perspective through document model;
wenzelm
parents: 44379
diff changeset
    88
e7fdb008aa7d propagate editor perspective through document model;
wenzelm
parents: 44379
diff changeset
    89
e7fdb008aa7d propagate editor perspective through document model;
wenzelm
parents: 44379
diff changeset
    90
  /* pending text edits */
43648
e32de528b5ef more explicit edit_node vs. init_node;
wenzelm
parents: 43644
diff changeset
    91
43644
ea08ce1c314b tuned signature;
wenzelm
parents: 43512
diff changeset
    92
  private object pending_edits  // owned by Swing thread
38224
809578d7f6af more explicit model of pending text edits;
wenzelm
parents: 38223
diff changeset
    93
  {
38425
e467db701d78 moved Text_Edit to Text.Edit;
wenzelm
parents: 38417
diff changeset
    94
    private val pending = new mutable.ListBuffer[Text.Edit]
44436
546adfa8a6fc update_perspective without actual edits, bypassing the full state assignment protocol;
wenzelm
parents: 44385
diff changeset
    95
    private var pending_perspective = false
44473
4f264fdf8d0e slightly more abstract Text.Perspective;
wenzelm
parents: 44438
diff changeset
    96
    private var last_perspective: Text.Perspective = Text.Perspective.empty
44438
0fc38897248a early filtering of unchanged perspective;
wenzelm
parents: 44436
diff changeset
    97
38425
e467db701d78 moved Text_Edit to Text.Edit;
wenzelm
parents: 38417
diff changeset
    98
    def snapshot(): List[Text.Edit] = pending.toList
38224
809578d7f6af more explicit model of pending text edits;
wenzelm
parents: 38223
diff changeset
    99
43648
e32de528b5ef more explicit edit_node vs. init_node;
wenzelm
parents: 43644
diff changeset
   100
    def flush()
38224
809578d7f6af more explicit model of pending text edits;
wenzelm
parents: 38223
diff changeset
   101
    {
809578d7f6af more explicit model of pending text edits;
wenzelm
parents: 38223
diff changeset
   102
      Swing_Thread.require()
44438
0fc38897248a early filtering of unchanged perspective;
wenzelm
parents: 44436
diff changeset
   103
0fc38897248a early filtering of unchanged perspective;
wenzelm
parents: 44436
diff changeset
   104
      val new_perspective =
0fc38897248a early filtering of unchanged perspective;
wenzelm
parents: 44436
diff changeset
   105
        if (pending_perspective) { pending_perspective = false; perspective() }
0fc38897248a early filtering of unchanged perspective;
wenzelm
parents: 44436
diff changeset
   106
        else last_perspective
0fc38897248a early filtering of unchanged perspective;
wenzelm
parents: 44436
diff changeset
   107
43648
e32de528b5ef more explicit edit_node vs. init_node;
wenzelm
parents: 43644
diff changeset
   108
      snapshot() match {
44479
9a04e7502e22 refined document state assignment: observe perspective, more explicit assignment message;
wenzelm
parents: 44473
diff changeset
   109
        case Nil if last_perspective == new_perspective =>
43648
e32de528b5ef more explicit edit_node vs. init_node;
wenzelm
parents: 43644
diff changeset
   110
        case edits =>
e32de528b5ef more explicit edit_node vs. init_node;
wenzelm
parents: 43644
diff changeset
   111
          pending.clear
44438
0fc38897248a early filtering of unchanged perspective;
wenzelm
parents: 44436
diff changeset
   112
          last_perspective = new_perspective
44615
a4ff8a787202 more abstract Document.Node.Name;
wenzelm
parents: 44479
diff changeset
   113
          session.edit_node(name, node_header(), new_perspective, edits)
43648
e32de528b5ef more explicit edit_node vs. init_node;
wenzelm
parents: 43644
diff changeset
   114
      }
38224
809578d7f6af more explicit model of pending text edits;
wenzelm
parents: 38223
diff changeset
   115
    }
809578d7f6af more explicit model of pending text edits;
wenzelm
parents: 38223
diff changeset
   116
40478
4bae781b8f7c replaced Document.Node_Text_Edit by Document.Text_Edit, with treatment of deleted nodes;
wenzelm
parents: 40474
diff changeset
   117
    private val delay_flush =
4bae781b8f7c replaced Document.Node_Text_Edit by Document.Text_Edit, with treatment of deleted nodes;
wenzelm
parents: 40474
diff changeset
   118
      Swing_Thread.delay_last(session.input_delay) { flush() }
4bae781b8f7c replaced Document.Node_Text_Edit by Document.Text_Edit, with treatment of deleted nodes;
wenzelm
parents: 40474
diff changeset
   119
38425
e467db701d78 moved Text_Edit to Text.Edit;
wenzelm
parents: 38417
diff changeset
   120
    def +=(edit: Text.Edit)
38224
809578d7f6af more explicit model of pending text edits;
wenzelm
parents: 38223
diff changeset
   121
    {
809578d7f6af more explicit model of pending text edits;
wenzelm
parents: 38223
diff changeset
   122
      Swing_Thread.require()
809578d7f6af more explicit model of pending text edits;
wenzelm
parents: 38223
diff changeset
   123
      pending += edit
46740
852baa599351 explicitly revoke delay, to avoid spurious timer events after deactivation of related components;
wenzelm
parents: 46739
diff changeset
   124
      delay_flush(true)
38222
dac5fa0ac971 replaced individual Document_Model history by all-inclusive one in Session;
wenzelm
parents: 38158
diff changeset
   125
    }
44436
546adfa8a6fc update_perspective without actual edits, bypassing the full state assignment protocol;
wenzelm
parents: 44385
diff changeset
   126
546adfa8a6fc update_perspective without actual edits, bypassing the full state assignment protocol;
wenzelm
parents: 44385
diff changeset
   127
    def update_perspective()
546adfa8a6fc update_perspective without actual edits, bypassing the full state assignment protocol;
wenzelm
parents: 44385
diff changeset
   128
    {
546adfa8a6fc update_perspective without actual edits, bypassing the full state assignment protocol;
wenzelm
parents: 44385
diff changeset
   129
      pending_perspective = true
46740
852baa599351 explicitly revoke delay, to avoid spurious timer events after deactivation of related components;
wenzelm
parents: 46739
diff changeset
   130
      delay_flush(true)
852baa599351 explicitly revoke delay, to avoid spurious timer events after deactivation of related components;
wenzelm
parents: 46739
diff changeset
   131
    }
852baa599351 explicitly revoke delay, to avoid spurious timer events after deactivation of related components;
wenzelm
parents: 46739
diff changeset
   132
852baa599351 explicitly revoke delay, to avoid spurious timer events after deactivation of related components;
wenzelm
parents: 46739
diff changeset
   133
    def init()
852baa599351 explicitly revoke delay, to avoid spurious timer events after deactivation of related components;
wenzelm
parents: 46739
diff changeset
   134
    {
852baa599351 explicitly revoke delay, to avoid spurious timer events after deactivation of related components;
wenzelm
parents: 46739
diff changeset
   135
      flush()
852baa599351 explicitly revoke delay, to avoid spurious timer events after deactivation of related components;
wenzelm
parents: 46739
diff changeset
   136
      session.init_node(name, node_header(), perspective(), Isabelle.buffer_text(buffer))
852baa599351 explicitly revoke delay, to avoid spurious timer events after deactivation of related components;
wenzelm
parents: 46739
diff changeset
   137
    }
852baa599351 explicitly revoke delay, to avoid spurious timer events after deactivation of related components;
wenzelm
parents: 46739
diff changeset
   138
852baa599351 explicitly revoke delay, to avoid spurious timer events after deactivation of related components;
wenzelm
parents: 46739
diff changeset
   139
    def exit()
852baa599351 explicitly revoke delay, to avoid spurious timer events after deactivation of related components;
wenzelm
parents: 46739
diff changeset
   140
    {
852baa599351 explicitly revoke delay, to avoid spurious timer events after deactivation of related components;
wenzelm
parents: 46739
diff changeset
   141
      delay_flush(false)
852baa599351 explicitly revoke delay, to avoid spurious timer events after deactivation of related components;
wenzelm
parents: 46739
diff changeset
   142
      flush()
44436
546adfa8a6fc update_perspective without actual edits, bypassing the full state assignment protocol;
wenzelm
parents: 44385
diff changeset
   143
    }
546adfa8a6fc update_perspective without actual edits, bypassing the full state assignment protocol;
wenzelm
parents: 44385
diff changeset
   144
  }
546adfa8a6fc update_perspective without actual edits, bypassing the full state assignment protocol;
wenzelm
parents: 44385
diff changeset
   145
546adfa8a6fc update_perspective without actual edits, bypassing the full state assignment protocol;
wenzelm
parents: 44385
diff changeset
   146
  def update_perspective()
546adfa8a6fc update_perspective without actual edits, bypassing the full state assignment protocol;
wenzelm
parents: 44385
diff changeset
   147
  {
546adfa8a6fc update_perspective without actual edits, bypassing the full state assignment protocol;
wenzelm
parents: 44385
diff changeset
   148
    Swing_Thread.require()
546adfa8a6fc update_perspective without actual edits, bypassing the full state assignment protocol;
wenzelm
parents: 44385
diff changeset
   149
    pending_edits.update_perspective()
38222
dac5fa0ac971 replaced individual Document_Model history by all-inclusive one in Session;
wenzelm
parents: 38158
diff changeset
   150
  }
38152
eab0d1c2e46e Change.Snapshot: include from_current/to_current here, with precomputed changes;
wenzelm
parents: 38151
diff changeset
   151
44776
47e8c8daccae added "check" button: adhoc change to full buffer perspective;
wenzelm
parents: 44615
diff changeset
   152
  def full_perspective()
47e8c8daccae added "check" button: adhoc change to full buffer perspective;
wenzelm
parents: 44615
diff changeset
   153
  {
47e8c8daccae added "check" button: adhoc change to full buffer perspective;
wenzelm
parents: 44615
diff changeset
   154
    pending_edits.flush()
47e8c8daccae added "check" button: adhoc change to full buffer perspective;
wenzelm
parents: 44615
diff changeset
   155
    session.edit_node(name, node_header(), Text.Perspective(List(buffer_range())), Nil)
47e8c8daccae added "check" button: adhoc change to full buffer perspective;
wenzelm
parents: 44615
diff changeset
   156
  }
47e8c8daccae added "check" button: adhoc change to full buffer perspective;
wenzelm
parents: 44615
diff changeset
   157
38152
eab0d1c2e46e Change.Snapshot: include from_current/to_current here, with precomputed changes;
wenzelm
parents: 38151
diff changeset
   158
eab0d1c2e46e Change.Snapshot: include from_current/to_current here, with precomputed changes;
wenzelm
parents: 38151
diff changeset
   159
  /* snapshot */
34731
c0cb6bd10eec keep BufferListener and TextAreaExtension private;
wenzelm
parents: 34724
diff changeset
   160
38417
b8922ae21111 renamed class Document to Document.Version etc.;
wenzelm
parents: 38359
diff changeset
   161
  def snapshot(): Document.Snapshot =
b8922ae21111 renamed class Document to Document.Version etc.;
wenzelm
parents: 38359
diff changeset
   162
  {
38223
2a368e8e0a80 more explicit treatment of Swing thread context;
wenzelm
parents: 38222
diff changeset
   163
    Swing_Thread.require()
44615
a4ff8a787202 more abstract Document.Node.Name;
wenzelm
parents: 44479
diff changeset
   164
    session.snapshot(name, pending_edits.snapshot())
38223
2a368e8e0a80 more explicit treatment of Swing thread context;
wenzelm
parents: 38222
diff changeset
   165
  }
34828
c2308b317244 misc tuning;
wenzelm
parents: 34827
diff changeset
   166
c2308b317244 misc tuning;
wenzelm
parents: 34827
diff changeset
   167
c2308b317244 misc tuning;
wenzelm
parents: 34827
diff changeset
   168
  /* buffer listener */
c2308b317244 misc tuning;
wenzelm
parents: 34827
diff changeset
   169
c2308b317244 misc tuning;
wenzelm
parents: 34827
diff changeset
   170
  private val buffer_listener: BufferListener = new BufferAdapter
c2308b317244 misc tuning;
wenzelm
parents: 34827
diff changeset
   171
  {
40478
4bae781b8f7c replaced Document.Node_Text_Edit by Document.Text_Edit, with treatment of deleted nodes;
wenzelm
parents: 40474
diff changeset
   172
    override def bufferLoaded(buffer: JEditBuffer)
4bae781b8f7c replaced Document.Node_Text_Edit by Document.Text_Edit, with treatment of deleted nodes;
wenzelm
parents: 40474
diff changeset
   173
    {
4bae781b8f7c replaced Document.Node_Text_Edit by Document.Text_Edit, with treatment of deleted nodes;
wenzelm
parents: 40474
diff changeset
   174
      pending_edits.init()
4bae781b8f7c replaced Document.Node_Text_Edit by Document.Text_Edit, with treatment of deleted nodes;
wenzelm
parents: 40474
diff changeset
   175
    }
4bae781b8f7c replaced Document.Node_Text_Edit by Document.Text_Edit, with treatment of deleted nodes;
wenzelm
parents: 40474
diff changeset
   176
34828
c2308b317244 misc tuning;
wenzelm
parents: 34827
diff changeset
   177
    override def contentInserted(buffer: JEditBuffer,
c2308b317244 misc tuning;
wenzelm
parents: 34827
diff changeset
   178
      start_line: Int, offset: Int, num_lines: Int, length: Int)
c2308b317244 misc tuning;
wenzelm
parents: 34827
diff changeset
   179
    {
40478
4bae781b8f7c replaced Document.Node_Text_Edit by Document.Text_Edit, with treatment of deleted nodes;
wenzelm
parents: 40474
diff changeset
   180
      if (!buffer.isLoading)
4bae781b8f7c replaced Document.Node_Text_Edit by Document.Text_Edit, with treatment of deleted nodes;
wenzelm
parents: 40474
diff changeset
   181
        pending_edits += Text.Edit.insert(offset, buffer.getText(offset, length))
34828
c2308b317244 misc tuning;
wenzelm
parents: 34827
diff changeset
   182
    }
c2308b317244 misc tuning;
wenzelm
parents: 34827
diff changeset
   183
c2308b317244 misc tuning;
wenzelm
parents: 34827
diff changeset
   184
    override def preContentRemoved(buffer: JEditBuffer,
38426
2858ec7b6dd8 specific types Text.Offset and Text.Range;
wenzelm
parents: 38425
diff changeset
   185
      start_line: Int, offset: Int, num_lines: Int, removed_length: Int)
34828
c2308b317244 misc tuning;
wenzelm
parents: 34827
diff changeset
   186
    {
40478
4bae781b8f7c replaced Document.Node_Text_Edit by Document.Text_Edit, with treatment of deleted nodes;
wenzelm
parents: 40474
diff changeset
   187
      if (!buffer.isLoading)
4bae781b8f7c replaced Document.Node_Text_Edit by Document.Text_Edit, with treatment of deleted nodes;
wenzelm
parents: 40474
diff changeset
   188
        pending_edits += Text.Edit.remove(offset, buffer.getText(offset, removed_length))
34828
c2308b317244 misc tuning;
wenzelm
parents: 34827
diff changeset
   189
    }
c2308b317244 misc tuning;
wenzelm
parents: 34827
diff changeset
   190
  }
c2308b317244 misc tuning;
wenzelm
parents: 34827
diff changeset
   191
c2308b317244 misc tuning;
wenzelm
parents: 34827
diff changeset
   192
38158
8aaa21db41f3 Document_Model: include token marker here;
wenzelm
parents: 38152
diff changeset
   193
  /* activation */
37557
1ae272fd4082 refresh Isabelle token marker after buffer properties changed, e.g. when fold mode is switched;
wenzelm
parents: 37555
diff changeset
   194
43512
270ce5ff2086 clarified init/exit procedure;
wenzelm
parents: 43452
diff changeset
   195
  private def activate()
34784
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34783
diff changeset
   196
  {
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34783
diff changeset
   197
    buffer.addBufferListener(buffer_listener)
43512
270ce5ff2086 clarified init/exit procedure;
wenzelm
parents: 43452
diff changeset
   198
    pending_edits.init()
44358
2a2df4de1bbe more robust initialization of token marker and line context wrt. session startup;
wenzelm
parents: 44182
diff changeset
   199
    Token_Markup.refresh_buffer(buffer)
34680
1f1f6c95de64 clarified structure of TheoryView
immler@in.tum.de
parents: 34679
diff changeset
   200
  }
1f1f6c95de64 clarified structure of TheoryView
immler@in.tum.de
parents: 34679
diff changeset
   201
43512
270ce5ff2086 clarified init/exit procedure;
wenzelm
parents: 43452
diff changeset
   202
  private def deactivate()
34680
1f1f6c95de64 clarified structure of TheoryView
immler@in.tum.de
parents: 34679
diff changeset
   203
  {
46740
852baa599351 explicitly revoke delay, to avoid spurious timer events after deactivation of related components;
wenzelm
parents: 46739
diff changeset
   204
    pending_edits.exit()
34784
02959dcea756 split Theory_View into Document_Model (connected to Buffer) and Document_View (connected to JEditTextArea);
wenzelm
parents: 34783
diff changeset
   205
    buffer.removeBufferListener(buffer_listener)
44358
2a2df4de1bbe more robust initialization of token marker and line context wrt. session startup;
wenzelm
parents: 44182
diff changeset
   206
    Token_Markup.refresh_buffer(buffer)
34680
1f1f6c95de64 clarified structure of TheoryView
immler@in.tum.de
parents: 34679
diff changeset
   207
  }
34447
wenzelm
parents: 34446
diff changeset
   208
}