anchor.diff:    { Make an L/K header }
     GetMem(PHeader, AB_TAR_RECORDSIZE);
     FTarHeaderList.Insert(I, PHeader);{ Insert: Inserts at base index }
  -  FTarHeaderTypeList.Insert(I, Pointer( META_DATA_HEADER));{ This is the L/K Header }
  +  FTarHeaderTypeList.Insert(I, META_DATA_HEADER);{ This is the L/K Header }
     FillChar(PHeader^, AB_TAR_RECORDSIZE, #0); { Zero the whole block }
     TAbBytes.StrPCopy(@PHeader.Name, AB_TAR_L_HDR_NAME); { Stuff L/K String Name }
     TAbBytes.StrPCopy(@PHeader.Mode, AB_TAR_L_HDR_ARR8_0); { Stuff zeros }
  
positive.code:       FTarItem.ItemType := SUPPORTED_ITEM;
        if FTarItem.ItemReadOnly then            { Since some of the Headers are read only. }
          FTarItem.ItemType := UNSUPPORTED_ITEM; { This Item is unsupported }
        FTarHeaderTypeList.Add(Pointer(FILE_HEADER));
      end
      else if CharInSet(Chr(PTarHeader.LinkFlag), AB_UNSUPPORTED_F_HEADERS) then
      begin { This Header type is in the Set of unsupported File type Headers }
        FoundItem := True; { Exit Criterion }
        FTarItem.ItemType := UNSUPPORTED_ITEM;
        FTarHeaderTypeList.Add(Pointer(FILE_HEADER));
      end
      else { These are unknown header types }
      begin { Note: Some of these unknown types could have known Meta-data headers }
        FoundItem := True;
        FTarItem.ItemType := UNKNOWN_ITEM;
        FTarHeaderTypeList.Add(Pointer(UNKNOWN_HEADER));
      end;{ end LinkFlag parsing }
    end; { end Found Item While }
    { PTarHeader points to FTarHeaderList.Items[FTarHeaderList.Count-1]; }
  
negative.code: constructor TAbTarItem.Create;
  begin
    inherited Create;
    FTarHeaderList := TList<PAbTarHeaderRec>.Create;
    FTarHeaderTypeList := TList<TAbTarHeaderType>.Create;
    GetMem(PTarHeader, AB_TAR_RECORDSIZE); { PTarHeader is our new Header }
    FillChar(PTarHeader^, AB_TAR_RECORDSIZE, #0);
    FTarHeaderList.Add(PTarHeader);
    FTarHeaderTypeList.Add(FILE_HEADER);
    FTarItem.FileHeaderCount := 1;
    { set defaults }
    FTarItem.ArchiveFormat := UNKNOWN_FORMAT;
  