[Ada] CUDA: fix CUDA_Execute not working with aggregates
authorGhjuvan Lacambre <lacambre@adacore.com>
Tue, 1 Sep 2020 08:57:39 +0000 (10:57 +0200)
committerPierre-Marie de Rodat <derodat@adacore.com>
Fri, 23 Oct 2020 08:24:52 +0000 (04:24 -0400)
commit6cc203bf2a78be88d60fd250617e0c652451b8aa
tree445b2cdae96e5fafc7e55fd8874349cbb6574f63
parent4e40d14622b5ce8771498cdb9cf8cbfe6b71d883
[Ada] CUDA: fix CUDA_Execute not working with aggregates

gcc/ada/

* exp_prag.adb (Etype_Or_Dim3): New function.
(Expand_Pragma_Cuda_Execute): Use Etype_Or_Dim3 for temporary
decls.
gcc/ada/exp_prag.adb