git-svn-id: trunk@1851 -
@@ -1,5 +1,7 @@
unit infblock;
+{$goto on}
+
{ infblock.h and
infblock.c -- interpret and process block types to last block
Copyright (C) 1995-1998 Mark Adler
@@ -945,4 +947,4 @@ begin
inflate_blocks_sync_point := integer(s.mode = LENS);
end;
-end.
+end.
unit zdeflate;
{ Orginal: deflate.h -- internal compression state
deflate.c -- compress data using the deflation algorithm
Copyright (C) 1995-1996 Jean-loup Gailly.
@@ -2115,4 +2117,4 @@ begin
deflate_slow := block_done;