From: Marc Poulhiès Date: Fri, 18 Mar 2022 15:11:41 +0000 (+0100) Subject: [Ada] Typo fix in finalization comment X-Git-Tag: basepoints/gcc-14~6676 X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=98208e364c10f71a1609b93959cc81e1e2549163;p=thirdparty%2Fgcc.git [Ada] Typo fix in finalization comment Add missing 's' and reformat the comment block. gcc/ada/ * exp_ch7.adb: Fix typo. --- diff --git a/gcc/ada/exp_ch7.adb b/gcc/ada/exp_ch7.adb index ae3663ecdf6..74343646515 100644 --- a/gcc/ada/exp_ch7.adb +++ b/gcc/ada/exp_ch7.adb @@ -157,14 +157,14 @@ package body Exp_Ch7 is -- Finalization Management -- ----------------------------- - -- This part describe how Initialization/Adjustment/Finalization procedures - -- are generated and called. Two cases must be considered, types that are - -- Controlled (Is_Controlled flag set) and composite types that contain - -- controlled components (Has_Controlled_Component flag set). In the first - -- case the procedures to call are the user-defined primitive operations - -- Initialize/Adjust/Finalize. In the second case, GNAT generates - -- Deep_Initialize, Deep_Adjust and Deep_Finalize that are in charge - -- of calling the former procedures on the controlled components. + -- This part describes how Initialization/Adjustment/Finalization + -- procedures are generated and called. Two cases must be considered: types + -- that are Controlled (Is_Controlled flag set) and composite types that + -- contain controlled components (Has_Controlled_Component flag set). In + -- the first case the procedures to call are the user-defined primitive + -- operations Initialize/Adjust/Finalize. In the second case, GNAT + -- generates Deep_Initialize, Deep_Adjust and Deep_Finalize that are in + -- charge of calling the former procedures on the controlled components. -- For records with Has_Controlled_Component set, a hidden "controller" -- component is inserted. This controller component contains its own