diff --git a/interface/imatcopy.c b/interface/imatcopy.c index f4309a85c..4485af6d5 100644 --- a/interface/imatcopy.c +++ b/interface/imatcopy.c @@ -121,7 +121,7 @@ void CNAME( enum CBLAS_ORDER CORDER, enum CBLAS_TRANSPOSE CTRANS, blasint crows, return; } #ifdef NEW_IMATCOPY - if ( *lda == *ldb ) { + if ( *lda == *ldb && *cols == *rows ) { if ( order == BlasColMajor ) { if ( trans == BlasNoTrans )