1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
|
$!****************************************************************************
$!****************************************************************************
$!
$! ARCHIVE HEADER INFORMATION
$!
$! @VAX-VMS-shell-file{
$! FILENAME = "vmsbuild.com",
$! VERSION = "1.00",
$! DATE = "",
$! TIME = "",
$!
$! AUTHOR = "Niel Kempson",
$! ADDRESS = "25 Whitethorn Drive, Cheltenham, GL52 5LL, England",
$! TELEPHONE = "+44-242 579105",
$! EMAIL = "kempson@tex.ac.uk (Internet)",
$!
$! SUPPORTED = "yes",
$! ARCHIVED = "tex.ac.uk, ftp.tex.ac.uk",
$! KEYWORDS = "VVcode",
$!
$! CODETABLE = "ISO/ASCII",
$! CHECKSUM = "51492 1481 5732 57976",
$!
$! DOCSTRING = { This is a simple VMS command procedure to build
$! VVcode.
$! }
$! }
$!
$! MODULE CONTENTS
$!
$! [tbs]
$!
$! COPYRIGHT
$!
$! Copyright (c) 1991-1993 by Niel Kempson <kempson@tex.ac.uk>
$!
$! This program is free software; you can redistribute it and/or
$! modify it under the terms of the GNU General Public License as
$! published by the Free Software Foundation; either version 1, or
$! (at your option) any later version.
$!
$! This program is distributed in the hope that it will be useful,
$! but WITHOUT ANY WARRANTY; without even the implied warranty of
$! MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
$! General Public License for more details.
$!
$! You should have received a copy of the GNU General Public License
$! along with this program; if not, write to the Free Software
$! Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
$!
$! In other words, you are welcome to use, share and improve this
$! program. You are forbidden to forbid anyone else to use, share
$! and improve what you give them. Help stamp out software-hoarding!
$!
$! CHANGE LOG
$!
$!****************************************************************************
$!****************************************************************************
$ ON ERROR THEN $ GOTO Exit_Label
$ ver_state = F$VERIFY (0)
$ WSO = "WRITE SYS$OUTPUT"
$!
$!----------------------------------------------------------------------------
$!
$! Local definitions for file types and compilation / linking.
$!
$! Customize compiler & linker qualifiers here (e.g. to build a debugging
$! version or to use GNU C).
$!
$!----------------------------------------------------------------------------
$ COMPILER = "CC"
$ CCFLAGS = "/WARNINGS /STANDARD=PORTABLE"
$ LINKFLAGS = "/TRACEBACK /NODEBUG"
$!
$!----------------------------------------------------------------------------
$! Allow an optional parameter "LINKONLY".
$!----------------------------------------------------------------------------
$ IF P1 .EQS. "LINKONLY"
$ THEN
$ SET VERIFY
$ GOTO Link_Stage
$ ENDIF
$!
$!----------------------------------------------------------------------------
$! End of local definitions.
$!----------------------------------------------------------------------------
$ WSO "Starting to build VVcode at ''F$TIME()'"
$ SET VERIFY
$ 'COMPILER' 'CCFLAGS' vvdecode.c
$ 'COMPILER' 'CCFLAGS' vvencode.c
$ 'COMPILER' 'CCFLAGS' vveparse.c
$ 'COMPILER' 'CCFLAGS' vvutils.c
$ 'COMPILER' 'CCFLAGS' vaxvms.c
$!
$!----------------------------------------------------------------------------
$! All modules have been compiled so link them together.
$!----------------------------------------------------------------------------
$Link_Stage:
$ LINK 'LINKFLAGS' vvencode.obj, vvutils.obj, vaxvms.obj, -
SYS$INPUT: /OPTIONS
SYS$LIBRARY:VAXCRTL /SHAREABLE
$!----------------------------------------------------------------------------
$ LINK 'LINKFLAGS' vvdecode.obj, vveparse.obj, vvutils.obj, -
vaxvms.obj, SYS$INPUT: /OPTIONS
SYS$LIBRARY:VAXCRTL /SHAREABLE
$!----------------------------------------------------------------------------
$ SET NOVERIFY
$ WSO "VVcode built at ''F$TIME()'"
$!
$!----------------------------------------------------------------------------
$! We should always exit the command procedure here. If we came here as the
$! result of an error, return the error status on exit.
$!----------------------------------------------------------------------------
$Exit_Label:
$ save_status = $STATUS
$ IF ver_state
$ THEN
$ SET VERIFY
$ ENDIF
$ EXIT 'save_status'
|
