anchor.diff:        a_index: Int32); overload; static; inline;
   
       class function ConvertStringToBytes(const a_in: String;
  -      a_encoding: TEncoding): THashLibByteArray; overload; static; inline;
  +      a_encoding: TEncoding): THashLibByteArray; overload; static;
   
       class function ConvertHexStringToBytes(a_in: String): THashLibByteArray;
         static; inline;
  
positive.code: class function TConverters.ConvertStringToBytes(const a_in: String;
    a_encoding: TEncoding): THashLibByteArray;
  begin
    result := a_encoding.GetBytes(a_in);
  end;
  
  class function TConverters.SplitString(const S: String; Delimiter: Char)
    : THashLibStringArray;
  var
    PosStart, PosDel, SplitPoints, I, Len: Int32;
  begin
    result := Nil;
    if S <> '' then
    begin
      { Determine the length of the resulting array }
      SplitPoints := 0;
      for I := 1 to System.length(S) do
      begin
        if (Delimiter = S[I]) then
          System.Inc(SplitPoints);
  
negative.code: 
      I := 0;
      Len := System.length(Delimiter);
  {$IFDEF DELPHIXE3_UP}
      PosStart := System.Low(S);
      HighPoint := System.High(S);
  {$ELSE}
      PosStart := 1;
      HighPoint := System.length(S);
  {$ENDIF DELPHIXE3_UP}
      PosDel := System.Pos(Delimiter, S);
      while PosDel > 0 do
      begin
  