diff options
| author | rms <rms@138bc75d-0d04-0410-961f-82ee72b054a4> | 1993-03-21 18:59:52 +0000 |
|---|---|---|
| committer | rms <rms@138bc75d-0d04-0410-961f-82ee72b054a4> | 1993-03-21 18:59:52 +0000 |
| commit | 556646ff1d1af58154929c8de25f6933603ef555 (patch) | |
| tree | 702d6d3abf099ca820449deadef1b7f85487f934 /gcc/vmsconfig.com | |
| parent | 88af2550005096ecfcd8cb5a57957208fe1860ca (diff) | |
| download | gcc-556646ff1d1af58154929c8de25f6933603ef555.tar.gz | |
When making tm.h from config/vax/vms.h, change
any #include "vax/*.h" directives to use native VMS file syntax.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@3813 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/vmsconfig.com')
| -rw-r--r-- | gcc/vmsconfig.com | 27 |
1 files changed, 25 insertions, 2 deletions
diff --git a/gcc/vmsconfig.com b/gcc/vmsconfig.com index 6d3128e2be1..4fe4e5ea669 100644 --- a/gcc/vmsconfig.com +++ b/gcc/vmsconfig.com @@ -30,8 +30,31 @@ $EOD $ echo "Created `hconfig.h'. $ ! $ if f$search("tm.h") .nes. "" then delete tm.h.* -$ copy [.config.vax]vms.h []tm.h -$ echo "Linked `tm.h' to `[.config.vax]vms.h'. +$!! copy [.config.vax]vms.h []tm.h +$ edit/tpu/nojournal/nosection/nodisplay/command=sys$input - + [.config.vax]vms.h /output=[]tm.h +$DECK +! +! Copy file, changing lines of the form +! #include "vax/*" +! into +! #include "[.config.vax]*" +! + file := CREATE_BUFFER("file", GET_INFO(COMMAND_LINE, "file_name")); + targ := LINE_BEGIN & '#include' & SPAN(ASCII(32)+ASCII(9)) & '"vax/'; + rang := CREATE_RANGE(BEGINNING_OF(file), END_OF(file)); + LOOP + incl := SEARCH_QUIETLY(targ, FORWARD, EXACT, rang); + EXITIF incl = 0; + POSITION(BEGINNING_OF(incl)); + ERASE(incl); + COPY_TEXT('#include "[.config.vax]'); + rang := CREATE_RANGE(END_OF(incl), END_OF(file)); + ENDLOOP; + WRITE_FILE(file, GET_INFO(COMMAND_LINE, "output_file")); + QUIT +$EOD +$ echo "Generated `tm.h' from `[.config.vax]vms.h'. $ ! $ if f$search("md.") .nes. "" then delete md..* $ copy [.config.vax]vax.md []md. |