// C++ keywords (MSVC5.0 + POET5.0)
static LPTSTR s_apszBasicKeywordList[] =
{
- _T ("If"),
- _T ("Function"),
- _T ("Else"),
- _T ("End"),
- _T ("For"),
- _T ("Next"),
- _T ("While"),
- _T ("Wend"),
_T ("SMDoMenu"),
_T ("GetAttrType"),
_T ("GetAttrName"),
_T ("SetAttrValEnumInt"),
_T ("CreateVerifyItem"),
_T ("VerifyCardinalities"),
+ _T ("Alias"),
_T ("As"),
_T ("Abs"),
+ _T ("And"),
+ _T ("Any"),
_T ("AppActivate"),
_T ("Asc"),
_T ("Atn"),
_T ("Beep"),
+ _T ("Begin"),
+ _T ("Boolean"),
+ _T ("ByRef"),
+ _T ("ByVal"),
+ _T ("Byte"),
_T ("Call"),
_T ("CDbl"),
_T ("ChDir"),
_T ("Do"),
_T ("Double"),
_T ("Loop"),
+ _T ("Each"),
_T ("End"),
+ _T ("Enum"),
_T ("EOF"),
_T ("Erase"),
_T ("Exit"),
_T ("Exp"),
+ _T ("False"),
_T ("FileCopy"),
_T ("FileLen"),
_T ("Fix"),
_T ("Next"),
_T ("Format"),
_T ("Function"),
+ _T ("Get"),
_T ("GetObject"),
_T ("Global"),
_T ("GoSub"),
_T ("If"),
_T ("Then"),
_T ("Else"),
+ _T ("ElseIf"),
+ _T ("In"),
_T ("Input"),
_T ("InputBox"),
_T ("InStr"),
_T ("Int"),
+ _T ("Integer"),
+ _T ("Is"),
_T ("IsDate"),
_T ("IsEmpty"),
_T ("IsNull"),
_T ("Left$"),
_T ("Len"),
_T ("Let"),
+ _T ("Lib"),
_T ("Line"),
_T ("Input#"),
_T ("Log"),
_T ("Month"),
_T ("MsgBox"),
_T ("Name"),
+ _T ("New"),
_T ("Now"),
+ _T ("Not"),
+ _T ("Nothing"),
_T ("Oct"),
_T ("On"),
+ _T ("Or"),
_T ("Error"),
_T ("Open"),
_T ("Option"),
+ _T ("Optional"),
_T ("Base"),
_T ("Print"),
- _T ("Print"),
+ _T ("Public"),
+ _T ("Private"),
+ _T ("Property"),
_T ("Rem"),
+ _T ("Resume"),
_T ("Right"),
_T ("RmDir"),
_T ("Rnd"),
_T ("Second"),
_T ("Seek"),
_T ("Seek"),
- _T ("Select Case"),
+ _T ("Select"),
+ _T ("Case"),
_T ("SendKeys"),
_T ("Set"),
_T ("Shell"),
_T ("LTrim"),
_T ("RTrim"),
_T ("Type"),
+ _T ("True"),
_T ("UBound"),
_T ("UCase"),
_T ("Val"),
+ _T ("Variant"),
_T ("VarType"),
_T ("While"),
_T ("Wend"),
{
DEFINE_BLOCK (nPos, COLORINDEX_COMMENT);
}
- else if (dwCookie & (COOKIE_CHAR | COOKIE_STRING))
+ else if (dwCookie & (COOKIE_STRING))
{
DEFINE_BLOCK (nPos, COLORINDEX_STRING);
}
- else
+ //Use COOKIE_CHAR for comments, because Visual Basic use ' for comments.
+ else if (dwCookie & (COOKIE_CHAR))
+ {
+ DEFINE_BLOCK (nPos, COLORINDEX_COMMENT);
+ }
+ else
{
if (xisalnum (pszChars[nPos]) || pszChars[nPos] == '.' && nPos > 0 && (!xisalpha (pszChars[nPos - 1]) && !xisalpha (pszChars[nPos + 1])))
{
dwCookie &= COOKIE_EXT_COMMENT;
return dwCookie;
}
+
+2004-01-27 Kimmo
+ PATCH: [ 884301 ] Modified Visual Basic syntax highlighting
+ Submitted by Tim Gerundt
+ src/editlib: basic.cpp
+
2004-01-26 Christian
PATCH: [ 883303 ] Upgrade WinMerge Home Page
Web: index.php winmerge.css WinMergePAD.xml images/redswirl.gif