]>
Commit | Line | Data |
---|---|---|
eee7810f KR |
1 | #!/bin/sh |
2 | ||
3 | cat << 'EOF' | |
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")' | |
7 | $! | |
8 | $! Command file to build a GNU assembler on VMS | |
9 | $! | |
10 | $! If you are using a version of GCC that supports global constants | |
11 | $! you should remove the define="const=" from the gcc lines. | |
12 | $! | |
13 | $! Caution: Versions 1.38.1 and earlier had a bug in the handling of | |
14 | $! some static constants. If you are using such a version of the | |
15 | $! assembler, and you wish to compile without the "const=" hack, | |
16 | $! you should first build this version *with* the "const=" | |
17 | $! definition, and then use that assembler to rebuild it without the | |
18 | $! "const=" definition. Failure to do this will result in an assembler | |
19 | $! that will mung floating point constants. | |
20 | $! | |
21 | $! Note: The version of gas shipped on the GCC VMS tapes has been patched | |
22 | $! to fix the above mentioned bug. | |
23 | $! | |
24 | $ write sys$output "If this assembler is going to be used with GCC 1.n, you" | |
25 | $ write sys$Output "need to modify the driver to supply the -1 switch to gas." | |
26 | $ write sys$output "This is required because of a small change in how global" | |
27 | $ write sys$Output "constant variables are handled. Failure to include this" | |
28 | $ write sys$output "will result in linker warning messages about mismatched | |
29 | $ write sys$output "psect attributes." | |
30 | $! | |
31 | $ C_DEFS :="""VMS""" | |
32 | $! C_DEFS :="""VMS""","""const=""" | |
33 | $ C_INCLUDES :=/include=([],[.config],[-.include],[-.include.aout]) | |
34 | $ C_FLAGS := /debug 'c_includes' | |
35 | $! | |
36 | $! | |
37 | $ if "''p1'" .eqs. "LINK" then goto Link | |
38 | $! | |
39 | $! This helps gcc 1.nn find the aout/* files. | |
40 | $! | |
41 | $ aout_dev = f$parse(flnm,,,"DEVICE") | |
42 | $ tmp = aout_dev - ":" | |
43 | $if f$trnlnm(tmp).nes."" then aout_dev = f$trnlnm(tmp) | |
44 | $ aout_dir = aout_dev+f$parse(flnm,,,"DIRECTORY")' - | |
45 | - "GAS]" + "INCLUDE.AOUT.]" - "][" | |
46 | $assign 'aout_dir' aout/tran=conc | |
47 | $ opcode_dir = aout_dev+f$parse(flnm,,,"DIRECTORY")' - | |
48 | - "GAS]" + "INCLUDE.OPCODE.]" - "][" | |
49 | $assign 'opcode_dir' opcode/tran=conc | |
50 | $! | |
51 | EOF | |
52 | ||
53 | cfiles="`echo $* | sed -e 's/\.o/.c/g' -e 's!../\([^ /]*\)/\([^ /]*\.c\)![-.\1]\2!g'`" | |
54 | ||
55 | for cfile in $cfiles ; do | |
eee7810f | 56 | case $cfile in |
c92d9ee9 KR |
57 | "[-."*) |
58 | base=`echo $cfile | sed -e 's/\[.*\]//' -e 's/\.c$//'` | |
59 | echo "\$ gcc 'c_flags'/define=('C_DEFS')/object=[]$base.obj $cfile" | |
60 | ;; | |
61 | *) | |
62 | echo "\$ gcc 'c_flags'/define=('C_DEFS') $cfile" | |
63 | ;; | |
eee7810f KR |
64 | esac |
65 | done | |
66 | ||
eee7810f | 67 | cat << 'EOF' |
c92d9ee9 | 68 | $link: |
eee7810f KR |
69 | $ link/nomap/exec=gcc-as version.opt/opt+sys$input:/opt |
70 | ! | |
71 | ! Linker options file for GNU assembler | |
72 | ! | |
73 | EOF | |
74 | ||
75 | for obj in $* ; do | |
c92d9ee9 KR |
76 | # Change "foo.o" into "foo.obj". |
77 | echo ${obj}bj,- | sed 's!.*/!!g' | |
eee7810f KR |
78 | done |
79 | ||
80 | cat << 'EOF' | |
81 | gnu_cc:[000000]gcclib/lib,sys$share:vaxcrtl/lib | |
c92d9ee9 KR |
82 | ! Tell linker exactly what psect attributes we want -- match VAXCRTL. |
83 | psect_addr=ENVIRON,long,pic,ovr,rel,gbl,noshr,noexe,rd,wrt | |
eee7810f | 84 | EOF |