Skip to content

Commit 489a288

Browse files
committed
Fix MinGW build error
With MinGW the build fails for some LAPACKE xgesvd routines with: lapacke_cgesvdq.c:74:5: error: aggregate value used where an integer was expected Seems the C2INT macro is useful there.
1 parent 3b4e807 commit 489a288

File tree

2 files changed

+2
-2
lines changed

2 files changed

+2
-2
lines changed

LAPACKE/src/lapacke_cgesvdq.c

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -71,7 +71,7 @@ lapack_int LAPACKE_cgesvdq( int matrix_layout, char joba, char jobp,
7171
goto exit_level_0;
7272
}
7373
liwork = (lapack_int)iwork_query;
74-
lcwork = (lapack_int)cwork_query;
74+
lcwork = LAPACK_C2INT(cwork_query);
7575
lrwork = (lapack_int)rwork_query;
7676
/* Allocate memory for work arrays */
7777
iwork = (lapack_int*)LAPACKE_malloc( sizeof(lapack_int) * liwork );

LAPACKE/src/lapacke_zgesvdq.c

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -71,7 +71,7 @@ lapack_int LAPACKE_zgesvdq( int matrix_layout, char joba, char jobp,
7171
goto exit_level_0;
7272
}
7373
liwork = (lapack_int)iwork_query;
74-
lcwork = (lapack_int)cwork_query;
74+
lcwork = LAPACK_C2INT(cwork_query);
7575
lrwork = (lapack_int)rwork_query;
7676
/* Allocate memory for work arrays */
7777
iwork = (lapack_int*)LAPACKE_malloc( sizeof(lapack_int) * liwork );

0 commit comments

Comments
 (0)