diff options
| author | kenner <kenner@138bc75d-0d04-0410-961f-82ee72b054a4> | 1993-04-11 19:22:53 +0000 |
|---|---|---|
| committer | kenner <kenner@138bc75d-0d04-0410-961f-82ee72b054a4> | 1993-04-11 19:22:53 +0000 |
| commit | 92e425947931bc0d1caab44929db6f5bddcbc58c (patch) | |
| tree | 8359ed542b917bdf76828b71a828c6323e7ca7ee /gcc/toplev.c | |
| parent | af61660e9703bd1618892c9fe9b6f4f2f52a91ee (diff) | |
| download | ppe42-gcc-92e425947931bc0d1caab44929db6f5bddcbc58c.tar.gz ppe42-gcc-92e425947931bc0d1caab44929db6f5bddcbc58c.zip | |
(strip_off_ending): Add .atr for Ada.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@4086 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/toplev.c')
| -rw-r--r-- | gcc/toplev.c | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/gcc/toplev.c b/gcc/toplev.c index b2eebbdce6f..a0108b8eb36 100644 --- a/gcc/toplev.c +++ b/gcc/toplev.c @@ -1473,6 +1473,8 @@ strip_off_ending (name, len) name[len - 2] = 0; else if (len > 4 && ! strcmp (".ada", name + len - 4)) name[len - 4] = 0; + else if (len > 4 && ! strcmp (".atr", name + len - 4)) + name[len - 4] = 0; } /* Output a file name in the form wanted by System V. */ |
