From: Piotr Trojanek <troja...@adacore.com>
Comment cleanup only.
gcc/ada/
* libgnat/g-excact.ads
(Register_Global_Action): Refill comment.
(Name_To_Id): Change pragma Restriction from singular to plural.
Tested on x86_64-pc-linux-gnu, committed on master.
---
gcc/ada/libgnat/g-excact.ads | 5 ++---
1 file changed, 2 insertions(+), 3 deletions(-)
diff --git a/gcc/ada/libgnat/g-excact.ads b/gcc/ada/libgnat/g-excact.ads
index 110154651e0..c2e0b30b1da 100644
--- a/gcc/ada/libgnat/g-excact.ads
+++ b/gcc/ada/libgnat/g-excact.ads
@@ -71,8 +71,7 @@ package GNAT.Exception_Actions is
-- If Action is null, this will in effect cancel all exception actions.
procedure Register_Global_Unhandled_Action (Action : Exception_Action);
- -- Similar to Register_Global_Action, called on unhandled exceptions
- -- only.
+ -- Similar to Register_Global_Action, called on unhandled exceptions only
procedure Register_Id_Action
(Id : Exception_Id;
@@ -90,7 +89,7 @@ package GNAT.Exception_Actions is
-- an exception that is declared within an unlabeled block.
--
-- Note: All non-predefined exceptions will return Null_Id for programs
- -- compiled with pragma Restriction (No_Exception_Registration)
+ -- compiled with pragma Restrictions (No_Exception_Registration).
function Is_Foreign_Exception (E : Exception_Occurrence) return Boolean;
-- Tell whether the exception occurrence E represents a foreign exception,
--
2.34.1
