From: Piotr Trojanek Date: Tue, 7 Dec 2021 16:00:01 +0000 (+0100) Subject: [Ada] Fix style in comments about warning messages X-Git-Tag: basepoints/gcc-13~2006 X-Git-Url: http://git.ipfire.org/?a=commitdiff_plain;h=005146582c2ac4d6d451784f15781f11ce4f225b;p=thirdparty%2Fgcc.git [Ada] Fix style in comments about warning messages gcc/ada/ * errout.adb (Error_Msg_Internal): Reorder words. * erroutc.ads (Is_Warning_Msg): Add closing paren. * sem_util.adb (Compile_Time_Constraint_Error): Fix casing. --- diff --git a/gcc/ada/errout.adb b/gcc/ada/errout.adb index 73bcfc5567da..652dbf0422ab 100644 --- a/gcc/ada/errout.adb +++ b/gcc/ada/errout.adb @@ -1049,7 +1049,7 @@ package body Errout is elsif No (Cunit (Main_Unit)) then null; - -- If the flag location is not in the main extended source unit, then + -- If the flag location is not in the extended main source unit, then -- we want to eliminate the warning, unless it is in the extended -- main code unit and we want warnings on the instance. diff --git a/gcc/ada/erroutc.ads b/gcc/ada/erroutc.ads index 0c194e803d86..1c8940e639b5 100644 --- a/gcc/ada/erroutc.ads +++ b/gcc/ada/erroutc.ads @@ -69,7 +69,7 @@ package Erroutc is Is_Warning_Msg : Boolean := False; -- Set True to indicate if current message is warning message (contains ? - -- or contains < and Error_Msg_Warn is True. + -- or contains < and Error_Msg_Warn is True). Is_Info_Msg : Boolean := False; -- Set True to indicate that the current message starts with the characters diff --git a/gcc/ada/sem_util.adb b/gcc/ada/sem_util.adb index e07e48749d6d..3cf94292f79b 100644 --- a/gcc/ada/sem_util.adb +++ b/gcc/ada/sem_util.adb @@ -6604,7 +6604,7 @@ package body Sem_Util is Error_Msg_Warn := Warn or SPARK_Mode /= On; -- A static constraint error in an instance body is not a fatal error. - -- we choose to inhibit the message altogether, because there is no + -- We choose to inhibit the message altogether, because there is no -- obvious node (for now) on which to post it. On the other hand the -- offending node must be replaced with a constraint_error in any case.