From 96783caedcbde030672350dd3ac2118fe4f8e73f Mon Sep 17 00:00:00 2001 From: Eric Botcazou Date: Thu, 15 Jul 2021 22:42:26 +0200 Subject: [PATCH] [Ada] Fix obsolete comment mentioning girder discriminants gcc/ada/ * gcc-interface/decl.c (gnat_to_gnu_entity): Fix comment. --- gcc/ada/gcc-interface/decl.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/gcc/ada/gcc-interface/decl.c b/gcc/ada/gcc-interface/decl.c index 32142d057647..13e9004c89d6 100644 --- a/gcc/ada/gcc-interface/decl.c +++ b/gcc/ada/gcc-interface/decl.c @@ -557,7 +557,7 @@ gnat_to_gnu_entity (Entity_Id gnat_entity, tree gnu_expr, bool definition) /* If the entity is an inherited component (in the case of extended tagged record types), just return the original entity, which must be a FIELD_DECL. Likewise for discriminants. If the entity is a - non-girder discriminant (in the case of derived untagged record + non-stored discriminant (in the case of derived untagged record types), return the stored discriminant it renames. */ if (Present (Original_Record_Component (gnat_entity)) && Original_Record_Component (gnat_entity) != gnat_entity) -- 2.47.2