author | wenzelm |
Sun, 21 Aug 2011 20:04:02 +0200 | |
changeset 44355 | 9c38bdc6d755 |
parent 44238 | 36120feb70ed |
child 44356 | f6a2e5ce2ce5 |
permissions | -rw-r--r-- |
43414 | 1 |
/* Title: Tools/jEdit/src/token_markup.scala |
2 |
Author: Makarius |
|
3 |
||
4 |
Outer syntax token markup. |
|
5 |
*/ |
|
6 |
||
7 |
package isabelle.jedit |
|
8 |
||
9 |
||
10 |
import isabelle._ |
|
11 |
||
43482
ebb90ff55b79
added SyntaxUtilities.StyleExtender hook, with actual functionality in Isabelle/Scala;
wenzelm
parents:
43464
diff
changeset
|
12 |
import java.awt.{Font, Color} |
43502
736183a22fa4
more precise font transformations: shift sub/superscript, adjust size for user fonts;
wenzelm
parents:
43491
diff
changeset
|
13 |
import java.awt.font.{TextAttribute, TransformAttribute, FontRenderContext, LineMetrics} |
43491
7b7baa283434
hidden font: full height makes cursor more visible;
wenzelm
parents:
43489
diff
changeset
|
14 |
import java.awt.geom.AffineTransform |
43482
ebb90ff55b79
added SyntaxUtilities.StyleExtender hook, with actual functionality in Isabelle/Scala;
wenzelm
parents:
43464
diff
changeset
|
15 |
|
ebb90ff55b79
added SyntaxUtilities.StyleExtender hook, with actual functionality in Isabelle/Scala;
wenzelm
parents:
43464
diff
changeset
|
16 |
import org.gjt.sp.util.SyntaxUtilities |
43452
5cf548485529
avoid setTokenMarker fluctuation on buffer reload etc. via static isabelle_token_marker, which is installed by hijacking the jEdit ModeProvider;
wenzelm
parents:
43443
diff
changeset
|
17 |
import org.gjt.sp.jedit.Mode |
5cf548485529
avoid setTokenMarker fluctuation on buffer reload etc. via static isabelle_token_marker, which is installed by hijacking the jEdit ModeProvider;
wenzelm
parents:
43443
diff
changeset
|
18 |
import org.gjt.sp.jedit.syntax.{Token => JEditToken, TokenMarker, TokenHandler, |
43482
ebb90ff55b79
added SyntaxUtilities.StyleExtender hook, with actual functionality in Isabelle/Scala;
wenzelm
parents:
43464
diff
changeset
|
19 |
ParserRuleSet, ModeProvider, XModeHandler, SyntaxStyle} |
43452
5cf548485529
avoid setTokenMarker fluctuation on buffer reload etc. via static isabelle_token_marker, which is installed by hijacking the jEdit ModeProvider;
wenzelm
parents:
43443
diff
changeset
|
20 |
|
43414 | 21 |
import javax.swing.text.Segment |
22 |
||
23 |
||
24 |
object Token_Markup |
|
25 |
{ |
|
43502
736183a22fa4
more precise font transformations: shift sub/superscript, adjust size for user fonts;
wenzelm
parents:
43491
diff
changeset
|
26 |
/* font operations */ |
736183a22fa4
more precise font transformations: shift sub/superscript, adjust size for user fonts;
wenzelm
parents:
43491
diff
changeset
|
27 |
|
736183a22fa4
more precise font transformations: shift sub/superscript, adjust size for user fonts;
wenzelm
parents:
43491
diff
changeset
|
28 |
private def font_metrics(font: Font): LineMetrics = |
736183a22fa4
more precise font transformations: shift sub/superscript, adjust size for user fonts;
wenzelm
parents:
43491
diff
changeset
|
29 |
font.getLineMetrics("", new FontRenderContext(null, false, false)) |
736183a22fa4
more precise font transformations: shift sub/superscript, adjust size for user fonts;
wenzelm
parents:
43491
diff
changeset
|
30 |
|
736183a22fa4
more precise font transformations: shift sub/superscript, adjust size for user fonts;
wenzelm
parents:
43491
diff
changeset
|
31 |
private def imitate_font(family: String, font: Font): Font = |
736183a22fa4
more precise font transformations: shift sub/superscript, adjust size for user fonts;
wenzelm
parents:
43491
diff
changeset
|
32 |
{ |
736183a22fa4
more precise font transformations: shift sub/superscript, adjust size for user fonts;
wenzelm
parents:
43491
diff
changeset
|
33 |
val font1 = new Font (family, font.getStyle, font.getSize) |
736183a22fa4
more precise font transformations: shift sub/superscript, adjust size for user fonts;
wenzelm
parents:
43491
diff
changeset
|
34 |
font1.deriveFont(font_metrics(font).getAscent / font_metrics(font1).getAscent * font.getSize) |
736183a22fa4
more precise font transformations: shift sub/superscript, adjust size for user fonts;
wenzelm
parents:
43491
diff
changeset
|
35 |
} |
736183a22fa4
more precise font transformations: shift sub/superscript, adjust size for user fonts;
wenzelm
parents:
43491
diff
changeset
|
36 |
|
736183a22fa4
more precise font transformations: shift sub/superscript, adjust size for user fonts;
wenzelm
parents:
43491
diff
changeset
|
37 |
private def transform_font(font: Font, transform: AffineTransform): Font = |
736183a22fa4
more precise font transformations: shift sub/superscript, adjust size for user fonts;
wenzelm
parents:
43491
diff
changeset
|
38 |
{ |
736183a22fa4
more precise font transformations: shift sub/superscript, adjust size for user fonts;
wenzelm
parents:
43491
diff
changeset
|
39 |
import scala.collection.JavaConversions._ |
736183a22fa4
more precise font transformations: shift sub/superscript, adjust size for user fonts;
wenzelm
parents:
43491
diff
changeset
|
40 |
font.deriveFont(Map(TextAttribute.TRANSFORM -> new TransformAttribute(transform))) |
736183a22fa4
more precise font transformations: shift sub/superscript, adjust size for user fonts;
wenzelm
parents:
43491
diff
changeset
|
41 |
} |
736183a22fa4
more precise font transformations: shift sub/superscript, adjust size for user fonts;
wenzelm
parents:
43491
diff
changeset
|
42 |
|
736183a22fa4
more precise font transformations: shift sub/superscript, adjust size for user fonts;
wenzelm
parents:
43491
diff
changeset
|
43 |
|
43443
5d9693c2337e
basic support for extended syntax styles: sub/superscript;
wenzelm
parents:
43440
diff
changeset
|
44 |
/* extended syntax styles */ |
43414 | 45 |
|
43440 | 46 |
private val plain_range: Int = JEditToken.ID_COUNT |
43488 | 47 |
private val full_range = 6 * plain_range + 1 |
43414 | 48 |
private def check_range(i: Int) { require(0 <= i && i < plain_range) } |
49 |
||
50 |
def subscript(i: Byte): Byte = { check_range(i); (i + plain_range).toByte } |
|
51 |
def superscript(i: Byte): Byte = { check_range(i); (i + 2 * plain_range).toByte } |
|
43460 | 52 |
def bold(i: Byte): Byte = { check_range(i); (i + 3 * plain_range).toByte } |
43487 | 53 |
def user_font(idx: Int, i: Byte): Byte = { check_range(i); (i + (4 + idx) * plain_range).toByte } |
54 |
val hidden: Byte = (6 * plain_range).toByte |
|
55 |
||
56 |
private def font_style(style: SyntaxStyle, f: Font => Font): SyntaxStyle = |
|
57 |
new SyntaxStyle(style.getForegroundColor, style.getBackgroundColor, f(style.getFont)) |
|
43414 | 58 |
|
43482
ebb90ff55b79
added SyntaxUtilities.StyleExtender hook, with actual functionality in Isabelle/Scala;
wenzelm
parents:
43464
diff
changeset
|
59 |
private def script_style(style: SyntaxStyle, i: Int): SyntaxStyle = |
ebb90ff55b79
added SyntaxUtilities.StyleExtender hook, with actual functionality in Isabelle/Scala;
wenzelm
parents:
43464
diff
changeset
|
60 |
{ |
43502
736183a22fa4
more precise font transformations: shift sub/superscript, adjust size for user fonts;
wenzelm
parents:
43491
diff
changeset
|
61 |
font_style(style, font0 => |
736183a22fa4
more precise font transformations: shift sub/superscript, adjust size for user fonts;
wenzelm
parents:
43491
diff
changeset
|
62 |
{ |
736183a22fa4
more precise font transformations: shift sub/superscript, adjust size for user fonts;
wenzelm
parents:
43491
diff
changeset
|
63 |
import scala.collection.JavaConversions._ |
736183a22fa4
more precise font transformations: shift sub/superscript, adjust size for user fonts;
wenzelm
parents:
43491
diff
changeset
|
64 |
val font1 = font0.deriveFont(Map(TextAttribute.SUPERSCRIPT -> new java.lang.Integer(i))) |
736183a22fa4
more precise font transformations: shift sub/superscript, adjust size for user fonts;
wenzelm
parents:
43491
diff
changeset
|
65 |
|
736183a22fa4
more precise font transformations: shift sub/superscript, adjust size for user fonts;
wenzelm
parents:
43491
diff
changeset
|
66 |
def shift(y: Float): Font = |
736183a22fa4
more precise font transformations: shift sub/superscript, adjust size for user fonts;
wenzelm
parents:
43491
diff
changeset
|
67 |
transform_font(font1, AffineTransform.getTranslateInstance(0.0, y.toDouble)) |
736183a22fa4
more precise font transformations: shift sub/superscript, adjust size for user fonts;
wenzelm
parents:
43491
diff
changeset
|
68 |
|
736183a22fa4
more precise font transformations: shift sub/superscript, adjust size for user fonts;
wenzelm
parents:
43491
diff
changeset
|
69 |
val m0 = font_metrics(font0) |
736183a22fa4
more precise font transformations: shift sub/superscript, adjust size for user fonts;
wenzelm
parents:
43491
diff
changeset
|
70 |
val m1 = font_metrics(font1) |
736183a22fa4
more precise font transformations: shift sub/superscript, adjust size for user fonts;
wenzelm
parents:
43491
diff
changeset
|
71 |
val a = m1.getAscent - m0.getAscent |
736183a22fa4
more precise font transformations: shift sub/superscript, adjust size for user fonts;
wenzelm
parents:
43491
diff
changeset
|
72 |
val b = (m1.getDescent + m1.getLeading) - (m0.getDescent + m0.getLeading) |
736183a22fa4
more precise font transformations: shift sub/superscript, adjust size for user fonts;
wenzelm
parents:
43491
diff
changeset
|
73 |
if (a > 0.0f) shift(a) |
736183a22fa4
more precise font transformations: shift sub/superscript, adjust size for user fonts;
wenzelm
parents:
43491
diff
changeset
|
74 |
else if (b > 0.0f) shift(- b) |
736183a22fa4
more precise font transformations: shift sub/superscript, adjust size for user fonts;
wenzelm
parents:
43491
diff
changeset
|
75 |
else font1 |
736183a22fa4
more precise font transformations: shift sub/superscript, adjust size for user fonts;
wenzelm
parents:
43491
diff
changeset
|
76 |
}) |
43482
ebb90ff55b79
added SyntaxUtilities.StyleExtender hook, with actual functionality in Isabelle/Scala;
wenzelm
parents:
43464
diff
changeset
|
77 |
} |
ebb90ff55b79
added SyntaxUtilities.StyleExtender hook, with actual functionality in Isabelle/Scala;
wenzelm
parents:
43464
diff
changeset
|
78 |
|
ebb90ff55b79
added SyntaxUtilities.StyleExtender hook, with actual functionality in Isabelle/Scala;
wenzelm
parents:
43464
diff
changeset
|
79 |
private def bold_style(style: SyntaxStyle): SyntaxStyle = |
43487 | 80 |
font_style(style, _.deriveFont(Font.BOLD)) |
43482
ebb90ff55b79
added SyntaxUtilities.StyleExtender hook, with actual functionality in Isabelle/Scala;
wenzelm
parents:
43464
diff
changeset
|
81 |
|
43661
39fdbd814c7f
quasi-static Isabelle_System -- reduced tendency towards "functorial style";
wenzelm
parents:
43553
diff
changeset
|
82 |
class Style_Extender extends SyntaxUtilities.StyleExtender |
43482
ebb90ff55b79
added SyntaxUtilities.StyleExtender hook, with actual functionality in Isabelle/Scala;
wenzelm
parents:
43464
diff
changeset
|
83 |
{ |
44355
9c38bdc6d755
default style for user fonts -- to prevent org.gjt.sp.jedit.print.BufferPrintable from choking on null;
wenzelm
parents:
44238
diff
changeset
|
84 |
val max_user_fonts = 2 |
9c38bdc6d755
default style for user fonts -- to prevent org.gjt.sp.jedit.print.BufferPrintable from choking on null;
wenzelm
parents:
44238
diff
changeset
|
85 |
if (Symbol.font_names.length > max_user_fonts) |
9c38bdc6d755
default style for user fonts -- to prevent org.gjt.sp.jedit.print.BufferPrintable from choking on null;
wenzelm
parents:
44238
diff
changeset
|
86 |
error("Too many user symbol fonts (max " + max_user_fonts + " permitted): " + |
9c38bdc6d755
default style for user fonts -- to prevent org.gjt.sp.jedit.print.BufferPrintable from choking on null;
wenzelm
parents:
44238
diff
changeset
|
87 |
Symbol.font_names.mkString(", ")) |
43487 | 88 |
|
43482
ebb90ff55b79
added SyntaxUtilities.StyleExtender hook, with actual functionality in Isabelle/Scala;
wenzelm
parents:
43464
diff
changeset
|
89 |
override def extendStyles(styles: Array[SyntaxStyle]): Array[SyntaxStyle] = |
ebb90ff55b79
added SyntaxUtilities.StyleExtender hook, with actual functionality in Isabelle/Scala;
wenzelm
parents:
43464
diff
changeset
|
90 |
{ |
ebb90ff55b79
added SyntaxUtilities.StyleExtender hook, with actual functionality in Isabelle/Scala;
wenzelm
parents:
43464
diff
changeset
|
91 |
val new_styles = new Array[SyntaxStyle](full_range) |
ebb90ff55b79
added SyntaxUtilities.StyleExtender hook, with actual functionality in Isabelle/Scala;
wenzelm
parents:
43464
diff
changeset
|
92 |
for (i <- 0 until plain_range) { |
ebb90ff55b79
added SyntaxUtilities.StyleExtender hook, with actual functionality in Isabelle/Scala;
wenzelm
parents:
43464
diff
changeset
|
93 |
val style = styles(i) |
ebb90ff55b79
added SyntaxUtilities.StyleExtender hook, with actual functionality in Isabelle/Scala;
wenzelm
parents:
43464
diff
changeset
|
94 |
new_styles(i) = style |
ebb90ff55b79
added SyntaxUtilities.StyleExtender hook, with actual functionality in Isabelle/Scala;
wenzelm
parents:
43464
diff
changeset
|
95 |
new_styles(subscript(i.toByte)) = script_style(style, -1) |
ebb90ff55b79
added SyntaxUtilities.StyleExtender hook, with actual functionality in Isabelle/Scala;
wenzelm
parents:
43464
diff
changeset
|
96 |
new_styles(superscript(i.toByte)) = script_style(style, 1) |
ebb90ff55b79
added SyntaxUtilities.StyleExtender hook, with actual functionality in Isabelle/Scala;
wenzelm
parents:
43464
diff
changeset
|
97 |
new_styles(bold(i.toByte)) = bold_style(style) |
44355
9c38bdc6d755
default style for user fonts -- to prevent org.gjt.sp.jedit.print.BufferPrintable from choking on null;
wenzelm
parents:
44238
diff
changeset
|
98 |
for (idx <- 0 until max_user_fonts) |
9c38bdc6d755
default style for user fonts -- to prevent org.gjt.sp.jedit.print.BufferPrintable from choking on null;
wenzelm
parents:
44238
diff
changeset
|
99 |
new_styles(user_font(idx, i.toByte)) = style |
43695
5130dfe1b7be
simplified Symbol based on lazy Symbol.Interpretation -- reduced odd "functorial style";
wenzelm
parents:
43675
diff
changeset
|
100 |
for ((family, idx) <- Symbol.font_index) |
43502
736183a22fa4
more precise font transformations: shift sub/superscript, adjust size for user fonts;
wenzelm
parents:
43491
diff
changeset
|
101 |
new_styles(user_font(idx, i.toByte)) = font_style(style, imitate_font(family, _)) |
43482
ebb90ff55b79
added SyntaxUtilities.StyleExtender hook, with actual functionality in Isabelle/Scala;
wenzelm
parents:
43464
diff
changeset
|
102 |
} |
43502
736183a22fa4
more precise font transformations: shift sub/superscript, adjust size for user fonts;
wenzelm
parents:
43491
diff
changeset
|
103 |
new_styles(hidden) = |
736183a22fa4
more precise font transformations: shift sub/superscript, adjust size for user fonts;
wenzelm
parents:
43491
diff
changeset
|
104 |
new SyntaxStyle(Color.white, null, |
736183a22fa4
more precise font transformations: shift sub/superscript, adjust size for user fonts;
wenzelm
parents:
43491
diff
changeset
|
105 |
{ val font = styles(0).getFont |
736183a22fa4
more precise font transformations: shift sub/superscript, adjust size for user fonts;
wenzelm
parents:
43491
diff
changeset
|
106 |
transform_font(new Font(font.getFamily, 0, 1), |
736183a22fa4
more precise font transformations: shift sub/superscript, adjust size for user fonts;
wenzelm
parents:
43491
diff
changeset
|
107 |
AffineTransform.getScaleInstance(1.0, font.getSize.toDouble)) }) |
43482
ebb90ff55b79
added SyntaxUtilities.StyleExtender hook, with actual functionality in Isabelle/Scala;
wenzelm
parents:
43464
diff
changeset
|
108 |
new_styles |
ebb90ff55b79
added SyntaxUtilities.StyleExtender hook, with actual functionality in Isabelle/Scala;
wenzelm
parents:
43464
diff
changeset
|
109 |
} |
ebb90ff55b79
added SyntaxUtilities.StyleExtender hook, with actual functionality in Isabelle/Scala;
wenzelm
parents:
43464
diff
changeset
|
110 |
} |
ebb90ff55b79
added SyntaxUtilities.StyleExtender hook, with actual functionality in Isabelle/Scala;
wenzelm
parents:
43464
diff
changeset
|
111 |
|
43661
39fdbd814c7f
quasi-static Isabelle_System -- reduced tendency towards "functorial style";
wenzelm
parents:
43553
diff
changeset
|
112 |
def extended_styles(text: CharSequence): Map[Text.Offset, Byte => Byte] = |
43443
5d9693c2337e
basic support for extended syntax styles: sub/superscript;
wenzelm
parents:
43440
diff
changeset
|
113 |
{ |
44238
36120feb70ed
some convenience actions/shortcuts for control symbols;
wenzelm
parents:
43695
diff
changeset
|
114 |
// FIXME Symbol.bsub_decoded etc. |
43482
ebb90ff55b79
added SyntaxUtilities.StyleExtender hook, with actual functionality in Isabelle/Scala;
wenzelm
parents:
43464
diff
changeset
|
115 |
def ctrl_style(sym: String): Option[Byte => Byte] = |
44238
36120feb70ed
some convenience actions/shortcuts for control symbols;
wenzelm
parents:
43695
diff
changeset
|
116 |
if (sym == Symbol.sub_decoded || sym == Symbol.isub_decoded) Some(subscript(_)) |
36120feb70ed
some convenience actions/shortcuts for control symbols;
wenzelm
parents:
43695
diff
changeset
|
117 |
else if (sym == Symbol.sup_decoded || sym == Symbol.isup_decoded) Some(superscript(_)) |
36120feb70ed
some convenience actions/shortcuts for control symbols;
wenzelm
parents:
43695
diff
changeset
|
118 |
else if (sym == Symbol.bold_decoded) Some(bold(_)) |
43482
ebb90ff55b79
added SyntaxUtilities.StyleExtender hook, with actual functionality in Isabelle/Scala;
wenzelm
parents:
43464
diff
changeset
|
119 |
else None |
43455 | 120 |
|
43482
ebb90ff55b79
added SyntaxUtilities.StyleExtender hook, with actual functionality in Isabelle/Scala;
wenzelm
parents:
43464
diff
changeset
|
121 |
var result = Map[Text.Offset, Byte => Byte]() |
ebb90ff55b79
added SyntaxUtilities.StyleExtender hook, with actual functionality in Isabelle/Scala;
wenzelm
parents:
43464
diff
changeset
|
122 |
def mark(start: Text.Offset, stop: Text.Offset, style: Byte => Byte) |
ebb90ff55b79
added SyntaxUtilities.StyleExtender hook, with actual functionality in Isabelle/Scala;
wenzelm
parents:
43464
diff
changeset
|
123 |
{ |
ebb90ff55b79
added SyntaxUtilities.StyleExtender hook, with actual functionality in Isabelle/Scala;
wenzelm
parents:
43464
diff
changeset
|
124 |
for (i <- start until stop) result += (i -> style) |
ebb90ff55b79
added SyntaxUtilities.StyleExtender hook, with actual functionality in Isabelle/Scala;
wenzelm
parents:
43464
diff
changeset
|
125 |
} |
ebb90ff55b79
added SyntaxUtilities.StyleExtender hook, with actual functionality in Isabelle/Scala;
wenzelm
parents:
43464
diff
changeset
|
126 |
var offset = 0 |
ebb90ff55b79
added SyntaxUtilities.StyleExtender hook, with actual functionality in Isabelle/Scala;
wenzelm
parents:
43464
diff
changeset
|
127 |
var ctrl = "" |
43675
8252d51d70e2
simplified Symbol.iterator: produce strings, which are mostly preallocated;
wenzelm
parents:
43661
diff
changeset
|
128 |
for (sym <- Symbol.iterator(text)) { |
43482
ebb90ff55b79
added SyntaxUtilities.StyleExtender hook, with actual functionality in Isabelle/Scala;
wenzelm
parents:
43464
diff
changeset
|
129 |
if (ctrl_style(sym).isDefined) ctrl = sym |
ebb90ff55b79
added SyntaxUtilities.StyleExtender hook, with actual functionality in Isabelle/Scala;
wenzelm
parents:
43464
diff
changeset
|
130 |
else if (ctrl != "") { |
43695
5130dfe1b7be
simplified Symbol based on lazy Symbol.Interpretation -- reduced odd "functorial style";
wenzelm
parents:
43675
diff
changeset
|
131 |
if (Symbol.is_controllable(sym) && sym != "\"" && !Symbol.fonts.isDefinedAt(sym)) { |
43482
ebb90ff55b79
added SyntaxUtilities.StyleExtender hook, with actual functionality in Isabelle/Scala;
wenzelm
parents:
43464
diff
changeset
|
132 |
mark(offset - ctrl.length, offset, _ => hidden) |
ebb90ff55b79
added SyntaxUtilities.StyleExtender hook, with actual functionality in Isabelle/Scala;
wenzelm
parents:
43464
diff
changeset
|
133 |
mark(offset, offset + sym.length, ctrl_style(ctrl).get) |
ebb90ff55b79
added SyntaxUtilities.StyleExtender hook, with actual functionality in Isabelle/Scala;
wenzelm
parents:
43464
diff
changeset
|
134 |
} |
ebb90ff55b79
added SyntaxUtilities.StyleExtender hook, with actual functionality in Isabelle/Scala;
wenzelm
parents:
43464
diff
changeset
|
135 |
ctrl = "" |
43443
5d9693c2337e
basic support for extended syntax styles: sub/superscript;
wenzelm
parents:
43440
diff
changeset
|
136 |
} |
43695
5130dfe1b7be
simplified Symbol based on lazy Symbol.Interpretation -- reduced odd "functorial style";
wenzelm
parents:
43675
diff
changeset
|
137 |
Symbol.lookup_font(sym) match { |
43488 | 138 |
case Some(idx) => mark(offset, offset + sym.length, user_font(idx, _)) |
43487 | 139 |
case _ => |
140 |
} |
|
43482
ebb90ff55b79
added SyntaxUtilities.StyleExtender hook, with actual functionality in Isabelle/Scala;
wenzelm
parents:
43464
diff
changeset
|
141 |
offset += sym.length |
43443
5d9693c2337e
basic support for extended syntax styles: sub/superscript;
wenzelm
parents:
43440
diff
changeset
|
142 |
} |
43482
ebb90ff55b79
added SyntaxUtilities.StyleExtender hook, with actual functionality in Isabelle/Scala;
wenzelm
parents:
43464
diff
changeset
|
143 |
result |
43443
5d9693c2337e
basic support for extended syntax styles: sub/superscript;
wenzelm
parents:
43440
diff
changeset
|
144 |
} |
5d9693c2337e
basic support for extended syntax styles: sub/superscript;
wenzelm
parents:
43440
diff
changeset
|
145 |
|
43414 | 146 |
|
147 |
/* token marker */ |
|
148 |
||
149 |
private val isabelle_rules = new ParserRuleSet("isabelle", "MAIN") |
|
150 |
||
43429 | 151 |
private class Line_Context(val context: Scan.Context) |
152 |
extends TokenMarker.LineContext(isabelle_rules, null) |
|
43414 | 153 |
{ |
154 |
override def hashCode: Int = context.hashCode |
|
155 |
override def equals(that: Any): Boolean = |
|
156 |
that match { |
|
157 |
case other: Line_Context => context == other.context |
|
158 |
case _ => false |
|
159 |
} |
|
160 |
} |
|
161 |
||
43452
5cf548485529
avoid setTokenMarker fluctuation on buffer reload etc. via static isabelle_token_marker, which is installed by hijacking the jEdit ModeProvider;
wenzelm
parents:
43443
diff
changeset
|
162 |
class Marker extends TokenMarker |
5cf548485529
avoid setTokenMarker fluctuation on buffer reload etc. via static isabelle_token_marker, which is installed by hijacking the jEdit ModeProvider;
wenzelm
parents:
43443
diff
changeset
|
163 |
{ |
5cf548485529
avoid setTokenMarker fluctuation on buffer reload etc. via static isabelle_token_marker, which is installed by hijacking the jEdit ModeProvider;
wenzelm
parents:
43443
diff
changeset
|
164 |
override def markTokens(context: TokenMarker.LineContext, |
5cf548485529
avoid setTokenMarker fluctuation on buffer reload etc. via static isabelle_token_marker, which is installed by hijacking the jEdit ModeProvider;
wenzelm
parents:
43443
diff
changeset
|
165 |
handler: TokenHandler, line: Segment): TokenMarker.LineContext = |
5cf548485529
avoid setTokenMarker fluctuation on buffer reload etc. via static isabelle_token_marker, which is installed by hijacking the jEdit ModeProvider;
wenzelm
parents:
43443
diff
changeset
|
166 |
{ |
43553 | 167 |
val context1 = |
168 |
if (Isabelle.session.is_ready) { |
|
169 |
val syntax = Isabelle.session.current_syntax() |
|
170 |
||
171 |
val ctxt = |
|
172 |
context match { |
|
173 |
case c: Line_Context => c.context |
|
174 |
case _ => Scan.Finished |
|
175 |
} |
|
176 |
val (tokens, ctxt1) = syntax.scan_context(line, ctxt) |
|
177 |
val context1 = new Line_Context(ctxt1) |
|
178 |
||
43661
39fdbd814c7f
quasi-static Isabelle_System -- reduced tendency towards "functorial style";
wenzelm
parents:
43553
diff
changeset
|
179 |
val extended = extended_styles(line) |
43553 | 180 |
|
181 |
var offset = 0 |
|
182 |
for (token <- tokens) { |
|
183 |
val style = Isabelle_Markup.token_markup(syntax, token) |
|
184 |
val length = token.source.length |
|
185 |
val end_offset = offset + length |
|
186 |
if ((offset until end_offset) exists extended.isDefinedAt) { |
|
187 |
for (i <- offset until end_offset) { |
|
188 |
val style1 = |
|
189 |
extended.get(i) match { |
|
190 |
case None => style |
|
191 |
case Some(ext) => ext(style) |
|
192 |
} |
|
193 |
handler.handleToken(line, style1, i, 1, context1) |
|
194 |
} |
|
195 |
} |
|
196 |
else handler.handleToken(line, style, offset, length, context1) |
|
197 |
offset += length |
|
198 |
} |
|
199 |
handler.handleToken(line, JEditToken.END, line.count, 0, context1) |
|
200 |
context1 |
|
43452
5cf548485529
avoid setTokenMarker fluctuation on buffer reload etc. via static isabelle_token_marker, which is installed by hijacking the jEdit ModeProvider;
wenzelm
parents:
43443
diff
changeset
|
201 |
} |
43553 | 202 |
else { |
203 |
val context1 = new Line_Context(Scan.Finished) |
|
204 |
handler.handleToken(line, JEditToken.NULL, 0, line.count, context1) |
|
205 |
handler.handleToken(line, JEditToken.END, line.count, 0, context1) |
|
206 |
context1 |
|
43414 | 207 |
} |
43452
5cf548485529
avoid setTokenMarker fluctuation on buffer reload etc. via static isabelle_token_marker, which is installed by hijacking the jEdit ModeProvider;
wenzelm
parents:
43443
diff
changeset
|
208 |
val context2 = context1.intern |
5cf548485529
avoid setTokenMarker fluctuation on buffer reload etc. via static isabelle_token_marker, which is installed by hijacking the jEdit ModeProvider;
wenzelm
parents:
43443
diff
changeset
|
209 |
handler.setLineContext(context2) |
5cf548485529
avoid setTokenMarker fluctuation on buffer reload etc. via static isabelle_token_marker, which is installed by hijacking the jEdit ModeProvider;
wenzelm
parents:
43443
diff
changeset
|
210 |
context2 |
5cf548485529
avoid setTokenMarker fluctuation on buffer reload etc. via static isabelle_token_marker, which is installed by hijacking the jEdit ModeProvider;
wenzelm
parents:
43443
diff
changeset
|
211 |
} |
5cf548485529
avoid setTokenMarker fluctuation on buffer reload etc. via static isabelle_token_marker, which is installed by hijacking the jEdit ModeProvider;
wenzelm
parents:
43443
diff
changeset
|
212 |
} |
5cf548485529
avoid setTokenMarker fluctuation on buffer reload etc. via static isabelle_token_marker, which is installed by hijacking the jEdit ModeProvider;
wenzelm
parents:
43443
diff
changeset
|
213 |
|
43416
e730cdd97dcf
more precise imitatation of original TokenMarker: no locking, interned context etc.;
wenzelm
parents:
43414
diff
changeset
|
214 |
|
43452
5cf548485529
avoid setTokenMarker fluctuation on buffer reload etc. via static isabelle_token_marker, which is installed by hijacking the jEdit ModeProvider;
wenzelm
parents:
43443
diff
changeset
|
215 |
/* mode provider */ |
5cf548485529
avoid setTokenMarker fluctuation on buffer reload etc. via static isabelle_token_marker, which is installed by hijacking the jEdit ModeProvider;
wenzelm
parents:
43443
diff
changeset
|
216 |
|
5cf548485529
avoid setTokenMarker fluctuation on buffer reload etc. via static isabelle_token_marker, which is installed by hijacking the jEdit ModeProvider;
wenzelm
parents:
43443
diff
changeset
|
217 |
class Mode_Provider(orig_provider: ModeProvider) extends ModeProvider |
5cf548485529
avoid setTokenMarker fluctuation on buffer reload etc. via static isabelle_token_marker, which is installed by hijacking the jEdit ModeProvider;
wenzelm
parents:
43443
diff
changeset
|
218 |
{ |
5cf548485529
avoid setTokenMarker fluctuation on buffer reload etc. via static isabelle_token_marker, which is installed by hijacking the jEdit ModeProvider;
wenzelm
parents:
43443
diff
changeset
|
219 |
for (mode <- orig_provider.getModes) addMode(mode) |
5cf548485529
avoid setTokenMarker fluctuation on buffer reload etc. via static isabelle_token_marker, which is installed by hijacking the jEdit ModeProvider;
wenzelm
parents:
43443
diff
changeset
|
220 |
|
5cf548485529
avoid setTokenMarker fluctuation on buffer reload etc. via static isabelle_token_marker, which is installed by hijacking the jEdit ModeProvider;
wenzelm
parents:
43443
diff
changeset
|
221 |
val isabelle_token_marker = new Token_Markup.Marker |
5cf548485529
avoid setTokenMarker fluctuation on buffer reload etc. via static isabelle_token_marker, which is installed by hijacking the jEdit ModeProvider;
wenzelm
parents:
43443
diff
changeset
|
222 |
|
5cf548485529
avoid setTokenMarker fluctuation on buffer reload etc. via static isabelle_token_marker, which is installed by hijacking the jEdit ModeProvider;
wenzelm
parents:
43443
diff
changeset
|
223 |
override def loadMode(mode: Mode, xmh: XModeHandler) |
5cf548485529
avoid setTokenMarker fluctuation on buffer reload etc. via static isabelle_token_marker, which is installed by hijacking the jEdit ModeProvider;
wenzelm
parents:
43443
diff
changeset
|
224 |
{ |
5cf548485529
avoid setTokenMarker fluctuation on buffer reload etc. via static isabelle_token_marker, which is installed by hijacking the jEdit ModeProvider;
wenzelm
parents:
43443
diff
changeset
|
225 |
super.loadMode(mode, xmh) |
5cf548485529
avoid setTokenMarker fluctuation on buffer reload etc. via static isabelle_token_marker, which is installed by hijacking the jEdit ModeProvider;
wenzelm
parents:
43443
diff
changeset
|
226 |
if (mode.getName == "isabelle") |
5cf548485529
avoid setTokenMarker fluctuation on buffer reload etc. via static isabelle_token_marker, which is installed by hijacking the jEdit ModeProvider;
wenzelm
parents:
43443
diff
changeset
|
227 |
mode.setTokenMarker(isabelle_token_marker) |
43414 | 228 |
} |
43452
5cf548485529
avoid setTokenMarker fluctuation on buffer reload etc. via static isabelle_token_marker, which is installed by hijacking the jEdit ModeProvider;
wenzelm
parents:
43443
diff
changeset
|
229 |
} |
43414 | 230 |
} |
231 |