https://gcc.gnu.org/g:b045b3e266f9897a0e3fe15d333bdcb486ae288b
commit r15-6528-gb045b3e266f9897a0e3fe15d333bdcb486ae288b
Author: Piotr Trojanek <troja...@adacore.com>
Date: Wed Dec 4 16:22:05 2024 +0100
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:
---
gcc/ada/sem_attr.adb | 2 +-
gcc/ada/tbuild.adb | 2 +-
2 files changed, 2 insertions(+), 2 deletions(-)
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,
