acc_stream_priority_range Subroutine

public subroutine acc_stream_priority_range(least, greatest)

Fortran-wrapper for getting CUDA/HIP streams' priority range.

Arguments

TypeIntentOptionalAttributesName
integer, intent(out) :: least
integer, intent(out) :: greatest

Contents


Source Code

   SUBROUTINE acc_stream_priority_range(least, greatest)
      !! Fortran-wrapper for getting CUDA/HIP streams' priority range.

      INTEGER, INTENT(OUT)                     :: least, greatest

#if ! defined (__DBCSR_ACC)
      least = -1; greatest = -1 ! assign intent-out arguments to silence compiler warnings
      DBCSR_ABORT("__DBCSR_ACC not compiled in.")
#else
      INTEGER                                  :: istat
      istat = acc_interface_stream_priority_range(least, greatest)
      IF (istat /= 0) &
         DBCSR_ABORT("acc_stream_priority_range failed")
#endif
   END SUBROUTINE acc_stream_priority_range