diff options
author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2013-10-17 14:09:14 +0000 |
---|---|---|
committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2013-10-17 14:09:14 +0000 |
commit | a5979ad5a1c68f03a920169b7965aa56f200063d (patch) | |
tree | fa4836f6273e144fc74e708734d13ee0603d8988 /gcc/ada/exp_prag.adb | |
parent | f89806a34a24243777a5a88d3002eda52ee687af (diff) | |
download | gcc-a5979ad5a1c68f03a920169b7965aa56f200063d.tar.gz |
2013-10-17 Hristian Kirtchev <kirtchev@adacore.com>
* sem_prag.adb (Check_Dependency_Clause):
Recognize the scenario where successful clause matching has
depleted the available refinement items and the clause to match
technically refines to null => null.
2013-10-17 Tristan Gingold <gingold@adacore.com>
* exp_prag.adb (Expand_Pragma_Import_Or_Interface): Specify
External_Name instead of Link_Name for the RTTI declaration.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@203769 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/exp_prag.adb')
-rw-r--r-- | gcc/ada/exp_prag.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/exp_prag.adb b/gcc/ada/exp_prag.adb index f4314780f9e..693aac9b35f 100644 --- a/gcc/ada/exp_prag.adb +++ b/gcc/ada/exp_prag.adb @@ -628,7 +628,7 @@ package body Exp_Prag is Expression => Make_Identifier (Loc, Chars (Dum))), Make_Pragma_Argument_Association (Loc, - Chars => Name_Link_Name, + Chars => Name_External_Name, Expression => Relocate_Node (Rtti_Name)))))); Rewrite (Expression (Foreign_Data), |