aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorPiotr Trojanek <trojanek@adacore.com>2024-03-25 21:47:55 +0100
committerMarc Poulhiès <poulhies@adacore.com>2024-05-20 09:47:04 +0200
commit824755fcf4d82119c8ea7496e43eab7a88d17a2b (patch)
tree143da53b70f09a9ab314357ccb71e9ef390ad614
parent0d119fb79e884c9ee5e1ccbbb98311780f92413d (diff)
downloadgcc-824755fcf4d82119c8ea7496e43eab7a88d17a2b.zip
gcc-824755fcf4d82119c8ea7496e43eab7a88d17a2b.tar.gz
gcc-824755fcf4d82119c8ea7496e43eab7a88d17a2b.tar.bz2
ada: Fix style in list of implementation-defined attributes
Code cleanup. gcc/ada/ * sem_attr.ads (Attribute_Impl_Def): Fix style in comment.
-rw-r--r--gcc/ada/sem_attr.ads8
1 files changed, 8 insertions, 0 deletions
diff --git a/gcc/ada/sem_attr.ads b/gcc/ada/sem_attr.ads
index 0e7d169..d18bd5b 100644
--- a/gcc/ada/sem_attr.ads
+++ b/gcc/ada/sem_attr.ads
@@ -288,6 +288,10 @@ package Sem_Attr is
-- attribute is primarily intended for use in implementation of the
-- standard input-output functions for fixed-point values.
+ --------------------
+ -- Invalid_Value --
+ --------------------
+
Attribute_Invalid_Value => True,
-- For every scalar type, S'Invalid_Value designates an undefined value
-- of the type. If possible this value is an invalid value, and in fact
@@ -298,6 +302,10 @@ package Sem_Attr is
-- coding standards in use), but logically no initialization is needed,
-- and the value should never be accessed.
+ ----------------
+ -- Loop_Entry --
+ ----------------
+
Attribute_Loop_Entry => True,
-- For every object of a non-limited type, S'Loop_Entry [(Loop_Name)]
-- denotes the constant value of prefix S at the point of entry into the