diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-10-30 13:49:17 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-10-30 13:49:17 +0000 |
| commit | 2c2af3c263ae1e591845fd97304d666a22732814 (patch) | |
| tree | 3ba46ceb8444ca32075f53946e4e78bc9bb2c72a /gcc/ada/a-direct.adb | |
| parent | 5f93bcbf1c469dc16d5392c8a330cef9b41b5bd2 (diff) | |
| download | gcc-2c2af3c263ae1e591845fd97304d666a22732814.tar.gz | |
2009-10-30 Emmanuel Briot <briot@adacore.com>
* make.adb, osint.adb (Add_Lib_Search_Dir): Do not add if dir is
already in the list.
This saves system calls when looking for ALI files
(Scan_Make_Args): The parameter to gnatmake's -D is now converted to an
absolute PATH (so that the above improvement properly occurs if both
-D<dir> and -aO<dir> are specified).
2009-10-30 Thomas Quinot <quinot@adacore.com>
* a-direct.adb: Minor reformatting
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@153748 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/a-direct.adb')
| -rw-r--r-- | gcc/ada/a-direct.adb | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/gcc/ada/a-direct.adb b/gcc/ada/a-direct.adb index ae7a28ebd55..1013b1514db 100644 --- a/gcc/ada/a-direct.adb +++ b/gcc/ada/a-direct.adb @@ -211,7 +211,8 @@ package body Ada.Directories is else declare -- We need to resolve links because of A.16(47), since we must not - -- return alternative names for files + -- return alternative names for files. + Norm : constant String := Normalize_Pathname (Name); Last_DS : constant Natural := Strings.Fixed.Index |