| 1 |
$ if f$search("ioapi.h_orig") .eqs. "" then copy ioapi.h ioapi.h_orig
|
| 2 |
$ open/write zdef vmsdefs.h
|
| 3 |
$ copy sys$input: zdef
|
| 4 |
$ deck
|
| 5 |
#define unix
|
| 6 |
#define fill_zlib_filefunc64_32_def_from_filefunc32 fillzffunc64from
|
| 7 |
#define Write_Zip64EndOfCentralDirectoryLocator Write_Zip64EoDLocator
|
| 8 |
#define Write_Zip64EndOfCentralDirectoryRecord Write_Zip64EoDRecord
|
| 9 |
#define Write_EndOfCentralDirectoryRecord Write_EoDRecord
|
| 10 |
$ eod
|
| 11 |
$ close zdef
|
| 12 |
$ copy vmsdefs.h,ioapi.h_orig ioapi.h
|
| 13 |
$ cc/include=[--]/prefix=all ioapi.c
|
| 14 |
$ cc/include=[--]/prefix=all miniunz.c
|
| 15 |
$ cc/include=[--]/prefix=all unzip.c
|
| 16 |
$ cc/include=[--]/prefix=all minizip.c
|
| 17 |
$ cc/include=[--]/prefix=all zip.c
|
| 18 |
$ link miniunz,unzip,ioapi,[--]libz.olb/lib
|
| 19 |
$ link minizip,zip,ioapi,[--]libz.olb/lib
|
| 20 |
$ mcr []minizip test minizip_info.txt
|
| 21 |
$ mcr []miniunz -l test.zip
|
| 22 |
$ rename minizip_info.txt; minizip_info.txt_old
|
| 23 |
$ mcr []miniunz test.zip
|
| 24 |
$ delete test.zip;*
|
| 25 |
$exit
|