[flang-commits] [flang] 2bb5ca5 - Preparing cudadevice.mod to be the same upstream and downstream. (#123099)

via flang-commits flang-commits at lists.llvm.org
Wed Jan 15 14:04:19 PST 2025


Author: Renaud Kauffmann
Date: 2025-01-15T14:04:15-08:00
New Revision: 2bb5ca537b4dfae9048cc1712147f13db7aa87f6

URL: https://github.com/llvm/llvm-project/commit/2bb5ca537b4dfae9048cc1712147f13db7aa87f6
DIFF: https://github.com/llvm/llvm-project/commit/2bb5ca537b4dfae9048cc1712147f13db7aa87f6.diff

LOG: Preparing cudadevice.mod to be the same upstream and downstream. (#123099)

Added: 
    

Modified: 
    flang/module/cudadevice.f90

Removed: 
    


################################################################################
diff  --git a/flang/module/cudadevice.f90 b/flang/module/cudadevice.f90
index b07f82be6a7243..5712a7724ae49d 100644
--- a/flang/module/cudadevice.f90
+++ b/flang/module/cudadevice.f90
@@ -9,7 +9,10 @@
 ! CUDA Fortran procedures available in device subprogram
 
 module cudadevice
-  use __cuda_device, only: __fadd_rd, __fadd_ru
+  use __cuda_device
+  use, intrinsic :: __fortran_builtins, only: dim3 => __builtin_dim3
+  use, intrinsic :: __fortran_builtins, only: c_devptr => __builtin_c_devptr
+  use, intrinsic :: __fortran_builtins, only: c_devloc => __builtin_c_devloc
 implicit none
 
   ! Set PRIVATE by default to explicitly only export what is meant


        


More information about the flang-commits mailing list