[gcc r12-2109] [Ada] Linker_Section_Pragma cleanup

[gcc r12-2109] [Ada] Linker_Section_Pragma cleanup

[Pierre-Marie de Rodat]

https://gcc.gnu.org/g:19456797d1d0aa059b9892698f0f979fa29d824c

commit r12-2109-g19456797d1d0aa059b9892698f0f979fa29d824c
Author: Bob Duff <duff@adacore.com>
Date:   Mon May 17 15:39:29 2021 -0400

    [Ada] Linker_Section_Pragma cleanup
    
    gcc/ada/
    
            * gen_il-gen-gen_entities.adb: Remove Linker_Section_Pragma
            field from Record_Field_Kind.  Minor comment improvement.

Diff:
---
 gcc/ada/gen_il-gen-gen_entities.adb | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

diff --git a/gcc/ada/gen_il-gen-gen_entities.adb b/gcc/ada/gen_il-gen-gen_entities.adb
index 1c6a5183daa..d5977ad2834 100644
--- a/gcc/ada/gen_il-gen-gen_entities.adb
+++ b/gcc/ada/gen_il-gen-gen_entities.adb
@@ -315,15 +315,14 @@ begin -- Gen_IL.Gen.Gen_Entities
         Sm (Entry_Formal, Node_Id),
         Sm (Esize, Uint),
         Sm (Interface_Name, Node_Id),
-        Sm (Linker_Section_Pragma, Node_Id),
         Sm (Normalized_First_Bit, Uint),
         Sm (Normalized_Position, Uint),
         Sm (Normalized_Position_Max, Uint),
         Sm (Original_Record_Component, Node_Id)));
 
    Cc (E_Component, Record_Field_Kind,
-       --  Components of a record declaration, private declarations of
-       --  protected objects.
+       --  Components (other than discriminants) of a record declaration,
+       --  private declarations of protected objects.
        (Sm (Discriminant_Checking_Func, Node_Id),
         Sm (DT_Entry_Count, Uint,
             Pre => "Is_Tag (N)"),