fix colorization of delimited string

This commit is contained in:
Basile Burg 2014-11-26 05:15:36 +01:00
parent 4e4207ff55
commit 2f9c1adc86
2 changed files with 2 additions and 4 deletions

View File

@ -419,9 +419,7 @@ begin
next;
end;
//TODO-cstring literals: delimited strings.
//TODO-ccomments: nested comments with multiple nesting on the same line.
//TODO-cfeature: something like pascal {$region} : /*folder blabla*/ /*endfolder*/
{$BOOLEVAL ON}
procedure TSynD2Syn.next;
@ -564,7 +562,7 @@ begin
// string 1
if fCurrRange.rangeKinds = [] then if readDelim(reader, fTokStop, stringPrefixes) then
begin
if readerPrev^ in ['r','x'] then
if readerPrev^ in ['r','x','q'] then
begin
if not (readerNext^ = '"') then
begin

View File

@ -12,7 +12,7 @@ type
const
stringPostfixes: TCharSet = ['c', 'w', 'd'];
stringPrefixes: TCharSet = ['r', 'x', '"'];
stringPrefixes: TCharSet = ['r', 'x', 'q', '"'];
stringStopChecks: TCharSet = ['\', '"'];
charStopChecks: TCharSet = ['\', #39];
symbChars: TCharSet = [';', '{', '}', '(', ')', '[', ']', ',', '.', ':', '?', '$', '"', #39];