From: Ronan Desplanques <desplanq...@adacore.com>
gcc/ada/ChangeLog:
* sem_ch3.adb (Find_Type_Of_Object): Fix comment.
Tested on x86_64-pc-linux-gnu, committed on master.
---
gcc/ada/sem_ch3.adb | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/gcc/ada/sem_ch3.adb b/gcc/ada/sem_ch3.adb
index fb24f0f5db2..323548c0aa4 100644
--- a/gcc/ada/sem_ch3.adb
+++ b/gcc/ada/sem_ch3.adb
@@ -18838,7 +18838,8 @@ package body Sem_Ch3 is
or else Nkind (P) /= N_Object_Declaration
or else Is_Library_Level_Entity (Defining_Identifier (P)));
- -- Otherwise, the object definition is just a subtype_mark
+ -- Otherwise, either the object definition is just a subtype_mark or we
+ -- are analyzing a component declaration.
else
T :=
--
2.43.0
