ada: Fix comment

gcc/ada/ChangeLog:

	* sem.adb (Analyze): Fix comment.

diff --git a/gcc/ada/sem.adb b/gcc/ada/sem.adb
index 06df00ec8718e4ba2c7e72c06349527e1b0ee008..f5ce9f2300e0b76ae8856f15474e36c612dd49d1 100644 (file)
--- a/gcc/ada/sem.adb
+++ b/gcc/ada/sem.adb
@@ -770,7 +770,7 @@ package body Sem is
               and then Present (Scope (E))
               and then Ekind (Scope (E)) = E_Record_Type
             then
-               null; -- Set it later, in Analyze_Component_Declaration
+               null; -- Set it later, in Record_Type_Definition
             elsif not Is_Not_Self_Hidden (E) then
                Set_Is_Not_Self_Hidden (E);
             end if;