diff options
Diffstat (limited to 'LAPACKE/src/lapacke_dgesvj_work.c')
-rw-r--r-- | LAPACKE/src/lapacke_dgesvj_work.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/LAPACKE/src/lapacke_dgesvj_work.c b/LAPACKE/src/lapacke_dgesvj_work.c index f2b1b9cd..83f07b49 100644 --- a/LAPACKE/src/lapacke_dgesvj_work.c +++ b/LAPACKE/src/lapacke_dgesvj_work.c @@ -48,8 +48,8 @@ lapack_int LAPACKE_dgesvj_work( int matrix_layout, char joba, char jobu, info = info - 1; } } else if( matrix_layout == LAPACK_ROW_MAJOR ) { - lapack_int nrows_v = LAPACKE_lsame( jobv, 'v' ) ? n : - ( LAPACKE_lsame( jobv, 'a' ) ? mv : 1); + lapack_int nrows_v = LAPACKE_lsame( jobv, 'v' ) ? MAX(0,n) : + ( LAPACKE_lsame( jobv, 'a' ) ? MAX(0,mv) : 0); lapack_int lda_t = MAX(1,m); lapack_int ldv_t = MAX(1,nrows_v); double* a_t = NULL; |