aboutsummaryrefslogtreecommitdiff
path: root/as400
diff options
context:
space:
mode:
authorMark Adler <madler@alumni.caltech.edu>2012-02-18 14:10:20 -0800
committerMark Adler <madler@alumni.caltech.edu>2012-02-18 14:15:17 -0800
commitd81e7213b7c5756e8f82af2f2d9649d49112e8d7 (patch)
tree4d1bd5d23a5beb3ef529d08c68208568c93577cf /as400
parent6838df92460eaceaaadd0f13aaea248a6b7c0a1b (diff)
downloadzlib-d81e7213b7c5756e8f82af2f2d9649d49112e8d7.tar.gz
zlib-d81e7213b7c5756e8f82af2f2d9649d49112e8d7.tar.bz2
zlib-d81e7213b7c5756e8f82af2f2d9649d49112e8d7.zip
Restore gzgetc_ for backward compatibility with 1.2.6.
Diffstat (limited to 'as400')
-rw-r--r--as400/bndsrc6
-rw-r--r--as400/zlib.inc3
2 files changed, 9 insertions, 0 deletions
diff --git a/as400/bndsrc b/as400/bndsrc
index da6eaa6..52cc661 100644
--- a/as400/bndsrc
+++ b/as400/bndsrc
@@ -191,6 +191,12 @@ STRPGMEXP PGMLVL(*CURRENT) SIGNATURE('ZLIB')
191 EXPORT SYMBOL("deflatePending") 191 EXPORT SYMBOL("deflatePending")
192 192
193/********************************************************************/ 193/********************************************************************/
194/* *MODULE GZWRITE ZLIB 01/02/01 00:15:09 */
195/********************************************************************/
196
197 EXPORT SYMBOL("gzgetc_")
198
199/********************************************************************/
194/* *MODULE INFLATE ZLIB 01/02/01 00:15:09 */ 200/* *MODULE INFLATE ZLIB 01/02/01 00:15:09 */
195/********************************************************************/ 201/********************************************************************/
196 202
diff --git a/as400/zlib.inc b/as400/zlib.inc
index e22ee4f..747c598 100644
--- a/as400/zlib.inc
+++ b/as400/zlib.inc
@@ -189,6 +189,9 @@
189 D gzgetc PR 10i 0 extproc('gzgetc') 189 D gzgetc PR 10i 0 extproc('gzgetc')
190 D file value like(gzFile) File pointer 190 D file value like(gzFile) File pointer
191 * 191 *
192 D gzgetc_ PR 10i 0 extproc('gzgetc_')
193 D file value like(gzFile) File pointer
194 *
192 D gzungetc PR 10i 0 extproc('gzungetc') 195 D gzungetc PR 10i 0 extproc('gzungetc')
193 D c 10I 0 value Character to push 196 D c 10I 0 value Character to push
194 D file value like(gzFile) File pointer 197 D file value like(gzFile) File pointer