[Ada] CUDA: Use internal types instead of public ones
authorGhjuvan Lacambre <lacambre@adacore.com>
Thu, 27 Aug 2020 09:27:00 +0000 (11:27 +0200)
committerPierre-Marie de Rodat <derodat@adacore.com>
Fri, 23 Oct 2020 08:24:51 +0000 (04:24 -0400)
commitc12e23c46785088da90ffc6dcfaca0aada4f2fb6
tree51bc00972e232783f469708eee8958ee67ff7e87
parent0e3ccc6a04100b9998920e82381bf566fc654b8d
[Ada] CUDA: Use internal types instead of public ones

gcc/ada/

* exp_prag.adb (Get_Launch_Kernel_Arg_Type): Renamed to
Get_Nth_Arg_Type and made more generic.
(Build_Dim3_Declaration): Now builds a CUDA.Internal.Dim3
instead of a CUDA.Vector_Types.Dim3.
(Build_Shared_Memory_Declaration): Now infers needed type from
Launch_Kernel instead of using a hard-coded type.
(Expand_Pragma_CUDA_Execute): Build additional temporaries to
store Grids and Blocks.
* rtsfind.ads: Move Launch_Kernel from public to internal
package.
gcc/ada/exp_prag.adb
gcc/ada/rtsfind.ads