| 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 | $v = 'f$verify(0)' |
| 8 | $! |
| 9 | $! Command file to build a GNU assembler on VMS |
| 10 | $! |
| 11 | $! If you are using a version of GCC that supports global constants |
| 12 | $! you should remove the define="const=" from the gcc lines. |
| 13 | $! |
| 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. |
| 21 | $! |
| 22 | $! Note: The version of gas shipped on the GCC VMS tapes has been patched |
| 23 | $! to fix the above mentioned bug. |
| 24 | $! |
| 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." |
| 33 | $! |
| 34 | $ C_DEFS :="""VMS""" |
| 35 | $! C_DEFS :="""VMS""","""const=""" |
| 36 | $ C_INCLUDES = "/Include=([],[.config],[-.include],[-.include.aout])" |
| 37 | $ C_FLAGS = "/noVerbose/Debug" + c_includes |
| 38 | $! |
| 39 | $! |
| 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." |
| 44 | $ endif |
| 45 | $ if "''p1'" .eqs. "LINK" then goto Link |
| 46 | $! |
| 47 | $! This helps gcc 1.nn find the aout/* files. |
| 48 | $! |
| 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 |
| 58 | $! |
| 59 | $ set verify |
| 60 | $! |
| 61 | EOF |
| 62 | |
| 63 | cfiles="`echo $* | sed -e 's/\.o/.c/g' -e 's!../\([^ /]*\)/\([^ /]*\.c\)![-.\1]\2!g'`" |
| 64 | |
| 65 | for cfile in $cfiles ; do |
| 66 | case $cfile in |
| 67 | "[-."*) |
| 68 | base=`echo $cfile | sed -e 's/\[.*\]//' -e 's/\.c$//'` |
| 69 | echo "\$ gcc 'c_flags'/Define=('C_DEFS')/Object=[]$base.obj $cfile" |
| 70 | ;; |
| 71 | *) |
| 72 | echo "\$ gcc 'c_flags'/Define=('C_DEFS') $cfile" |
| 73 | ;; |
| 74 | esac |
| 75 | done |
| 76 | |
| 77 | cat << 'EOF' |
| 78 | $link: |
| 79 | $!'f$verify(0)' |
| 80 | $ set verify=(Proc,noImag) |
| 81 | $ link/noMap/Exec=gcc-as version.opt/Opt+sys$input:/Opt |
| 82 | ! |
| 83 | ! Linker options file for GNU assembler |
| 84 | ! |
| 85 | EOF |
| 86 | |
| 87 | for obj in $* ; do |
| 88 | # Change "foo.o" into "foo.obj". |
| 89 | echo ${obj}bj,- | sed 's!.*/!!g' |
| 90 | done |
| 91 | |
| 92 | cat << 'EOF' |
| 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 |
| 97 | $! |
| 98 | $bail: exit $status + 0*f$verify(v) !'f$verify(0)' |
| 99 | EOF |