https://gcc.gnu.org/g:a88a9a2aee15b7f09f90833e8c2633dafbc4fdeb
commit r16-1377-ga88a9a2aee15b7f09f90833e8c2633dafbc4fdeb
Author: Eric Botcazou <ebotca...@adacore.com>
Date: Tue Mar 25 18:35:10 2025 +0100
ada: Fix inconsistent comment for fixed-point Value attribute implementation
The comment incorrectly mentions decimal fixed point.
gcc/ada/ChangeLog:
* libgnat/s-vafi32.ads: Fix head description.
* libgnat/s-vafi64.ads: Likewise.
* libgnat/s-vafi128.ads: Likewise.
Diff:
---
gcc/ada/libgnat/s-vafi128.ads | 6 +++---
gcc/ada/libgnat/s-vafi32.ads | 6 +++---
gcc/ada/libgnat/s-vafi64.ads | 6 +++---
3 files changed, 9 insertions(+), 9 deletions(-)
diff --git a/gcc/ada/libgnat/s-vafi128.ads b/gcc/ada/libgnat/s-vafi128.ads
index 7518c6c348ad..d75857acedab 100644
--- a/gcc/ada/libgnat/s-vafi128.ads
+++ b/gcc/ada/libgnat/s-vafi128.ads
@@ -29,9 +29,9 @@
-- --
------------------------------------------------------------------------------
--- This package contains routines for scanning values for ordinary fixed point
--- types up to 128-bit small and mantissa, for use in Text_IO.Decimal_IO, and
--- the Value attribute for such decimal types.
+-- This package contains the routines for supporting the Value attribute for
+-- ordinary fixed point types up to 128-bit small and mantissa, and also for
+-- conversion operations required in Text_IO.Fixed_IO for such types.
with Interfaces;
with System.Arith_128;
diff --git a/gcc/ada/libgnat/s-vafi32.ads b/gcc/ada/libgnat/s-vafi32.ads
index e3ad5c2b46ab..7ed22c6ecbeb 100644
--- a/gcc/ada/libgnat/s-vafi32.ads
+++ b/gcc/ada/libgnat/s-vafi32.ads
@@ -29,9 +29,9 @@
-- --
------------------------------------------------------------------------------
--- This package contains routines for scanning values for decimal fixed point
--- types up to 32-bit small and mantissa, for use in Text_IO.Decimal_IO, and
--- the Value attribute for such decimal types.
+-- This package contains the routines for supporting the Value attribute for
+-- ordinary fixed point types up to 32-bit small and mantissa, and also for
+-- conversion operations required in Text_IO.Fixed_IO for such types.
with Interfaces;
with System.Arith_32;
diff --git a/gcc/ada/libgnat/s-vafi64.ads b/gcc/ada/libgnat/s-vafi64.ads
index 4d86939a90ef..43197bb34ce8 100644
--- a/gcc/ada/libgnat/s-vafi64.ads
+++ b/gcc/ada/libgnat/s-vafi64.ads
@@ -29,9 +29,9 @@
-- --
------------------------------------------------------------------------------
--- This package contains routines for scanning values for decimal fixed point
--- types up to 64-bit small and mantissa, for use in Text_IO.Decimal_IO, and
--- the Value attribute for such decimal types.
+-- This package contains the routines for supporting the Value attribute for
+-- ordinary fixed point types up to 64-bit small and mantissa, and also for
+-- conversion operations required in Text_IO.Fixed_IO for such types.
with Interfaces;
with System.Arith_64;
