anchor.diff:      procedure SaveGzHeaderToStream(AStream : TStream);
       procedure LoadGzHeaderFromStream(AStream : TStream);
     public
  -    property CRC32 : LongInt
  -      read FCRC32 write FCRC32;
  +//    property CRC32 : LongInt
  +//      read FCRC32 write FCRC32;
   
       property CompressionMethod : Byte
         read FGZHeader.CompMethod write FGZHeader.CompMethod;
  
positive.code:       try
          try {OutStream}
            ExtractItemToStreamAt(Index, OutStream);
            {$IFDEF MSWINDOWS}
            FileSetDate(OutStream.Handle, (Longint(CurItem.LastModFileDate) shl 16)
              + CurItem.LastModFileTime);
            AbFileSetAttr(UseName, 0); {normal file}                       {!!.01}
            {$ENDIF}
  
negative.code:   inherited Create(FileName, Mode);
    FTarLoaded := False;
    FState    := gsGzip;
  // Replaced to use TFileStream instead of TabSpanStream
  // This feels like a hack to do this here.
  //  FGZStream  := FStream;  { save reference to opened file stream }
    FGZStream  := TFileStream.Create(FileName,Mode);
    fStream.Free;
    fStream    := FGZStream;
    FGZItem    := FItemList;
    FTarStream := TAbVirtualMemoryStream.Create;
    FTarList   := TAbArchiveList.Create;
  