$! make libz under VMS$! written by Martin P.J. Zinser <m.zinser@gsi.de>$!$! Look for the compiler used$!$ ccopt = ""$ if f$getsyi("HW_MODEL").ge.1024$ then$  ccopt = "/prefix=all"+ccopt$  comp  = "__decc__=1"$  if f$trnlnm("SYS").eqs."" then define sys sys$library:$ else$  if f$search("SYS$SYSTEM:DECC$COMPILER.EXE").eqs.""$   then$    comp  = "__vaxc__=1"$    if f$trnlnm("SYS").eqs."" then define sys sys$library:$   else$    if f$trnlnm("SYS").eqs."" then define sys decc$library_include:$    ccopt = "/decc/prefix=all"+ccopt$    comp  = "__decc__=1"$  endif$ endif$!$! Build the thing plain or with mms$!$ write sys$output "Compiling Zlib sources ..."$ if f$search("SYS$SYSTEM:MMS.EXE").eqs.""$  then$   dele example.obj;*,minigzip.obj;*$   CALL MAKE adler32.OBJ "CC ''CCOPT' adler32" -                adler32.c zutil.h zlib.h zconf.h$   CALL MAKE compress.OBJ "CC ''CCOPT' compress" -                compress.c zlib.h zconf.h$   CALL MAKE crc32.OBJ "CC ''CCOPT' crc32" -                crc32.c zutil.h zlib.h zconf.h$   CALL MAKE deflate.OBJ "CC ''CCOPT' deflate" -                deflatec.c deflate.h zutil.h zlib.h zconf.h$   CALL MAKE gzio.OBJ "CC ''CCOPT' gzio" -                gsio.c zutil.h zlib.h zconf.h$   CALL MAKE infblock.OBJ "CC ''CCOPT' infblock" -                infblock.c zutil.h zlib.h zconf.h infblock.h$   CALL MAKE infcodes.OBJ "CC ''CCOPT' infcodes" -                infcodes.c zutil.h zlib.h zconf.h inftrees.h$   CALL MAKE inffast.OBJ "CC ''CCOPT' inffast" -                inffast.c zutil.h zlib.h zconf.h inffast.h$   CALL MAKE inflate.OBJ "CC ''CCOPT' inflate" -                inflate.c zutil.h zlib.h zconf.h infblock.h$   CALL MAKE inftrees.OBJ "CC ''CCOPT' inftrees" -                inftrees.c zutil.h zlib.h zconf.h inftrees.h$   CALL MAKE infutil.OBJ "CC ''CCOPT' infutil" -                infutil.c zutil.h zlib.h zconf.h inftrees.h infutil.h$   CALL MAKE trees.OBJ "CC ''CCOPT' trees" -                trees.c deflate.h zutil.h zlib.h zconf.h$   CALL MAKE uncompr.OBJ "CC ''CCOPT' uncompr" -                uncompr.c zlib.h zconf.h$   CALL MAKE zutil.OBJ "CC ''CCOPT' zutil" -                zutil.c zutil.h zlib.h zconf.h$   write sys$output "Building Zlib ..."$   CALL MAKE libz.OLB "lib/crea libz.olb *.obj" *.OBJ$   write sys$output "Building example..."$   CALL MAKE example.OBJ "CC ''CCOPT' example" -                example.c zlib.h zconf.h$   call make example.exe "LINK example,libz.olb/lib" example.obj libz.olb$   write sys$output "Building minigzip..."$   CALL MAKE minigzip.OBJ "CC ''CCOPT' minigzip" -                minigzip.c zlib.h zconf.h$   call make minigzip.exe -                 "LINK minigzip,libz.olb/lib,x11vms:xvmsutils.olb/lib" -                 minigzip.obj libz.olb$  else$   mms/macro=('comp')$  endif$ write sys$output "Zlib build completed"$ exit$!$!$MAKE: SUBROUTINE   !SUBROUTINE TO CHECK DEPENDENCIES$ V = 'F$Verify(0)$! P1 = What we are trying to make$! P2 = Command to make it$! P3 - P8  What it depends on$$ If F$Search(P1) .Eqs. "" Then Goto Makeit$ Time = F$CvTime(F$File(P1,"RDT"))$arg=3$Loop:$       Argument = P'arg$       If Argument .Eqs. "" Then Goto Exit$       El=0$Loop2:$       File = F$Element(El," ",Argument)$       If File .Eqs. " " Then Goto Endl$       AFile = ""$Loop3:$       OFile = AFile$       AFile = F$Search(File)$       If AFile .Eqs. "" .Or. AFile .Eqs. OFile Then Goto NextEl$       If F$CvTime(F$File(AFile,"RDT")) .Ges. Time Then Goto Makeit$       Goto Loop3$NextEL:$       El = El + 1$       Goto Loop2$EndL:$ arg=arg+1$ If arg .Le. 8 Then Goto Loop$ Goto Exit$$Makeit:$ VV=F$VERIFY(0)$ write sys$output P2$ 'P2$ VV='F$Verify(VV)$Exit:$ If V Then Set Verify$ENDSUBROUTINE