diff options
Diffstat (limited to 'flang/module/cudadevice.f90')
-rw-r--r-- | flang/module/cudadevice.f90 | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/flang/module/cudadevice.f90 b/flang/module/cudadevice.f90 index a8b9aa8..22df9cd 100644 --- a/flang/module/cudadevice.f90 +++ b/flang/module/cudadevice.f90 @@ -2034,6 +2034,15 @@ implicit none end subroutine end interface + interface + attributes(device) subroutine tma_bulk_s2g(src, dst, nbytes) + !dir$ ignore_tkr src, dst + integer(4), shared :: src(*) + integer(4), device :: dst(*) + integer(4), value :: nbytes + end subroutine + end interface + contains attributes(device) subroutine syncthreads() |