From: Eric Botcazou Date: Mon, 12 Aug 2019 08:59:23 +0000 (+0000) Subject: [Ada] Sprint: minor comment tweak X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=5aa76fe17be6f6c222d16d5a51f60ed7755c6ad6;p=gcc.git [Ada] Sprint: minor comment tweak 2019-08-12 Eric Botcazou gcc/ada/ * sprint.ads: Minor comment tweak. From-SVN: r274286 --- diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index 362efba5487..b05d7c89d5a 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,3 +1,7 @@ +2019-08-12 Eric Botcazou + + * sprint.ads: Minor comment tweak. + 2019-08-12 Eric Botcazou * checks.adb (Insert_Valid_Check): Do not retrieve the diff --git a/gcc/ada/sprint.ads b/gcc/ada/sprint.ads index 11a552f6dd2..c510ac6587e 100644 --- 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