anchor.diff:  
   implementation
   
  +(*
   function SReplaceParts(const S: string; const Decode: array of TStringReplacePart): string;
   var
     i, j: Integer;
  
positive.code:       Str: string;
      end;
  function SRegexFindParts(const ARegex, AStr: string; out AParts: TRegexParts): boolean;
  
  function SEscapeForPython(const Str: string): string;
  function SStringToPythonString(const Str: string; AndQuote: boolean=true): string;
  
  procedure SLoadStringsFromFile(cfg: TJsonConfig; const path: string; List: TStrings; MaxItems: integer);
  
negative.code:   ATSynEdit_RegExpr,
    ec_RegExpr;
  
  {
  type
    TStringReplacePart = record
      SFrom, STo: string;
    end;
  }
  
  function STextWholeWordSelection(const S: UnicodeString; OffsetBegin, OffsetEnd: integer;
    const ANonWordChars: UnicodeString): boolean;
  