anchor.diff:      rangeKinds: TRangeKinds;
       primaryRange: TPrimaryRange;
       secondaryRange: TSecondaryRange;
  +    rString: boolean;
     public
       procedure Assign(Src: TSynCustomHighlighterRange); override;
       function Compare(Range: TSynCustomHighlighterRange): integer; override;
  
positive.code:     begin
        if not readUntilAmong(reader, fTokStop, stringStopChecks) then
          break;
        if reader^ = '\' then
        begin
          readerNext;
          if readWhile(reader, fTokStop, '\') then
            continue;
          if reader^ = '"' then
            readerNext;
          continue;
        end
  
negative.code:         readerNext;
          if readWhile(reader, fTokStop, '\') then
            continue;
          if reader^ = '"' then if not fCurrRange.rString then
            readerNext;
          continue;
        end
  