4 $
! Set the def dir to proper place
for use
in batch. Works
for interactive to.
5 $flnm = f
$enviroment("PROCEDURE") ! get current procedure name
6 $set default
'f$parse(flnm,,,"DEVICE")''f$parse(flnm,,,"DIRECTORY")'
9 $
! Command
file to build a GNU assembler on VMS
11 $
! If you are using a version of GCC that supports global constants
12 $
! you should remove the define
="const=" from the gcc lines.
14 $
! Caution
: Versions
1.38.1 and earlier had a bug
in the handling of
15 $
! some static constants. If you are using such a version of the
16 $
! assembler
, and you wish to compile without the
"const=" hack
,
17 $
! you should first build this version
*with
* the
"const="
18 $
! definition
, and
then use that assembler to rebuild it without the
19 $
! "const=" definition. Failure to
do this will result
in an assembler
20 $
! that will mung floating point constants.
22 $
! Note
: The version of gas shipped on the GCC VMS tapes has been patched
23 $
! to fix the above mentioned bug.
25 $
!The gcc-vms driver was modified to use
`-1' quite some time ago,
26 $ !so don't echo this text any more...
27 $ !write sys$output "If this assembler is going to be used with GCC 1.n, you"
28 $ !write sys$output "need to modify the driver to supply the -1 switch to gas."
29 $ !write sys$output "This is required because of a small change in how global"
30 $ !write sys$output "constant variables are handled. Failure to include this"
31 $ !write sys$output "will result in linker warning messages about mismatched
32 $ !write sys$output "psect attributes."
35 $! C_DEFS :="""VMS""","""const="""
36 $ C_INCLUDES = "/Include=([],[.config],[-.include],[-.include.aout])"
37 $ C_FLAGS = "/noVerbose/Debug" + c_includes
40 $ on error then goto bail
41 $ if f$search("[-.libiberty]liberty.olb").eqs.""
42 $ then @[-.libiberty]vmsbuild.com
43 $ write sys$output "Now building gas."
45 $ if "''p1'" .eqs. "LINK" then goto Link
47 $! This helps gcc 1.nn find the aout/* files.
49 $ aout_dev = f$parse(flnm,,,"DEVICE")
50 $ tmp = aout_dev - ":"
51 $if f$trnlnm(tmp).nes."" then aout_dev = f$trnlnm(tmp)
52 $ aout_dir = aout_dev+f$parse(flnm,,,"DIRECTORY")' -
53 - "GAS]" + "INCLUDE.AOUT.]" - "]["
54 $assign 'aout_dir' aout/tran=conc
55 $ opcode_dir = aout_dev+f$parse(flnm,,,"DIRECTORY")' -
56 - "GAS]" + "INCLUDE.OPCODE.]" - "]["
57 $assign 'opcode_dir' opcode/tran=conc
63 cfiles="`echo $
* |
sed -e 's/\.o/.c/g' -e 's!../\([^ /]*\)/\([^ /]*\.c\)![-.\1]\2!g'`"
65 for cfile in $cfiles ; do
68 base=`echo $cfile |
sed -e 's/\[.*\]//' -e 's/\.c$//'`
69 echo "\$ gcc 'c_flags'/Define=('C_DEFS')/Object=[]$base.obj $cfile"
72 echo "\$ gcc 'c_flags'/Define=('C_DEFS') $cfile"
80 $ set verify=(Proc,noImag)
81 $ link/noMap/Exec=gcc-as version.opt/Opt+sys$input:/Opt
83 ! Linker options file for GNU assembler
88 # Change "foo.o" into "foo.obj".
89 echo ${obj}bj,- | sed 's!.*/!!g'
93 [-.libiberty]liberty.olb/Lib
94 gnu_cc:[000000]gcclib.olb/Lib,sys$library:vaxcrtl.olb/Lib
95 ! Tell linker exactly what psect attributes we want -- match VAXCRTL.
96 psect_attr=ENVIRON,long,pic,ovr,rel,gbl,noshr,noexe,rd,wrt
98 $bail: exit $status + 0*f$verify(v) !'f$verify(0)'