Fix exact block inversion with HIP in MGR

Fix cublasHandle -> vendorSolverHandle
This commit is contained in:
Victor A. P. Magri 2023-06-05 18:04:27 -04:00 committed by GitHub
parent f7850206cd
commit f45de31a3d
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23

View File

@ -691,7 +691,7 @@ hypre_ParCSRMatrixExtractBlockDiagDevice( hypre_ParCSRMatrix *A,
infos,
num_blocks));
#elif defined(HYPRE_USING_ROCSOLVER)
HYPRE_ROCSOLVER_CALL(rocsolver_dgetrf_batched(hypre_HandleCublasHandle(hypre_handle()),
HYPRE_ROCSOLVER_CALL(rocsolver_dgetrf_batched(hypre_HandleVendorSolverHandle(hypre_handle()),
blk_size,
blk_size,
tmpdiag_aop,
@ -738,7 +738,7 @@ hypre_ParCSRMatrixExtractBlockDiagDevice( hypre_ParCSRMatrix *A,
infos,
num_blocks));
#elif defined(HYPRE_USING_ROCSOLVER)
HYPRE_ROCSOLVER_CALL(rocsolver_dgetri_batched(hypre_HandleCublasHandle(hypre_handle()),
HYPRE_ROCSOLVER_CALL(rocsolver_dgetri_batched(hypre_HandleVendorSolverHandle(hypre_handle()),
blk_size,
tmpdiag_aop,
blk_size,