procyberian/gcc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

[Ada] Undo questionable renaming in earlier change

Browse source 
gcc/ada/

	* gcc-interface/decl.cc (gnat_to_gnu_entity) <E_Access_Subtype>:
	Undo questionable renaming.
This commit is contained in:
Eric Botcazou 2022-06-27 17:33:46 +02:00 • committed by Pierre-Marie de Rodat
parent 258814a99e
commit 0888e1fea1
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
gcc/ada/gcc-interface/decl.cc
View file

@ -3883,7 +3883,7 @@ gnat_to_gnu_entity (Entity_Id gnat_entity, tree gnu_expr, bool definition)
&& Is_Frozen (Directly_Designated_Type (gnat_entity))
&& No (Freeze_Node (Directly_Designated_Type (gnat_entity))))
{
tree gnu_desig_type
tree gnu_design_base_type
= TYPE_IS_FAT_POINTER_P (gnu_type)
? TREE_TYPE (TREE_TYPE (TYPE_FIELDS (gnu_type)))
: TREE_TYPE (gnu_type);
@ -3903,7 +3903,7 @@ gnat_to_gnu_entity (Entity_Id gnat_entity, tree gnu_expr, bool definition)
/* Otherwise elaborate the designated subtype only if its base type
has already been elaborated. */
else if (!TYPE_IS_DUMMY_P (gnu_desig_type))
else if (!TYPE_IS_DUMMY_P (gnu_design_base_type))
gnat_to_gnu_entity (Directly_Designated_Type (gnat_entity),
NULL_TREE, false);
}