[flang-commits] [flang] [flang][cuda] Add interfaces for __int2float_rX (PR #153708)
Valentin Clement バレンタイン クレメン via flang-commits
flang-commits at lists.llvm.org
Thu Aug 14 15:47:16 PDT 2025
https://github.com/clementval created https://github.com/llvm/llvm-project/pull/153708
None
>From 5d14255ef0689f492e85b40373becfa5e9959391 Mon Sep 17 00:00:00 2001
From: Valentin Clement <clementval at gmail.com>
Date: Thu, 14 Aug 2025 15:46:50 -0700
Subject: [PATCH] [flang][cuda] Add interfaces for __int2float_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 ac97a5d27dbd2..8e3f7654af1d5 100644
--- a/flang/module/cudadevice.f90
+++ b/flang/module/cudadevice.f90
@@ -583,6 +583,34 @@ attributes(device) real(8) function sinpi(x) bind(c,name='__nv_sinpi')
end function
end interface
+ interface __int2float_rd
+ attributes(device) real function __int2float_rd(i) bind(c, name='__nv_int2float_rd')
+ !dir$ ignore_tkr (d) i
+ integer, value :: i
+ end function
+ end interface
+
+ interface __int2float_rn
+ attributes(device) real function __int2float_rn(i) bind(c, name='__nv_int2float_rn')
+ !dir$ ignore_tkr (d) i
+ integer, value :: i
+ end function
+ end interface
+
+ interface __int2float_ru
+ attributes(device) real function __int2float_ru(i) bind(c, name='__nv_int2float_ru')
+ !dir$ ignore_tkr (d) i
+ integer, value :: i
+ end function
+ end interface
+
+ interface __int2float_rz
+ attributes(device) real function __int2float_rz(i) bind(c, name='__nv_int2float_rz')
+ !dir$ ignore_tkr (d) i
+ integer, value :: i
+ end function
+ end interface
+
interface __int2double_rn
attributes(device) double precision function __int2double_rn(i) bind(c)
!dir$ ignore_tkr (d) i
diff --git a/flang/test/Lower/CUDA/cuda-libdevice.cuf b/flang/test/Lower/CUDA/cuda-libdevice.cuf
index c381485ec1761..4e5118feef76d 100644
--- a/flang/test/Lower/CUDA/cuda-libdevice.cuf
+++ b/flang/test/Lower/CUDA/cuda-libdevice.cuf
@@ -176,3 +176,18 @@ end subroutine
! 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
+
+attributes(global) subroutine test_int2float_rX()
+ real :: res
+ integer :: i
+ res = __int2float_rd(i)
+ res = __int2float_rn(i)
+ res = __int2float_ru(i)
+ res = __int2float_rz(i)
+end subroutine
+
+! CHECK-LABEL: _QPtest_int2float_rx
+! CHECK: %{{.*}} = fir.call @__nv_int2float_rd(%{{.*}}) proc_attrs<bind_c> fastmath<contract> : (i32) -> f32
+! CHECK: %{{.*}} = fir.call @__nv_int2float_rn(%{{.*}}) proc_attrs<bind_c> fastmath<contract> : (i32) -> f32
+! CHECK: %{{.*}} = fir.call @__nv_int2float_ru(%{{.*}}) proc_attrs<bind_c> fastmath<contract> : (i32) -> f32
+! CHECK: %{{.*}} = fir.call @__nv_int2float_rz(%{{.*}}) proc_attrs<bind_c> fastmath<contract> : (i32) -> f32
More information about the flang-commits
mailing list