Commit 4a4d6051 authored by Andreas Marek's avatar Andreas Marek
Browse files

Forgot to set rocBlas handle

With this commit ELPA does run correctly on AMD GPUs.
Functionality and correctness tests have been carried out
on AMD MI100
parent 0e91d1e9
......@@ -135,7 +135,7 @@ module mod_check_for_gpu
success = cublas_create(cublasHandle)
#endif
#ifdef WITH_AMD_GPU_VERSION
success = rocblas_create(cublasHandle)
success = rocblas_create(rocblasHandle)
#endif
if (.not.(success)) then
#ifdef WITH_NVIDIA_GPU_VERSION
......@@ -148,7 +148,12 @@ module mod_check_for_gpu
endif
else
#ifdef WITH_NVIDIA_GPU_VERSION
if (cublasHandle .ne. -1) then
#endif
#ifdef WITH_AMD_GPU_VERSION
if (rocblasHandle .ne. -1) then
#endif
gpuAvailable = .true.
numberOfDevices = -1
if (myid == 0 .and. wantDebugMessage) then
......@@ -237,7 +242,7 @@ module mod_check_for_gpu
success = cublas_create(cublasHandle)
#endif
#ifdef WITH_AMD_GPU_VERSION
success = rocblas_create(cublasHandle)
success = rocblas_create(rocblasHandle)
#endif
if (.not.(success)) then
#ifdef WITH_NIVDIA_GPU_VERSION
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment