Pārlūkot izejas kodu

* Correctly initialize total_out

git-svn-id: trunk@49424 -
michael 4 gadi atpakaļ
vecāks
revīzija
d23feee55e
1 mainītis faili ar 1 papildinājumiem un 0 dzēšanām
  1. 1 0
      packages/paszlib/src/gzio.pas

+ 1 - 0
packages/paszlib/src/gzio.pas

@@ -165,6 +165,7 @@ begin
   s^.crc := crc32(0, nil, 0);
   s^.crc := crc32(0, nil, 0);
   s^.msg := '';
   s^.msg := '';
   s^.transparent := false;
   s^.transparent := false;
+  s^.total_out:=0;
 
 
   s^.path := path; { limit to 255 chars }
   s^.path := path; { limit to 255 chars }