From bcd6c4070fcd257d18c01e4da05f3be9ca775e7e Mon Sep 17 00:00:00 2001
From: Mathieu Faverge <mathieu.faverge@inria.fr>
Date: Tue, 16 Mar 2021 14:33:06 +0100
Subject: [PATCH] Update the f77 interface
---
control/chameleon_zf77.c | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/control/chameleon_zf77.c b/control/chameleon_zf77.c
index ab4d3c744..6c73e55c3 100644
--- a/control/chameleon_zf77.c
+++ b/control/chameleon_zf77.c
@@ -700,7 +700,7 @@ void CHAMELEON_ZGELS_TILE_ASYNC(cham_trans_t *trans, CHAM_desc_t *A, CHAM_desc_t
{ *info = CHAMELEON_zgels_Tile_Async(*trans, A, T, B, sequence, request); }
void CHAMELEON_ZGEMM_TILE_ASYNC(cham_trans_t *transA, cham_trans_t *transB, CHAMELEON_Complex64_t *alpha, CHAM_desc_t *A, CHAM_desc_t *B, CHAMELEON_Complex64_t *beta, CHAM_desc_t *C, RUNTIME_sequence_t *sequence, RUNTIME_request_t *request, int *info)
-{ *info = CHAMELEON_zgemm_Tile_Async(*transA, *transB, *alpha, A, B, *beta, C, sequence, request); }
+{ *info = CHAMELEON_zgemm_Tile_Async(*transA, *transB, *alpha, A, B, *beta, C, NULL, sequence, request); }
void CHAMELEON_ZGEQRF_TILE_ASYNC(CHAM_desc_t *A, CHAM_desc_t *T, RUNTIME_sequence_t *sequence, RUNTIME_request_t *request, int *info)
{ *info = CHAMELEON_zgeqrf_Tile_Async(A, T, sequence, request); }
--
GitLab