mirror of https://gitlab.com/basile.b/dexed.git
fix #144 - highlight D IES
This commit is contained in:
parent
685242ae65
commit
3a6a20c466
|
|
@ -648,7 +648,7 @@ begin
|
|||
// double quoted strings | raw double quoted strings
|
||||
if (fCurrRange.notInExclusiveRange()) and readDelim(reader, fTokStop, stringPrefixes) then
|
||||
begin
|
||||
if readerPrev^ in ['r','x'] then
|
||||
if readerPrev^ in ['r','x','i'] then
|
||||
begin
|
||||
fCurrRange.rString := reader^ = 'r';
|
||||
if not (readerNext^ = '"') then
|
||||
|
|
@ -747,7 +747,7 @@ begin
|
|||
end;
|
||||
|
||||
// token string
|
||||
if readDelim(reader, fTokStop, 'q{') then
|
||||
if readDelim(reader, fTokStop, 'q{') or readDelim(reader, fTokStop, 'iq{') then
|
||||
begin
|
||||
fTokKind := tkSymbl;
|
||||
StartCodeFoldBlock(nil, fkBrackets in fFoldKinds);
|
||||
|
|
|
|||
|
|
@ -12,7 +12,7 @@ type
|
|||
|
||||
const
|
||||
stringPostfixes: TCharSet = ['c', 'w', 'd'];
|
||||
stringPrefixes: TCharSet = ['r', 'x', '"'];
|
||||
stringPrefixes: TCharSet = ['r', 'x', 'i', '"'];
|
||||
stringStopChecks: TCharSet = ['\', '"'];
|
||||
charStopChecks: TCharSet = ['\', #39];
|
||||
symbChars: TCharSet = [';', '{', '}', '(', ')', '[', ']', ',', '.', ':', '?', '$', '"', #39];
|
||||
|
|
|
|||
Loading…
Reference in New Issue