anchor.diff:          fCurrRange.rangeKinds -= [rkString1];
           readDelim(reader, fTokStop, stringPostfixes);
           fCurrRange.rString := false;
  -        if fkStrings in fFoldKinds then
  -          EndCodeFoldBlock();
  +        EndCodeFoldBlock(fkStrings in fFoldKinds);
           exit;
         end
         else break;
  
positive.code:       if fCurrRange.nestedCommentsCount <> 0 then
          exit;
        fCurrRange.rangeKinds -= [rkBlockDoc2, rkBlockCom2];
        if fkComments2 in fFoldKinds then
          EndCodeFoldBlock;
        exit;
      end;
      readLine(reader, fTokStop);
  
negative.code:     exit;
    end else readerReset;
  
    // numbers 1
    if (isNumber(reader^)) then
    begin
  