[Ada] Sprint: minor comment tweak

2019-08-12  Eric Botcazou  <ebotcazou@adacore.com>

gcc/ada/

	* sprint.ads: Minor comment tweak.

From-SVN: r274286

diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog
index 362efba..b05d7c8 100644 (file)
--- a/gcc/ada/ChangeLog
+++ b/gcc/ada/ChangeLog
@@ -1,5 +1,9 @@
 2019-08-12  Eric Botcazou  <ebotcazou@adacore.com>
 
+       * sprint.ads: Minor comment tweak.
+
+2019-08-12  Eric Botcazou  <ebotcazou@adacore.com>
+
        * checks.adb (Insert_Valid_Check): Do not retrieve the
        Do_Range_Check flag from the Original_Node but from the
        Validated_Object.  Remove useless bypass for floating-point

diff --git a/gcc/ada/sprint.ads b/gcc/ada/sprint.ads
index 11a552f..c510ac6 100644 (file)
--- a/gcc/ada/sprint.ads
+++ b/gcc/ada/sprint.ads
@@ -48,8 +48,8 @@ package Sprint is
 
    --    Allocator                           new xxx [storage_pool = xxx]
    --    Cleanup action                      at end procedure name;
-   --    Conversion wi Float_Truncate        target^(source)
    --    Convert wi Conversion_OK            target?(source)
+   --    Convert wi Float_Truncate           target^(source)
    --    Convert wi Rounded_Result           target@(source)
    --    Divide wi Treat_Fixed_As_Integer    x #/ y
    --    Divide wi Rounded_Result            x @/ y