anchor.diff:  
   procedure TTestsFromLibGit2.query_details_test_0402;
   const
  -   commit_ids: array[0..5] of string = (
  +   commit_ids: array[0..5] of AnsiString = (
         'a4a7dce85cf63874e984719f4fdd239f5145052f', { 0 }
         '9fd738e8f7967c078dceed8190330fc8648ee56a', { 1 }
         '4a202b346bb0fb0db7eff3cffeb3c70babbd2045', { 2 }
  
positive.code:    TArray6 = array[0..5] of Integer;
  const
     commit_head = 'a4a7dce85cf63874e984719f4fdd239f5145052f';
     commit_ids: array[0..5] of string = (
        'a4a7dce85cf63874e984719f4fdd239f5145052f', { 0 }
        '9fd738e8f7967c078dceed8190330fc8648ee56a', { 1 }
        '4a202b346bb0fb0db7eff3cffeb3c70babbd2045', { 2 }
  
negative.code: 
  function REPOSITORY_FOLDER: PAnsiChar;
  begin
     Result := PAnsiChar(AnsiString(ExtractFilePath(ParamStr(0)) + REPOSITORY_FOLDER_));
  end;
  
  function git_oid_cmp(const a, b: Pgit_oid): Integer;
  