[flang][cuda] Lower match_all_sync functions to nvvm intrinsics (#127940)

This commit is contained in:
Valentin Clement (バレンタイン クレメン)
2025-02-20 09:10:25 -08:00
committed by GitHub
parent 02e8fd7a30
commit 726c4b9f77
7 changed files with 111 additions and 1 deletions

View File

@@ -562,4 +562,31 @@ implicit none
end function
end interface
interface match_all_sync
attributes(device) integer function match_all_syncjj(mask, val, pred)
!dir$ ignore_tkr(d) mask, (d) val, (d) pred
integer(4), value :: mask
integer(4), value :: val
integer(4) :: pred
end function
attributes(device) integer function match_all_syncjx(mask, val, pred)
!dir$ ignore_tkr(d) mask, (d) val, (d) pred
integer(4), value :: mask
integer(8), value :: val
integer(4) :: pred
end function
attributes(device) integer function match_all_syncjf(mask, val, pred)
!dir$ ignore_tkr(d) mask, (d) val, (d) pred
integer(4), value :: mask
real(4), value :: val
integer(4) :: pred
end function
attributes(device) integer function match_all_syncjd(mask, val, pred)
!dir$ ignore_tkr(d) mask, (d) val, (d) pred
integer(4), value :: mask
real(8), value :: val
integer(4) :: pred
end function
end interface
end module