1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
|
// This module implements the QsciLexerTeX class.
//
// Copyright (c) 2010 Riverbank Computing Limited <info@riverbankcomputing.com>
//
// This file is part of QScintilla.
//
// This file may be used under the terms of the GNU General Public
// License versions 2.0 or 3.0 as published by the Free Software
// Foundation and appearing in the files LICENSE.GPL2 and LICENSE.GPL3
// included in the packaging of this file. Alternatively you may (at
// your option) use any later version of the GNU General Public
// License if such license has been publicly approved by Riverbank
// Computing Limited (or its successors, if any) and the KDE Free Qt
// Foundation. In addition, as a special exception, Riverbank gives you
// certain additional rights. These rights are described in the Riverbank
// GPL Exception version 1.1, which can be found in the file
// GPL_EXCEPTION.txt in this package.
//
// Please review the following information to ensure GNU General
// Public Licensing requirements will be met:
// http://trolltech.com/products/qt/licenses/licensing/opensource/. If
// you are unsure which license is appropriate for your use, please
// review the following information:
// http://trolltech.com/products/qt/licenses/licensing/licensingoverview
// or contact the sales department at sales@riverbankcomputing.com.
//
// This file is provided AS IS with NO WARRANTY OF ANY KIND, INCLUDING THE
// WARRANTY OF DESIGN, MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
#include "Qsci/qscilexertex.h"
#include <qcolor.h>
#include <qfont.h>
// The ctor.
QsciLexerTeX::QsciLexerTeX(QObject *parent)
: QsciLexer(parent)
{
}
// The dtor.
QsciLexerTeX::~QsciLexerTeX()
{
}
// Returns the language name.
const char *QsciLexerTeX::language() const
{
return "TeX";
}
// Returns the lexer name.
const char *QsciLexerTeX::lexer() const
{
return "tex";
}
// Return the string of characters that comprise a word.
const char *QsciLexerTeX::wordCharacters() const
{
return "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ\\@";
}
// Returns the foreground colour of the text for a style.
QColor QsciLexerTeX::defaultColor(int style) const
{
switch (style)
{
case Default:
return QColor(0x3f,0x3f,0x3f);
case Special:
return QColor(0x00,0x7f,0x7f);
case Group:
return QColor(0x7f,0x00,0x00);
case Symbol:
return QColor(0x7f,0x7f,0x00);
case Command:
return QColor(0x00,0x7f,0x00);
}
return QsciLexer::defaultColor(style);
}
// Returns the set of keywords.
const char *QsciLexerTeX::keywords(int set) const
{
if (set == 1)
return
"above abovedisplayshortskip abovedisplayskip "
"abovewithdelims accent adjdemerits advance "
"afterassignment aftergroup atop atopwithdelims "
"badness baselineskip batchmode begingroup "
"belowdisplayshortskip belowdisplayskip binoppenalty "
"botmark box boxmaxdepth brokenpenalty catcode char "
"chardef cleaders closein closeout clubpenalty copy "
"count countdef cr crcr csname day deadcycles def "
"defaulthyphenchar defaultskewchar delcode delimiter "
"delimiterfactor delimeters delimitershortfall "
"delimeters dimen dimendef discretionary "
"displayindent displaylimits displaystyle "
"displaywidowpenalty displaywidth divide "
"doublehyphendemerits dp dump edef else "
"emergencystretch end endcsname endgroup endinput "
"endlinechar eqno errhelp errmessage "
"errorcontextlines errorstopmode escapechar everycr "
"everydisplay everyhbox everyjob everymath everypar "
"everyvbox exhyphenpenalty expandafter fam fi "
"finalhyphendemerits firstmark floatingpenalty font "
"fontdimen fontname futurelet gdef global group "
"globaldefs halign hangafter hangindent hbadness "
"hbox hfil horizontal hfill horizontal hfilneg hfuzz "
"hoffset holdinginserts hrule hsize hskip hss "
"horizontal ht hyphenation hyphenchar hyphenpenalty "
"hyphen if ifcase ifcat ifdim ifeof iffalse ifhbox "
"ifhmode ifinner ifmmode ifnum ifodd iftrue ifvbox "
"ifvmode ifvoid ifx ignorespaces immediate indent "
"input inputlineno input insert insertpenalties "
"interlinepenalty jobname kern language lastbox "
"lastkern lastpenalty lastskip lccode leaders left "
"lefthyphenmin leftskip leqno let limits linepenalty "
"line lineskip lineskiplimit long looseness lower "
"lowercase mag mark mathaccent mathbin mathchar "
"mathchardef mathchoice mathclose mathcode mathinner "
"mathop mathopen mathord mathpunct mathrel "
"mathsurround maxdeadcycles maxdepth meaning "
"medmuskip message mkern month moveleft moveright "
"mskip multiply muskip muskipdef newlinechar noalign "
"noboundary noexpand noindent nolimits nonscript "
"scriptscript nonstopmode nulldelimiterspace "
"nullfont number omit openin openout or outer output "
"outputpenalty over overfullrule overline "
"overwithdelims pagedepth pagefilllstretch "
"pagefillstretch pagefilstretch pagegoal pageshrink "
"pagestretch pagetotal par parfillskip parindent "
"parshape parskip patterns pausing penalty "
"postdisplaypenalty predisplaypenalty predisplaysize "
"pretolerance prevdepth prevgraf radical raise read "
"relax relpenalty right righthyphenmin rightskip "
"romannumeral scriptfont scriptscriptfont "
"scriptscriptstyle scriptspace scriptstyle "
"scrollmode setbox setlanguage sfcode shipout show "
"showbox showboxbreadth showboxdepth showlists "
"showthe skewchar skip skipdef spacefactor spaceskip "
"span special splitbotmark splitfirstmark "
"splitmaxdepth splittopskip string tabskip textfont "
"textstyle the thickmuskip thinmuskip time toks "
"toksdef tolerance topmark topskip tracingcommands "
"tracinglostchars tracingmacros tracingonline "
"tracingoutput tracingpages tracingparagraphs "
"tracingrestores tracingstats uccode uchyph "
"underline unhbox unhcopy unkern unpenalty unskip "
"unvbox unvcopy uppercase vadjust valign vbadness "
"vbox vcenter vfil vfill vfilneg vfuzz voffset vrule "
"vsize vskip vsplit vss vtop wd widowpenalty write "
"xdef xleaders xspaceskip year "
"TeX bgroup egroup endgraf space empty null newcount "
"newdimen newskip newmuskip newbox newtoks newhelp "
"newread newwrite newfam newlanguage newinsert newif "
"maxdimen magstephalf magstep frenchspacing "
"nonfrenchspacing normalbaselines obeylines "
"obeyspaces raggedr ight ttraggedright thinspace "
"negthinspace enspace enskip quad qquad smallskip "
"medskip bigskip removelastskip topglue vglue hglue "
"break nobreak allowbreak filbreak goodbreak "
"smallbreak medbreak bigbreak line leftline "
"rightline centerline rlap llap underbar strutbox "
"strut cases matrix pmatrix bordermatrix eqalign "
"displaylines eqalignno leqalignno pageno folio "
"tracingall showhyphens fmtname fmtversion hphantom "
"vphantom phantom smash";
return 0;
}
// Returns the user name of a style.
QString QsciLexerTeX::description(int style) const
{
switch (style)
{
case Default:
return tr("Default");
case Special:
return tr("Special");
case Group:
return tr("Group");
case Symbol:
return tr("Symbol");
case Command:
return tr("Command");
case Text:
return tr("Text");
}
return QString();
}
|
