anchor.diff:  function SFindFuzzyPositions(SText, SFind: UnicodeString): TATIntArray;
   function SFindWordsInString(SText, SFind: string): boolean;
   function SRegexReplaceSubstring(const AStr, AStrFind, AStrReplace: string; AUseSubstitute: boolean): string;
  +function SRegexMatchesString(const AStr, AStrRegex: string; ACaseSensitive: boolean): boolean;
   
   function IsLexerListed(const ALexer, ANameList: string): boolean;
   function IsFilenameListedInExtensionList(const AFilename, AExtList: string): boolean;
  
positive.code:   end;
  end;
  
  
  function SReadOptionFromJson(const fn, path, def_value: string): string;
  var
  
negative.code:   end;
  end;
  
  
  initialization
    //debug
    //ShowMessage(inttostr(ord(SRegexMatchesString('wwwa--ddd', '\w+\-+\w{3}'))));
  
  end.
  
  