aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorGary Dismukes <dismukes@adacore.com>2019-08-19 08:37:34 +0000
committerPierre-Marie de Rodat <pmderodat@gcc.gnu.org>2019-08-19 08:37:34 +0000
commitc27a8bce8a2d215cf265d15f8b57f379ad4d16a0 (patch)
tree4d9dcee8d44986f6a57d9bfb5ab22b7a2d6f8d8a
parent8fafa0b42000f5fa0284f8e3308f233a41843461 (diff)
downloadgcc-c27a8bce8a2d215cf265d15f8b57f379ad4d16a0.zip
gcc-c27a8bce8a2d215cf265d15f8b57f379ad4d16a0.tar.gz
gcc-c27a8bce8a2d215cf265d15f8b57f379ad4d16a0.tar.bz2
[Ada] Einfo: update comments for E_Function and E_Procedure
2019-08-19 Gary Dismukes <dismukes@adacore.com> gcc/ada/ * einfo.ads (E_Function, E_Procedure): Update comments to reflect that Renamed_Entity is also used for nongeneric subprograms. From-SVN: r274665
-rw-r--r--gcc/ada/ChangeLog6
-rw-r--r--gcc/ada/einfo.ads6
2 files changed, 9 insertions, 3 deletions
diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog
index f01e411..46121c5 100644
--- a/gcc/ada/ChangeLog
+++ b/gcc/ada/ChangeLog
@@ -1,3 +1,9 @@
+2019-08-19 Gary Dismukes <dismukes@adacore.com>
+
+ * einfo.ads (E_Function, E_Procedure): Update comments to
+ reflect that Renamed_Entity is also used for nongeneric
+ subprograms.
+
2019-08-19 Eric Botcazou <ebotcazou@adacore.com>
* sem_prag.adb (Is_Before_First_Decl): Deal with rewritten
diff --git a/gcc/ada/einfo.ads b/gcc/ada/einfo.ads
index b879753..089960a 100644
--- a/gcc/ada/einfo.ads
+++ b/gcc/ada/einfo.ads
@@ -4674,7 +4674,7 @@ package Einfo is
-- They all overlap because they are supposed to apply to different entity
-- kinds. They are semantically related, and have the following intended uses:
--- a) Renamed_Entity appplies to entities in renaming declarations that rename
+-- a) Renamed_Entity applies to entities in renaming declarations that rename
-- an entity, so the value of the attribute IS an entity. This applies to
-- generic renamings, package renamings, exception renamings, and subprograms
-- renamings that rename a subprogram (rather than an attribute, an entry, a
@@ -6141,7 +6141,7 @@ package Einfo is
-- DTC_Entity (Node16)
-- First_Entity (Node17)
-- Alias (Node18) (non-generic case only)
- -- Renamed_Entity (Node18) (generic case only)
+ -- Renamed_Entity (Node18)
-- Extra_Accessibility_Of_Result (Node19) (non-generic case only)
-- Last_Entity (Node20)
-- Interface_Name (Node21)
@@ -6467,7 +6467,7 @@ package Einfo is
-- DTC_Entity (Node16)
-- First_Entity (Node17)
-- Alias (Node18) (non-generic case only)
- -- Renamed_Entity (Node18) (generic case only)
+ -- Renamed_Entity (Node18)
-- Receiving_Entry (Node19) (non-generic case only)
-- Last_Entity (Node20)
-- Interface_Name (Node21)