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
|
// This module implements the QextScintillaLexerIDL class.
//
// Copyright (c) 2006
// Riverbank Computing Limited <info@riverbankcomputing.co.uk>
//
// This file is part of TQScintilla.
//
// This copy of TQScintilla is free software; you can redistribute it and/or
// modify it under the terms of the GNU General Public License as published by
// the Free Software Foundation; either version 2, or (at your option) any
// later version.
//
// TQScintilla is supplied in the hope that it will be useful, but WITHOUT ANY
// WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
// FOR A PARTICULAR PURPOSE. See the GNU General Public License for more
// details.
//
// You should have received a copy of the GNU General Public License along with
// TQScintilla; see the file LICENSE. If not, write to the Free Software
// Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
#include <tqcolor.h>
#include <tqfont.h>
#include "qextscintillalexeridl.h"
// The ctor.
QextScintillaLexerIDL::QextScintillaLexerIDL(TQObject *parent,const char *name)
: QextScintillaLexerCPP(parent,name)
{
}
// The dtor.
QextScintillaLexerIDL::~QextScintillaLexerIDL()
{
}
// Returns the language name.
const char *QextScintillaLexerIDL::language() const
{
return "IDL";
}
// Returns the foreground colour of the text for a style.
TQColor QextScintillaLexerIDL::color(int style) const
{
if (style == UUID)
return TQColor(0x80,0x40,0x80);
return QextScintillaLexerCPP::color(style);
}
// Returns the set of keywords.
const char *QextScintillaLexerIDL::keywords(int set) const
{
if (set != 1)
return 0;
return "aggregatable allocate appobject arrays async async_uuid "
"auto_handle bindable boolean broadcast byte byte_count "
"call_as callback char coclass code comm_status const "
"context_handle context_handle_noserialize "
"context_handle_serialize control cpp_quote custom decode "
"default defaultbind defaultcollelem defaultvalue "
"defaultvtable dispinterface displaybind dllname double dual "
"enable_allocate encode endpoint entry enum error_status_t "
"explicit_handle fault_status first_is float handle_t heap "
"helpcontext helpfile helpstring helpstringcontext "
"helpstringdll hidden hyper id idempotent ignore iid_as iid_is "
"immediatebind implicit_handle import importlib in include "
"in_line int __int64 __int3264 interface last_is lcid "
"length_is library licensed local long max_is maybe message "
"methods midl_pragma midl_user_allocate midl_user_free min_is "
"module ms_union ncacn_at_dsp ncacn_dnet_nsp ncacn_http "
"ncacn_ip_tcp ncacn_nb_ipx ncacn_nb_nb ncacn_nb_tcp ncacn_np "
"ncacn_spx ncacn_vns_spp ncadg_ip_udp ncadg_ipx ncadg_mq "
"ncalrpc nocode nonbrowsable noncreatable nonextensible notify "
"object odl oleautomation optimize optional out out_of_line "
"pipe pointer_default pragma properties propget propput "
"propputref ptr public range readonly ref represent_as "
"requestedit restricted retval tqshape short signed size_is "
"small source strict_context_handle string struct switch "
"switch_is switch_type transmit_as typedef uidefault union "
"unique unsigned user_marshal usesgetlasterror uuid v1_enum "
"vararg version void wchar_t wire_marshal";
}
// Returns the user name of a style.
TQString QextScintillaLexerIDL::description(int style) const
{
if (style == UUID)
return tr("UUID");
return QextScintillaLexerCPP::description(style);
}
|
