anchor.diff:      { There may only be AB_TAR_RECORDSIZE-1 bytes if this is the last rounded header }
       GetMem(PHeader, AB_TAR_RECORDSIZE);
       FTarHeaderList.Insert(J+I, PHeader);
  -    FTarHeaderTypeList.Insert(J+I, Pointer(MD_DATA_HEADER));{ We are adding MD Data headers here }
  +    FTarHeaderTypeList.Insert(J+I, MD_DATA_HEADER);{ We are adding MD Data headers here }
       Move(pBytes[0], PHeader^, AB_TAR_RECORDSIZE);
       if Length(pBytes) >= AB_TAR_RECORDSIZE then
         Delete(pBytes, 0, AB_TAR_RECORDSIZE);{ Crop string }
  
positive.code: interface
  
  uses
    Classes,
    AbUtils, AbArcTyp;
  
  const
    AB_TAR_RECORDSIZE  = 512; {Note: SizeOf(TAbTarHeaderRec) = AB_TAR_RECORDSIZE}
  
negative.code:   { Make an L/K header }
    GetMem(PHeader, AB_TAR_RECORDSIZE);
    FTarHeaderList.Insert(I, PHeader);{ Insert: Inserts at base index }
    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 }
  