Add missing API_SUFFIX wrapper

This commit is contained in:
Martin Kroeker
2024-08-20 17:07:42 +02:00
committed by GitHub
parent 5c03f73611
commit 4b85a11e56
+1 -1
View File
@@ -51,7 +51,7 @@ lapack_int API_SUFFIX(LAPACKE_ctfsm_work)( int matrix_layout, char transr, char
lapack_int mn = m;
lapack_complex_float* b_t = NULL;
lapack_complex_float* a_t = NULL;
if( LAPACKE_lsame( side, 'r' ) ) mn = n;
if( API_SUFFIX(LAPACKE_lsame)( side, 'r' ) ) mn = n;
/* Check leading dimension(s) */
if( ldb < m ) {
info = -12;