[flang-commits] [flang] [flang][cuda] Add interfaces for __ll2float_rX (PR #153694)
Valentin Clement バレンタイン クレメン via flang-commits
flang-commits at lists.llvm.org
Thu Aug 14 14:47:57 PDT 2025
https://github.com/clementval created https://github.com/llvm/llvm-project/pull/153694
None
>From 6d1fdcc111d08477c94cbd78ae6184544ae953ce Mon Sep 17 00:00:00 2001
From: Valentin Clement <clementval at gmail.com>
Date: Thu, 14 Aug 2025 14:47:26 -0700
Subject: [PATCH] [flang][cuda] Add interfaces for __ll2float_rX
---
flang/module/cudadevice.f90 | 28 ++++++++++++++++++++++++
flang/test/Lower/CUDA/cuda-libdevice.cuf | 15 +++++++++++++
2 files changed, 43 insertions(+)
diff --git a/flang/module/cudadevice.f90 b/flang/module/cudadevice.f90
index 259812d0eed1d..7d580c4887a95 100644
--- a/flang/module/cudadevice.f90
+++ b/flang/module/cudadevice.f90
@@ -681,6 +681,34 @@ attributes(device) real(8) function sinpi(x) bind(c,name='__nv_sinpi')
end function
end interface
+ interface __ll2float_rd
+ attributes(device) real function __ll2float_rd(i) bind(c, name='__nv_ll2float_rd')
+ !dir$ ignore_tkr (d) i
+ integer(8), value :: i
+ end function
+ end interface
+
+ interface __ll2float_rn
+ attributes(device) real function __ll2float_rn(i) bind(c, name='__nv_ll2float_rn')
+ !dir$ ignore_tkr (d) i
+ integer(8), value :: i
+ end function
+ end interface
+
+ interface __ll2float_ru
+ attributes(device) real function __ll2float_ru(i) bind(c, name='__nv_ll2float_ru')
+ !dir$ ignore_tkr (d) i
+ integer(8), value :: i
+ end function
+ end interface
+
+ interface __ll2float_rz
+ attributes(device) real function __ll2float_rz(i) bind(c, name='__nv_ll2float_rz')
+ !dir$ ignore_tkr (d) i
+ integer(8), value :: i
+ end function
+ end interface
+
interface __ll2double_rd
attributes(device) double precision function __ll2double_rd(i) bind(c, name='__nv_ll2double_rd')
!dir$ ignore_tkr (d) i
diff --git a/flang/test/Lower/CUDA/cuda-libdevice.cuf b/flang/test/Lower/CUDA/cuda-libdevice.cuf
index 52cf9c391c8de..059a5e800b98e 100644
--- a/flang/test/Lower/CUDA/cuda-libdevice.cuf
+++ b/flang/test/Lower/CUDA/cuda-libdevice.cuf
@@ -130,3 +130,18 @@ end subroutine
! CHECK: %{{.*}} = fir.call @__nv_double2ull_rn(%{{.*}}) proc_attrs<bind_c> fastmath<contract> : (f64) -> i64
! CHECK: %{{.*}} = fir.call @__nv_double2ull_ru(%{{.*}}) proc_attrs<bind_c> fastmath<contract> : (f64) -> i64
! CHECK: %{{.*}} = fir.call @__nv_double2ull_rz(%{{.*}}) proc_attrs<bind_c> fastmath<contract> : (f64) -> i64
+
+attributes(global) subroutine test_ll2float_rX()
+ real :: res
+ integer(8) :: i
+ res = __ll2float_rd(i)
+ res = __ll2float_rn(i)
+ res = __ll2float_ru(i)
+ res = __ll2float_rz(i)
+end subroutine
+
+! CHECK-LABEL: _QPtest_ll2float_rx
+! CHECK: %{{.*}} = fir.call @__nv_ll2float_rd(%{{.*}}) proc_attrs<bind_c> fastmath<contract> : (i64) -> f32
+! CHECK: %{{.*}} = fir.call @__nv_ll2float_rn(%{{.*}}) proc_attrs<bind_c> fastmath<contract> : (i64) -> f32
+! CHECK: %{{.*}} = fir.call @__nv_ll2float_ru(%{{.*}}) proc_attrs<bind_c> fastmath<contract> : (i64) -> f32
+! CHECK: %{{.*}} = fir.call @__nv_ll2float_rz(%{{.*}}) proc_attrs<bind_c> fastmath<contract> : (i64) -> f32
More information about the flang-commits
mailing list