Skip to content
Merged
Prev Previous commit
Next Next commit
Add missing API_SUFFIX wrapper
  • Loading branch information
martin-frbg authored Aug 20, 2024
commit 4416581d7532317932e3b7fc37a60cdc399b4a46
2 changes: 1 addition & 1 deletion LAPACKE/src/lapacke_ztfsm_work.c
Original file line number Diff line number Diff line change
Expand Up @@ -51,7 +51,7 @@ lapack_int API_SUFFIX(LAPACKE_ztfsm_work)( int matrix_layout, char transr, char
lapack_int mn = m;
lapack_complex_double* b_t = NULL;
lapack_complex_double* 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;
Expand Down