diff options
author | Steve Baird <baird@adacore.com> | 2020-02-19 16:27:47 -0800 |
---|---|---|
committer | Pierre-Marie de Rodat <derodat@adacore.com> | 2020-06-08 03:51:11 -0400 |
commit | a998e58bf019c7174a7480fc4d46ec9fcbc4cd92 (patch) | |
tree | 46d3127104e32fd2d2fc898284dd539933c5e7fc /gcc/ada/snames.ads-tmpl | |
parent | 4b8c2c4ba3566f8dd6d256e4b93321410782a0b4 (diff) | |
download | gcc-a998e58bf019c7174a7480fc4d46ec9fcbc4cd92.zip gcc-a998e58bf019c7174a7480fc4d46ec9fcbc4cd92.tar.gz gcc-a998e58bf019c7174a7480fc4d46ec9fcbc4cd92.tar.bz2 |
[Ada] Implement AI12-0291 (Jorvik profile)
2020-06-08 Steve Baird <baird@adacore.com>
gcc/ada/
* libgnat/s-rident.ads: Add Jorvik to the Profile_Name
enumeration type. Add an element for Jorvik to the array
aggregate that is the initial value of the constant
Profile_Info.
* targparm.adb (Get_Target_Parameters): Handle "pragma Profile
(Jorvik);" similarly to "pragma Profile (Ravenscar);".
* snames.ads-tmpl: Declare Name_Jorvik Name_Id. Unlike
Ravenscar, Jorvik is not a pragma name and has no corresponding
element in the Pragma_Id enumeration type; this means that its
declaration must not occur between those of First_Pragma_Name
and Last_Pragma_Name.
* sem_prag.adb (Analyze_Pragma): Add call to
Set_Ravenscar_Profile for Jorvik, similar to the existing calls
for Ravenscar and the GNAT Ravenscar variants.
Diffstat (limited to 'gcc/ada/snames.ads-tmpl')
-rw-r--r-- | gcc/ada/snames.ads-tmpl | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/gcc/ada/snames.ads-tmpl b/gcc/ada/snames.ads-tmpl index e5494ae..b88f861 100644 --- a/gcc/ada/snames.ads-tmpl +++ b/gcc/ada/snames.ads-tmpl @@ -782,6 +782,7 @@ package Snames is Name_Info : constant Name_Id := N + $; Name_Internal : constant Name_Id := N + $; Name_Ivdep : constant Name_Id := N + $; + Name_Jorvik : constant Name_Id := N + $; Name_Link_Name : constant Name_Id := N + $; Name_Low_Order_First : constant Name_Id := N + $; Name_Lowercase : constant Name_Id := N + $; |