anchor.diff:      AStream.ReadBuffer(PTarHeader^, AB_TAR_RECORDSIZE);
       FTarHeaderList.Add(PTarHeader); { Store the Header to the list }
       { Parse header based on LinkFlag }
  -    if PTarHeader.LinkFlag in (AB_SUPPORTED_MD_HEADERS+AB_UNSUPPORTED_MD_HEADERS) then
  +    if CharInSet(Chr(PTarHeader.LinkFlag), AB_SUPPORTED_MD_HEADERS+AB_UNSUPPORTED_MD_HEADERS) then
       begin { This Header type is in the Set of un/supported Meta data type headers }
  -      if PTarHeader.LinkFlag in AB_UNSUPPORTED_MD_HEADERS then
  +      if CharInSet(Chr(PTarHeader.LinkFlag), AB_UNSUPPORTED_MD_HEADERS) then
           FTarItem.ItemReadOnly := True; { We don't fully support this meta-data type }
  -      if (PTarHeader.LinkFlag in AB_PAX_MD_HEADERS) and (PTarHeader.Magic.value = AB_TAR_MAGIC_VAL) then
  +      if CharInSet(Chr(PTarHeader.LinkFlag), AB_PAX_MD_HEADERS) and (PTarHeader.Magic.value = AB_TAR_MAGIC_VAL) then
           FTarItem.ArchiveFormat := POSIX_FORMAT; { We have a POSIX_FORMAT, has x headers, and Magic matches }
  -      if PTarHeader.LinkFlag in AB_GNU_MD_HEADERS then
  +      if CharInSet(Chr(PTarHeader.LinkFlag), AB_GNU_MD_HEADERS) then
           FTarItem.ArchiveFormat := OLDGNU_FORMAT; { We have a OLDGNU_FORMAT, has L/K headers }
         { There can be a unknown number of Headers of data }
         { We are for sure going to read at least one more header, but are we going to read more than that? }
  
positive.code:   GroupID := 0;
    UncompressedSize := 0;
    { ModTime }
    LinkFlag := AB_TAR_LF_OLDNORMAL;
    { Link Name }
    PTarHeader.Magic.gnuOld := AB_TAR_MAGIC_V7_NONE; { Default to GNU type }
    UserName := '';
  
negative.code:     { FTarHeaderList.Count <= 1 always }
      while (not FoundMetaDataHeader) and (I <= (FTarHeaderList.Count - 1)) do begin
        PHeader := FTarHeaderList.Items[I];
        if PHeader.LinkFlag = Ord(AB_TAR_LF_LONGNAME) then begin
          { We are growing or Shriking the Name MD Data fields.  }
          FoundMetaDataHeader := True;
          DoGNUExistingLongNameLink(AB_TAR_LF_LONGNAME, I, RawFileName);
  