anchor.diff:    SetModTime(AbLocalDateTimeToUnixTime(Value));    // also updates headers
   end;
   
  -procedure TAbTarItem.SetLinkFlag(Value: AnsiChar);
  +procedure TAbTarItem.SetLinkFlag(Value: Byte);
   begin
     if FTarItem.ItemReadOnly then
       Exit;
  
positive.code:       while not FoundMetaDataHeader and (I <= (FTarHeaderList.Count - 1)) do
        begin
          PHeader := FTarHeaderList.Items[I];
          if PHeader.LinkFlag in [AB_TAR_LF_LONGLINK] then
          begin  { Delete this Header, and the data Headers. }
            FoundMetaDataHeader := True;
            TotalOldNumHeaders := Ceil( OctalToInt(PHeader.Size, SizeOf(PHeader.Size)) / AB_TAR_RECORDSIZE);
  
negative.code:   GroupID := 0;
    UncompressedSize := 0;
    { ModTime }
    LinkFlag := Ord(AB_TAR_LF_OLDNORMAL);
    { Link Name }
    PTarHeader.Magic.gnuOld := AB_TAR_MAGIC_V7_NONE; { Default to GNU type }
    UserName := '';
  