diff options
author | Gary Dismukes <dismukes@adacore.com> | 2019-08-19 08:37:34 +0000 |
---|---|---|
committer | Pierre-Marie de Rodat <pmderodat@gcc.gnu.org> | 2019-08-19 08:37:34 +0000 |
commit | c27a8bce8a2d215cf265d15f8b57f379ad4d16a0 (patch) | |
tree | 4d9dcee8d44986f6a57d9bfb5ab22b7a2d6f8d8a | |
parent | 8fafa0b42000f5fa0284f8e3308f233a41843461 (diff) | |
download | gcc-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/ChangeLog | 6 | ||||
-rw-r--r-- | gcc/ada/einfo.ads | 6 |
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) |