mirror/gcc
2
0
Fork 0
mirror of git://gcc.gnu.org/git/gcc.git synced 2025-04-05 07:40:28 +08:00
Code Issues Packages Projects Releases Wiki Activity

[Ada] Allow 'Reduce with -gnat2022

Browse Source 
After a period of experimentation, allow 'Reduce in Ada 2022 mode.

gcc/ada/

	* sem_attr.adb (Analyze_Attribute [Attribute_Reduce]): Allow
	'Reduce for Ada 2022 and above.
	* sem_attr.ads (Attribute_Impl_Def): 'Reduce is no longer
	implementation defined.
This commit is contained in:
Arnaud Charlet 2022-03-20 09:12:32 +00:00 committed by Pierre-Marie de Rodat
parent 6e2d6b8e8e
commit c21a0097b6
2 changed files with 1 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
gcc/ada/sem_attr.adb
View File

@ -5775,11 +5775,7 @@ package body Sem_Attr is
when Attribute_Reduce =>
Check_E2;
if not Extensions_Allowed then
Error_Attr
("% attribute only supported under -gnatX", P);
end if;
Error_Msg_Ada_2022_Feature ("Reduce attribute", Sloc (N));
declare
Stream : constant Node_Id := Prefix (N);

7
gcc/ada/sem_attr.ads
View File

@ -407,13 +407,6 @@ package Sem_Attr is
-- as Range applied to the array itself. The result is of type universal
-- integer.
------------
-- Reduce --
------------
Attribute_Reduce => True,
-- See AI12-0262-1
---------
-- Ref --
---------