| 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 |