diff options
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/ada/libgnat/g-excact.ads | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/gcc/ada/libgnat/g-excact.ads b/gcc/ada/libgnat/g-excact.ads index 1101546..c2e0b30 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, |