From: Piotr Trojanek Date: Thu, 1 Sep 2022 08:16:23 +0000 (+0200) Subject: ada: Fix typo in comment referring to pragma Restrictions X-Git-Tag: basepoints/gcc-14~3526 X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=9a27e6a9f9e29adb968e4dfcd1328347b4da1df9;p=thirdparty%2Fgcc.git ada: Fix typo in comment referring to pragma Restrictions Comment cleanup only. gcc/ada/ * libgnat/g-excact.ads (Register_Global_Action): Refill comment. (Name_To_Id): Change pragma Restriction from singular to plural. --- diff --git a/gcc/ada/libgnat/g-excact.ads b/gcc/ada/libgnat/g-excact.ads index 110154651e04..c2e0b30b1da8 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,