diff options
| author | Piotr Trojanek <trojanek@adacore.com> | 2022-02-04 13:34:52 +0100 |
|---|---|---|
| committer | Pierre-Marie de Rodat <derodat@adacore.com> | 2022-05-11 08:53:22 +0000 |
| commit | 48a2e84929bba9aa60497c39c18c332ebfbd256e (patch) | |
| tree | d571a742bcb95afd4df3c713b61b39699030cb49 /gcc/ada | |
| parent | 046c166f3c3351788fcf6e1a9b235f3c808b1289 (diff) | |
| download | gcc-48a2e84929bba9aa60497c39c18c332ebfbd256e.zip gcc-48a2e84929bba9aa60497c39c18c332ebfbd256e.tar.gz gcc-48a2e84929bba9aa60497c39c18c332ebfbd256e.tar.bz2 | |
[Ada] Sort Detect_Blocking alphabetically among names and pragmas
In GNAT User's Guide section about configuration pragmas the
Detect_Blocking has been recently moved to an alphabetic order. This
patch moves the its Name_Id and Pragma_Is in the source code to match
this order.
gcc/ada/
* snames.ads-tmpl (Detect_Blocking): Move after
Default_Storage_Pool.
Diffstat (limited to 'gcc/ada')
| -rw-r--r-- | gcc/ada/snames.ads-tmpl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/snames.ads-tmpl b/gcc/ada/snames.ads-tmpl index dc09e07..cbcb1cf 100644 --- a/gcc/ada/snames.ads-tmpl +++ b/gcc/ada/snames.ads-tmpl @@ -417,7 +417,6 @@ package Snames is Name_Component_Alignment : constant Name_Id := N + $; -- GNAT Name_Convention_Identifier : constant Name_Id := N + $; -- GNAT Name_Debug_Policy : constant Name_Id := N + $; -- GNAT - Name_Detect_Blocking : constant Name_Id := N + $; -- Ada 05 -- Note: Default_Scalar_Storage_Order is not in this list because its name -- matches the name of the corresponding attribute. However, it is included @@ -425,6 +424,7 @@ package Snames is -- and Is_Pragma_Name correctly recognize Default_Scalar_Storage_Order. Name_Default_Storage_Pool : constant Name_Id := N + $; -- Ada 12 + Name_Detect_Blocking : constant Name_Id := N + $; -- Ada 05 Name_Disable_Atomic_Synchronization : constant Name_Id := N + $; -- GNAT Name_Discard_Names : constant Name_Id := N + $; Name_Elaboration_Checks : constant Name_Id := N + $; -- GNAT @@ -1741,8 +1741,8 @@ package Snames is Pragma_Component_Alignment, Pragma_Convention_Identifier, Pragma_Debug_Policy, - Pragma_Detect_Blocking, Pragma_Default_Storage_Pool, + Pragma_Detect_Blocking, Pragma_Disable_Atomic_Synchronization, Pragma_Discard_Names, Pragma_Elaboration_Checks, |