Skip to content
Merged
Next Next commit
add missing API_SUFFIX wrapper
  • Loading branch information
martin-frbg authored Aug 20, 2024
commit 5c03f7361154678a1fadb9d408e4f16011f9a325
2 changes: 1 addition & 1 deletion LAPACKE/src/lapacke_ctfsm.c
Original file line number Diff line number Diff line change
Expand Up @@ -45,7 +45,7 @@ lapack_int API_SUFFIX(LAPACKE_ctfsm)( int matrix_layout, char transr, char side,
#ifndef LAPACK_DISABLE_NAN_CHECK
if( LAPACKE_get_nancheck() ) {
lapack_int mn = m;
if( LAPACKE_lsame( side, 'r' ) ) mn = n;
if( API_SUFFIX(LAPACKE_lsame)( side, 'r' ) ) mn = n;
/* Optionally check input matrices for NaNs */
if( IS_C_NONZERO(alpha) ) {
if( API_SUFFIX(LAPACKE_ctf_nancheck)( matrix_layout, transr, uplo, diag, mn, a ) ) {
Expand Down