1 $! make libz under VMS
\r
2 $! written by Martin P.J. Zinser <m.zinser@gsi.de>
\r
4 $! Look for the compiler used
\r
7 $ if f$getsyi("HW_MODEL").ge.1024
\r
9 $ ccopt = "/prefix=all"+ccopt
\r
10 $ comp = "__decc__=1"
\r
11 $ if f$trnlnm("SYS").eqs."" then define sys sys$library:
\r
13 $ if f$search("SYS$SYSTEM:DECC$COMPILER.EXE").eqs.""
\r
15 $ comp = "__vaxc__=1"
\r
16 $ if f$trnlnm("SYS").eqs."" then define sys sys$library:
\r
18 $ if f$trnlnm("SYS").eqs."" then define sys decc$library_include:
\r
19 $ ccopt = "/decc/prefix=all"+ccopt
\r
20 $ comp = "__decc__=1"
\r
24 $! Build the thing plain or with mms
\r
26 $ write sys$output "Compiling Zlib sources ..."
\r
27 $ if f$search("SYS$SYSTEM:MMS.EXE").eqs.""
\r
29 $ dele example.obj;*,minigzip.obj;*
\r
30 $ CALL MAKE adler32.OBJ "CC ''CCOPT' adler32" -
\r
31 adler32.c zlib.h zconf.h
\r
32 $ CALL MAKE compress.OBJ "CC ''CCOPT' compress" -
\r
33 compress.c zlib.h zconf.h
\r
34 $ CALL MAKE crc32.OBJ "CC ''CCOPT' crc32" -
\r
35 crc32.c zlib.h zconf.h
\r
36 $ CALL MAKE deflate.OBJ "CC ''CCOPT' deflate" -
\r
37 deflate.c deflate.h zutil.h zlib.h zconf.h
\r
38 $ CALL MAKE gzio.OBJ "CC ''CCOPT' gzio" -
\r
39 gzio.c zutil.h zlib.h zconf.h
\r
40 $ CALL MAKE infblock.OBJ "CC ''CCOPT' infblock" -
\r
41 infblock.c zutil.h zlib.h zconf.h infblock.h
\r
42 $ CALL MAKE infcodes.OBJ "CC ''CCOPT' infcodes" -
\r
43 infcodes.c zutil.h zlib.h zconf.h inftrees.h
\r
44 $ CALL MAKE inffast.OBJ "CC ''CCOPT' inffast" -
\r
45 inffast.c zutil.h zlib.h zconf.h inffast.h
\r
46 $ CALL MAKE inflate.OBJ "CC ''CCOPT' inflate" -
\r
47 inflate.c zutil.h zlib.h zconf.h infblock.h
\r
48 $ CALL MAKE inftrees.OBJ "CC ''CCOPT' inftrees" -
\r
49 inftrees.c zutil.h zlib.h zconf.h inftrees.h
\r
50 $ CALL MAKE infutil.OBJ "CC ''CCOPT' infutil" -
\r
51 infutil.c zutil.h zlib.h zconf.h inftrees.h infutil.h
\r
52 $ CALL MAKE trees.OBJ "CC ''CCOPT' trees" -
\r
53 trees.c deflate.h zutil.h zlib.h zconf.h
\r
54 $ CALL MAKE uncompr.OBJ "CC ''CCOPT' uncompr" -
\r
55 uncompr.c zlib.h zconf.h
\r
56 $ CALL MAKE zutil.OBJ "CC ''CCOPT' zutil" -
\r
57 zutil.c zutil.h zlib.h zconf.h
\r
58 $ write sys$output "Building Zlib ..."
\r
59 $ CALL MAKE libz.OLB "lib/crea libz.olb *.obj" *.OBJ
\r
60 $ write sys$output "Building example..."
\r
61 $ CALL MAKE example.OBJ "CC ''CCOPT' example" -
\r
62 example.c zlib.h zconf.h
\r
63 $ call make example.exe "LINK example,libz.olb/lib" example.obj libz.olb
\r
64 $ write sys$output "Building minigzip..."
\r
65 $ CALL MAKE minigzip.OBJ "CC ''CCOPT' minigzip" -
\r
66 minigzip.c zlib.h zconf.h
\r
67 $ call make minigzip.exe -
\r
68 "LINK minigzip,libz.olb/lib,x11vms:xvmsutils.olb/lib" -
\r
69 minigzip.obj libz.olb
\r
71 $ mms/macro=('comp')
\r
73 $ write sys$output "Zlib build completed"
\r
77 $MAKE: SUBROUTINE !SUBROUTINE TO CHECK DEPENDENCIES
\r
79 $! P1 = What we are trying to make
\r
80 $! P2 = Command to make it
\r
81 $! P3 - P8 What it depends on
\r
83 $ If F$Search(P1) .Eqs. "" Then Goto Makeit
\r
84 $ Time = F$CvTime(F$File(P1,"RDT"))
\r
88 $ If Argument .Eqs. "" Then Goto Exit
\r
91 $ File = F$Element(El," ",Argument)
\r
92 $ If File .Eqs. " " Then Goto Endl
\r
96 $ AFile = F$Search(File)
\r
97 $ If AFile .Eqs. "" .Or. AFile .Eqs. OFile Then Goto NextEl
\r
98 $ If F$CvTime(F$File(AFile,"RDT")) .Ges. Time Then Goto Makeit
\r
105 $ If arg .Le. 8 Then Goto Loop
\r
110 $ write sys$output P2
\r
114 $ If V Then Set Verify
\r