[gcc r11-6217] [Ada] Minor comment fix in System.Val_Real

[gcc r11-6217] [Ada] Minor comment fix in System.Val_Real

[Pierre-Marie de Rodat]

https://gcc.gnu.org/g:e2ff35b910f0c9a59d1ae64c142fb5866126f09f

commit r11-6217-ge2ff35b910f0c9a59d1ae64c142fb5866126f09f
Author: Eric Botcazou <ebotcazou@adacore.com>
Date:   Sat Dec 5 08:53:16 2020 +0100

    [Ada] Minor comment fix in System.Val_Real
    
    gcc/ada/
    
            * libgnat/s-valrea.adb (Need_Extra): Fix comment.

Diff:
---
 gcc/ada/libgnat/s-valrea.adb | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/gcc/ada/libgnat/s-valrea.adb b/gcc/ada/libgnat/s-valrea.adb
index 9614760199d..0ac3846542b 100644
--- a/gcc/ada/libgnat/s-valrea.adb
+++ b/gcc/ada/libgnat/s-valrea.adb
@@ -43,10 +43,10 @@ package body System.Val_Real is
    --  We need an unsigned type large enough to represent the mantissa
 
    Need_Extra : constant Boolean := Num'Machine_Mantissa > Uns'Size - 4;
-   --  If the mantissa of the floating-point type is almost as large as that
-   --  of the unsigned type, we do not have enough space for an extra digit
-   --  in the unsigned type so we handle the extra digit separately, at the
-   --  cost of a potential roundoff error.
+   --  If the mantissa of the floating-point type is almost as large as the
+   --  unsigned type, we do not have enough space for an extra digit in the
+   --  unsigned type so we handle the extra digit separately, at the cost of
+   --  a potential roundoff error.
 
    Precision_Limit : constant Uns :=
      (if Need_Extra then 2**Num'Machine_Mantissa - 1 else 2**Uns'Size - 1);