From: Michael Tiemann <tiemann@gnu.org>
Date: Tue, 31 Dec 1991 22:53:17 +0000 (+0000)
Subject: Initial revision
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=01fa70ee7367f753ef72a51ef9e54f7bcc5f4e0c;p=gcc.git

Initial revision

From-SVN: r150
---

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