diff options
| author | Ghjuvan Lacambre <lacambre@adacore.com> | 2021-08-17 10:37:02 +0200 |
|---|---|---|
| committer | Pierre-Marie de Rodat <derodat@adacore.com> | 2021-10-04 08:45:11 +0000 |
| commit | aa40952cda882dd9e6a116247281aeeac0d38baa (patch) | |
| tree | 223a53b27012a8e129199e3a302cdfb152ff52e0 /gcc/ada/gnat_cuda.ads | |
| parent | 70aec3a1b8efd09a951e4d52f396345a740879d3 (diff) | |
| download | gcc-aa40952cda882dd9e6a116247281aeeac0d38baa.zip gcc-aa40952cda882dd9e6a116247281aeeac0d38baa.tar.gz gcc-aa40952cda882dd9e6a116247281aeeac0d38baa.tar.bz2 | |
[Ada] Implement CUDA_Device
gcc/ada/
* gnat_cuda.adb (Remove_CUDA_Device_Entities): New function.
(Expand_CUDA_Package): Call Remove_CUDA_Device_Entities.
* gnat_cuda.ads (Expand_CUDA_Package): Expand documentation.
* sem_prag.adb (Analyze_Pragma): Remove warning about
CUDA_Device not being implemented.
Diffstat (limited to 'gcc/ada/gnat_cuda.ads')
| -rw-r--r-- | gcc/ada/gnat_cuda.ads | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/gcc/ada/gnat_cuda.ads b/gcc/ada/gnat_cuda.ads index fc84bda..390f5de 100644 --- a/gcc/ada/gnat_cuda.ads +++ b/gcc/ada/gnat_cuda.ads @@ -86,7 +86,10 @@ package GNAT_CUDA is -- entity of its parent package body. procedure Expand_CUDA_Package (N : Node_Id); - -- When compiling for the host, generate code to register kernels with the - -- CUDA runtime and post-process kernels. + -- When compiling for the host: + -- - Generate code to register kernels with the CUDA runtime and + -- post-process kernels. + -- - Empty content of CUDA_Global procedures. + -- - Remove declarations of CUDA_Device entities. end GNAT_CUDA; |