From: Ghjuvan Lacambre Date: Wed, 27 Oct 2021 08:26:00 +0000 (+0200) Subject: [Ada] sem_util.adb: fix typos in Accessibility_Level docs X-Git-Tag: basepoints/gcc-13~3289 X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=adc9410f95e3712f3f2fc4fe0e4a356af605fcd3;p=thirdparty%2Fgcc.git [Ada] sem_util.adb: fix typos in Accessibility_Level docs gcc/ada/ * sem_util.adb (Accessibility_Level): Fix typos. --- diff --git a/gcc/ada/sem_util.adb b/gcc/ada/sem_util.adb index 724068138573..8785e2e140c2 100644 --- a/gcc/ada/sem_util.adb +++ b/gcc/ada/sem_util.adb @@ -686,9 +686,9 @@ package body Sem_Util is return New_Occurrence_Of (Get_Dynamic_Accessibility (E), Loc); - -- Initialization procedures have a special extra accessitility + -- Initialization procedures have a special extra accessibility -- parameter associated with the level at which the object - -- begin initialized exists + -- being initialized exists elsif Ekind (E) = E_Record_Type and then Is_Limited_Record (E)