diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2015-02-20 12:57:55 +0100 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2015-02-20 12:57:55 +0100 |
| commit | e4dc33272aaa7bb8660b94019627cba85740a49c (patch) | |
| tree | 06043834a9b94039c853a17d0a8ccbb091f3d5e5 /gcc/ada/switch-c.adb | |
| parent | 5ae7c3cf2e21534dda6af57c5c34318d30d0c98a (diff) | |
| download | gcc-e4dc33272aaa7bb8660b94019627cba85740a49c.zip gcc-e4dc33272aaa7bb8660b94019627cba85740a49c.tar.gz gcc-e4dc33272aaa7bb8660b94019627cba85740a49c.tar.bz2 | |
[multiple changes]
2015-02-20 Gary Dismukes <dismukes@adacore.com>
* sem_res.adb: Minor reformatting.
2015-02-20 Vincent Celier <celier@adacore.com>
* switch-c.adb (Scan_Front_End_Switches): When comparing runtime
path name for several switches --RTS, use the normalized path
names.
2015-02-20 Vincent Celier <celier@adacore.com>
* bindgen.adb: Minor reformatting and code reorganization.
2015-02-20 Jose Ruiz <ruiz@adacore.com>
* a-stcoed.ads: Add spec for this package (Unimplemented_Unit).
* impunit.adb (Non_Imp_File_Names_12): Mark unit a-stcoed.ads as
defined by Ada 2012.
From-SVN: r220853
Diffstat (limited to 'gcc/ada/switch-c.adb')
| -rw-r--r-- | gcc/ada/switch-c.adb | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/gcc/ada/switch-c.adb b/gcc/ada/switch-c.adb index c3b5733..b431081 100644 --- a/gcc/ada/switch-c.adb +++ b/gcc/ada/switch-c.adb @@ -214,7 +214,6 @@ package body Switch.C is else declare Runtime_Dir : String_Access; - begin if System.OS_Lib.Is_Absolute_Path (Switch_Chars (Ptr + 4 .. Max)) @@ -243,7 +242,11 @@ package body Switch.C is if RTS_Specified /= null then if RTS_Src_Path_Name = null or else RTS_Lib_Path_Name = null - or else RTS_Specified.all /= RTS_Lib_Path_Name.all + or else + System.OS_Lib.Normalize_Pathname + (RTS_Specified.all) /= + System.OS_Lib.Normalize_Pathname + (RTS_Lib_Path_Name.all) then Osint.Fail ("--RTS cannot be specified multiple times"); |