diff options
author | tiemann <tiemann@138bc75d-0d04-0410-961f-82ee72b054a4> | 1991-12-31 22:53:17 +0000 |
---|---|---|
committer | tiemann <tiemann@138bc75d-0d04-0410-961f-82ee72b054a4> | 1991-12-31 22:53:17 +0000 |
commit | d5e7f4e9f6f420ef928d847b4a039eee951b1374 (patch) | |
tree | e00c2f0cce4ffb6b69ab8c25f5fb246865156819 /gcc/vmsconfig.com | |
parent | f3919e1665efe61923a998a12f3839fd427fc492 (diff) | |
download | gcc-d5e7f4e9f6f420ef928d847b4a039eee951b1374.tar.gz |
Initial revision
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@150 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/vmsconfig.com')
-rw-r--r-- | gcc/vmsconfig.com | 61 |
1 files changed, 61 insertions, 0 deletions
diff --git a/gcc/vmsconfig.com b/gcc/vmsconfig.com new file mode 100644 index 00000000000..3836e2fdebf --- /dev/null +++ b/gcc/vmsconfig.com @@ -0,0 +1,61 @@ +$ ! +$ ! Set up to compile GCC on VMS +$ ! +$ echo = "write sys$output" +$ ! +$ if f$search("config.h") .nes. "" then delete config.h.* +$ copy [.config]xm-vms.h []config.h +$ echo "Linked `config.h' to `[.config]xm-vms.h'. +$ ! +$ if f$search("tm.h") .nes. "" then delete tm.h.* +$ copy [.config]vms.h []tm.h +$ echo "Linked `tm.h' to `[.config]vms.h'. +$ ! +$ if f$search("md.") .nes. "" then delete md..* +$ copy [.config]vax.md []md. +$ echo "Linked `md' to `[.config]vax.md'. +$ ! +$ if f$search("aux-output.c") .nes. "" then delete aux-output.c.* +$ copy [.config]vax.c []aux-output.c +$ echo "Linked `aux-output.c' to `[.config]vax.c'. +$ ! +$! +$! +$! Create the file version.opt, which helps identify the executable. +$! +$search version.c version_string,"="/match=and/output=t.tmp +$open ifile$ t.tmp +$read ifile$ line +$close ifile$ +$delete/nolog t.tmp; +$ijk=f$locate("""",line)+1 +$line=f$extract(ijk,f$length(line)-ijk,line) +$ijk=f$locate("""",line) +$line=f$extract(0,ijk,line) +$ijk=f$locate("\n",line) +$line=f$extract(0,ijk,line) +$! +$i=0 +$loop: +$elm=f$element(i," ",line) +$if elm.eqs."" then goto no_ident +$if (elm.les."9").and.(elm.ges."0") then goto write_ident +$i=i+1 +$goto loop +$! +$no_ident: +$elm="?.??" +$! +$! +$write_ident: +$open ifile$ version.opt/write +$write ifile$ "ident="+""""+elm+"""" +$close ifile$ +$pur version.opt/nolog +$! +$! +$ if f$search("config.status") .nes. "" then delete config.status.* +$ open/write file config.status +$ write file "Links are now set up for use with a vax running VMS." +$ close file +$ type config.status |