diff options
| author | Arnaud Charlet <charlet@adacore.com> | 2020-01-26 15:32:43 -0500 |
|---|---|---|
| committer | Pierre-Marie de Rodat <derodat@adacore.com> | 2020-06-04 05:11:13 -0400 |
| commit | e5e53c73a0cf2e326bbfdacbe94e4a3bb79cd219 (patch) | |
| tree | 4d750b1859b750133f08307bb32e16ca1cb4dc76 /gcc/ada/snames.ads-tmpl | |
| parent | a6b37ab0acd34629a41c694c0f3482c450bbd18b (diff) | |
| download | gcc-e5e53c73a0cf2e326bbfdacbe94e4a3bb79cd219.zip gcc-e5e53c73a0cf2e326bbfdacbe94e4a3bb79cd219.tar.gz gcc-e5e53c73a0cf2e326bbfdacbe94e4a3bb79cd219.tar.bz2 | |
[Ada] Remove OpenACC support
2020-06-04 Arnaud Charlet <charlet@adacore.com>
gcc/ada/
* back_end.adb, opt.ads, par-prag.adb, sem_ch5.adb,
sem_prag.adb, sinfo.adb, sinfo.ads, snames.ads-tmpl,
doc/gnat_rm/implementation_defined_pragmas.rst: Remove
experimental support for OpenACC.
* gcc-interface/misc.c, gcc-interface/trans.c,
gcc-interface/lang.opt: Ditto.
* gnat_rm.texi: Regenerate.
gcc/testsuite/
* gnat.dg/openacc1.adb: Remove testcase.
Diffstat (limited to 'gcc/ada/snames.ads-tmpl')
| -rw-r--r-- | gcc/ada/snames.ads-tmpl | 38 |
1 files changed, 2 insertions, 36 deletions
diff --git a/gcc/ada/snames.ads-tmpl b/gcc/ada/snames.ads-tmpl index be1999d..337ce19 100644 --- a/gcc/ada/snames.ads-tmpl +++ b/gcc/ada/snames.ads-tmpl @@ -486,10 +486,6 @@ package Snames is Name_Abort_Defer : constant Name_Id := N + $; -- GNAT Name_Abstract_State : constant Name_Id := N + $; -- GNAT - Name_Acc_Data : constant Name_Id := N + $; - Name_Acc_Kernels : constant Name_Id := N + $; - Name_Acc_Loop : constant Name_Id := N + $; - Name_Acc_Parallel : constant Name_Id := N + $; Name_All_Calls_Remote : constant Name_Id := N + $; Name_Assert : constant Name_Id := N + $; -- Ada 05 Name_Assert_And_Cut : constant Name_Id := N + $; -- GNAT @@ -871,35 +867,9 @@ package Snames is Name_Warn : constant Name_Id := N + $; Name_Working_Storage : constant Name_Id := N + $; - -- OpenAcc-specific clause names for Parallel, Kernels, Data - - Name_Acc_If : constant Name_Id := N + $; - Name_Acc_Private : constant Name_Id := N + $; - Name_Attach : constant Name_Id := N + $; - Name_Copy_In : constant Name_Id := N + $; - Name_Copy_Out : constant Name_Id := N + $; - Name_Create : constant Name_Id := N + $; - Name_Delete : constant Name_Id := N + $; - Name_Detach : constant Name_Id := N + $; - Name_Device_Ptr : constant Name_Id := N + $; - Name_Device_Type : constant Name_Id := N + $; - Name_First_Private : constant Name_Id := N + $; - Name_No_Create : constant Name_Id := N + $; - Name_Num_Gangs : constant Name_Id := N + $; - Name_Num_Workers : constant Name_Id := N + $; - Name_Present : constant Name_Id := N + $; - Name_Reduction : constant Name_Id := N + $; - Name_Vector_Length : constant Name_Id := N + $; - Name_Wait : constant Name_Id := N + $; - - -- Loop + -- used by Repinfo JSON I/O - Name_Auto : constant Name_Id := N + $; - Name_Collapse : constant Name_Id := N + $; - Name_Gang : constant Name_Id := N + $; - Name_Seq : constant Name_Id := N + $; - Name_Tile : constant Name_Id := N + $; - Name_Worker : constant Name_Id := N + $; + Name_Present : constant Name_Id := N + $; -- Names of recognized attributes. The entries with the comment "Ada 83" -- are attributes that are defined in Ada 83, but not in Ada 95. These @@ -1934,10 +1904,6 @@ package Snames is Pragma_Abort_Defer, Pragma_Abstract_State, - Pragma_Acc_Data, - Pragma_Acc_Kernels, - Pragma_Acc_Loop, - Pragma_Acc_Parallel, Pragma_All_Calls_Remote, Pragma_Assert, Pragma_Assert_And_Cut, |