summaryrefslogtreecommitdiff
path: root/make_vms.com
diff options
context:
space:
mode:
authorMark Adler <madler@alumni.caltech.edu>2011-09-09 23:24:33 -0700
committerMark Adler <madler@alumni.caltech.edu>2011-09-09 23:24:33 -0700
commit0484693e1723bbab791c56f95597bd7dbe867d03 (patch)
tree8f31dbed98b4390da74a90b484f2accf8f8a3a8e /make_vms.com
parent9811b53dd9e8f67015c7199fff12b5bfc6965330 (diff)
downloadzlib-0484693e1723bbab791c56f95597bd7dbe867d03.tar.gz
zlib-0484693e1723bbab791c56f95597bd7dbe867d03.tar.bz2
zlib-0484693e1723bbab791c56f95597bd7dbe867d03.zip
zlib 1.2.2.2v1.2.2.2
Diffstat (limited to 'make_vms.com')
-rw-r--r--make_vms.com114
1 files changed, 114 insertions, 0 deletions
diff --git a/make_vms.com b/make_vms.com
new file mode 100644
index 0000000..e6587cd
--- /dev/null
+++ b/make_vms.com
@@ -0,0 +1,114 @@
1$! make libz under VMS
2$! written by Martin P.J. Zinser <m.zinser@gsi.de>
3$!
4$! Look for the compiler used
5$!
6$ ccopt = ""
7$ if f$getsyi("HW_MODEL").ge.1024
8$ then
9$ ccopt = "/prefix=all"+ccopt
10$ comp = "__decc__=1"
11$ if f$trnlnm("SYS").eqs."" then define sys sys$library:
12$ else
13$ if f$search("SYS$SYSTEM:DECC$COMPILER.EXE").eqs.""
14$ then
15$ comp = "__vaxc__=1"
16$ if f$trnlnm("SYS").eqs."" then define sys sys$library:
17$ else
18$ if f$trnlnm("SYS").eqs."" then define sys decc$library_include:
19$ ccopt = "/decc/prefix=all"+ccopt
20$ comp = "__decc__=1"
21$ endif
22$ endif
23$!
24$! Build the thing plain or with mms
25$!
26$ write sys$output "Compiling Zlib sources ..."
27$ if f$search("SYS$SYSTEM:MMS.EXE").eqs.""
28$ then
29$ dele example.obj;*,minigzip.obj;*
30$ CALL MAKE adler32.OBJ "CC ''CCOPT' adler32" -
31 adler32.c zlib.h zconf.h
32$ CALL MAKE compress.OBJ "CC ''CCOPT' compress" -
33 compress.c zlib.h zconf.h
34$ CALL MAKE crc32.OBJ "CC ''CCOPT' crc32" -
35 crc32.c crc32.h zlib.h zconf.h zutil.h
36$ CALL MAKE deflate.OBJ "CC ''CCOPT' deflate" -
37 deflate.c deflate.h zutil.h zlib.h zconf.h
38$ CALL MAKE gzio.OBJ "CC ''CCOPT' gzio /define=""NO_vsnprintf""" -
39 gzio.c zutil.h zlib.h zconf.h
40$ CALL MAKE infback.OBJ "CC ''CCOPT' infback" -
41 infback.c zutil.h zlib.h zconf.h -
42 "inftrees.h inflate.h inffast.h inffixed.h"
43$ CALL MAKE inffast.OBJ "CC ''CCOPT' inffast" -
44 inffast.c zutil.h zlib.h zconf.h -
45 "inftrees.h inflate.h inffast.h"
46$ CALL MAKE inflate.OBJ "CC ''CCOPT' inflate" -
47 inflate.c zutil.h zlib.h zconf.h -
48 "inftrees.h inflate.h inffast.h inffixed.h"
49$ CALL MAKE inftrees.OBJ "CC ''CCOPT' inftrees" -
50 inftrees.c zutil.h zlib.h zconf.h inftrees.h
51$ CALL MAKE trees.OBJ "CC ''CCOPT' trees" -
52 trees.c trees.h deflate.h zutil.h zlib.h zconf.h
53$ CALL MAKE uncompr.OBJ "CC ''CCOPT' uncompr" -
54 uncompr.c zlib.h zconf.h
55$ CALL MAKE zutil.OBJ "CC ''CCOPT' zutil" -
56 zutil.c zutil.h zlib.h zconf.h
57$ write sys$output "Building Zlib ..."
58$ CALL MAKE libz.OLB "lib/crea libz.olb *.obj" *.OBJ
59$ write sys$output "Building example..."
60$ CALL MAKE example.OBJ "CC ''CCOPT' example" -
61 example.c zlib.h zconf.h
62$ call make example.exe "LINK example,libz.olb/lib" example.obj libz.olb
63$ write sys$output "Building minigzip..."
64$ CALL MAKE minigzip.OBJ "CC ''CCOPT' minigzip" -
65 minigzip.c zlib.h zconf.h
66$ call make minigzip.exe -
67 "LINK minigzip,libz.olb/lib" -
68 minigzip.obj libz.olb
69$ else
70$ mms/macro=('comp')
71$ endif
72$ write sys$output "Zlib build completed"
73$ exit
74$!
75$!
76$MAKE: SUBROUTINE !SUBROUTINE TO CHECK DEPENDENCIES
77$ V = 'F$Verify(0)
78$! P1 = What we are trying to make
79$! P2 = Command to make it
80$! P3 - P8 What it depends on
81$
82$ If F$Search(P1) .Eqs. "" Then Goto Makeit
83$ Time = F$CvTime(F$File(P1,"RDT"))
84$arg=3
85$Loop:
86$ Argument = P'arg
87$ If Argument .Eqs. "" Then Goto Exit
88$ El=0
89$Loop2:
90$ File = F$Element(El," ",Argument)
91$ If File .Eqs. " " Then Goto Endl
92$ AFile = ""
93$Loop3:
94$ OFile = AFile
95$ AFile = F$Search(File)
96$ If AFile .Eqs. "" .Or. AFile .Eqs. OFile Then Goto NextEl
97$ If F$CvTime(F$File(AFile,"RDT")) .Ges. Time Then Goto Makeit
98$ Goto Loop3
99$NextEL:
100$ El = El + 1
101$ Goto Loop2
102$EndL:
103$ arg=arg+1
104$ If arg .Le. 8 Then Goto Loop
105$ Goto Exit
106$
107$Makeit:
108$ VV=F$VERIFY(0)
109$ write sys$output P2
110$ 'P2
111$ VV='F$Verify(VV)
112$Exit:
113$ If V Then Set Verify
114$ENDSUBROUTINE