diff options
Diffstat (limited to '')
| -rw-r--r-- | as400/bndsrc | 3 | ||||
| -rw-r--r-- | as400/zlib.inc | 13 |
2 files changed, 15 insertions, 1 deletions
diff --git a/as400/bndsrc b/as400/bndsrc index 06c3f43..dad2bc9 100644 --- a/as400/bndsrc +++ b/as400/bndsrc | |||
| @@ -52,7 +52,6 @@ STRPGMEXP PGMLVL(*CURRENT) SIGNATURE('ZLIB') | |||
| 52 | EXPORT SYMBOL("gzputs") | 52 | EXPORT SYMBOL("gzputs") |
| 53 | EXPORT SYMBOL("gzgets") | 53 | EXPORT SYMBOL("gzgets") |
| 54 | EXPORT SYMBOL("gzputc") | 54 | EXPORT SYMBOL("gzputc") |
| 55 | EXPORT SYMBOL("gzgetc") | ||
| 56 | EXPORT SYMBOL("gzflush") | 55 | EXPORT SYMBOL("gzflush") |
| 57 | EXPORT SYMBOL("gzseek") | 56 | EXPORT SYMBOL("gzseek") |
| 58 | EXPORT SYMBOL("gzrewind") | 57 | EXPORT SYMBOL("gzrewind") |
| @@ -170,6 +169,8 @@ STRPGMEXP PGMLVL(*CURRENT) SIGNATURE('ZLIB') | |||
| 170 | /********************************************************************/ | 169 | /********************************************************************/ |
| 171 | 170 | ||
| 172 | EXPORT SYMBOL("gzclose_w") | 171 | EXPORT SYMBOL("gzclose_w") |
| 172 | EXPORT SYMBOL("gzgetc_") | ||
| 173 | EXPORT SYMBOL("gzflags") | ||
| 173 | 174 | ||
| 174 | /********************************************************************/ | 175 | /********************************************************************/ |
| 175 | /* *MODULE INFLATE ZLIB 01/02/01 00:15:09 */ | 176 | /* *MODULE INFLATE ZLIB 01/02/01 00:15:09 */ |
diff --git a/as400/zlib.inc b/as400/zlib.inc index 71b0e56..41ff616 100644 --- a/as400/zlib.inc +++ b/as400/zlib.inc | |||
| @@ -182,6 +182,17 @@ | |||
| 182 | D buf 32767 options(*varsize) Read buffer | 182 | D buf 32767 options(*varsize) Read buffer |
| 183 | D len 10i 0 value Buffer length | 183 | D len 10i 0 value Buffer length |
| 184 | * | 184 | * |
| 185 | D gzputc PR 10i 0 extproc('gzputc') | ||
| 186 | D file value like(gzFile) File pointer | ||
| 187 | D c 10I 0 value Character to write | ||
| 188 | * | ||
| 189 | D gzgetc_ PR 10i 0 extproc('gzgetc_') | ||
| 190 | D file value like(gzFile) File pointer | ||
| 191 | * | ||
| 192 | D gzungetc PR 10i 0 extproc('gzungetc') | ||
| 193 | D c 10I 0 value Character to push | ||
| 194 | D file value like(gzFile) File pointer | ||
| 195 | * | ||
| 185 | D gzflush PR 10i 0 extproc('gzflush') | 196 | D gzflush PR 10i 0 extproc('gzflush') |
| 186 | D file value like(gzFile) File pointer | 197 | D file value like(gzFile) File pointer |
| 187 | D flush 10I 0 value Type of flush | 198 | D flush 10I 0 value Type of flush |
| @@ -420,4 +431,6 @@ | |||
| 420 | D strm like(z_stream) Expansion stream | 431 | D strm like(z_stream) Expansion stream |
| 421 | D arg 10I 0 value Error code | 432 | D arg 10I 0 value Error code |
| 422 | * | 433 | * |
| 434 | D gzflags PR 10U 0 extproc('gzflags') | ||
| 435 | * | ||
| 423 | /endif | 436 | /endif |