From 77b47d55f14be032c0ee10da44bbe7591be0abd8 Mon Sep 17 00:00:00 2001
From: Mark Adler <madler@alumni.caltech.edu>
Date: Fri, 7 Oct 2011 23:00:42 -0700
Subject: Add undocumented inflateResetKeep() function for CAB file decoding.
The Microsoft CAB file format compresses each block with completed
deflate streams that depend on the sliding window history of the
previous block in order to decode. inflateResetKeep() does what
inflateReset() does, except the sliding window history from the
previous inflate operation is retained.
---
as400/bndsrc | 1 +
as400/zlib.inc | 4 ++++
2 files changed, 5 insertions(+)
(limited to 'as400')
diff --git a/as400/bndsrc b/as400/bndsrc
index dad2bc9..036cd63 100644
--- a/as400/bndsrc
+++ b/as400/bndsrc
@@ -180,5 +180,6 @@ STRPGMEXP PGMLVL(*CURRENT) SIGNATURE('ZLIB')
EXPORT SYMBOL("inflatePrime")
EXPORT SYMBOL("inflateReset2")
EXPORT SYMBOL("inflateUndermine")
+ EXPORT SYMBOL("inflateResetKeep")
ENDPGMEXP
diff --git a/as400/zlib.inc b/as400/zlib.inc
index 41ff616..976dca2 100644
--- a/as400/zlib.inc
+++ b/as400/zlib.inc
@@ -431,6 +431,10 @@
D strm like(z_stream) Expansion stream
D arg 10I 0 value Error code
*
+ D inflateResetKeep...
+ D PR 10I 0 extproc('inflateResetKeep') End and init. stream
+ D strm like(z_stream) Expansion stream
+ *
D gzflags PR 10U 0 extproc('gzflags')
*
/endif
--
cgit v1.2.3-55-g6feb