From: Piotr Trojanek Date: Wed, 4 Dec 2024 15:22:05 +0000 (+0100) Subject: ada: Assorted style cleanups X-Git-Tag: basepoints/gcc-16~3025 X-Git-Url: http://git.ipfire.org/?a=commitdiff_plain;h=b045b3e266f9897a0e3fe15d333bdcb486ae288b;p=thirdparty%2Fgcc.git ada: Assorted style cleanups Whitespace and comment cleanups. gcc/ada/ChangeLog: * sem_attr.adb (Eval_Attribute): Fix comment for attribute Image. * tbuild.adb (Make_SC): Remove extra whitespace. --- diff --git a/gcc/ada/sem_attr.adb b/gcc/ada/sem_attr.adb index 6cee808d89ab..6eb04b2e2582 100644 --- a/gcc/ada/sem_attr.adb +++ b/gcc/ada/sem_attr.adb @@ -9448,7 +9448,7 @@ package body Sem_Attr is ----------- -- Image is a scalar attribute, but is never static, because it is - -- not a static function (having a non-scalar argument (RM 4.9(22)) + -- not a static function (having a non-scalar argument (RM 4.9(22)). -- However, we can constant-fold the image of an enumeration literal -- if names are available and default Image implementation has not -- been overridden. diff --git a/gcc/ada/tbuild.adb b/gcc/ada/tbuild.adb index 31154266bcb4..598030bd5dbb 100644 --- a/gcc/ada/tbuild.adb +++ b/gcc/ada/tbuild.adb @@ -492,7 +492,7 @@ package body Tbuild is -- Make_SC -- ------------- - function Make_SC (Pre, Sel : Node_Id) return Node_Id is + function Make_SC (Pre, Sel : Node_Id) return Node_Id is begin return Make_Selected_Component (System_Location,