diff options
| author | Richard Stallman <rms@gnu.org> | 1993-03-21 18:59:52 +0000 |
|---|---|---|
| committer | Richard Stallman <rms@gnu.org> | 1993-03-21 18:59:52 +0000 |
| commit | 5cb10f0e9753338f38f39d6e6e5317f76167b061 (patch) | |
| tree | 702d6d3abf099ca820449deadef1b7f85487f934 | |
| parent | 1bb53f1878a3a81e752e89bfc04f2e3572de892d (diff) | |
| download | gcc-5cb10f0e9753338f38f39d6e6e5317f76167b061.zip gcc-5cb10f0e9753338f38f39d6e6e5317f76167b061.tar.gz gcc-5cb10f0e9753338f38f39d6e6e5317f76167b061.tar.bz2 | |
When making tm.h from config/vax/vms.h, change
any #include "vax/*.h" directives to use native VMS file syntax.
From-SVN: r3813
| -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 6d3128e..4fe4e5e 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. |