diff options
Diffstat (limited to 'LAPACKE/src/lapacke_zgemlq.c')
| -rw-r--r-- | LAPACKE/src/lapacke_zgemlq.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/LAPACKE/src/lapacke_zgemlq.c b/LAPACKE/src/lapacke_zgemlq.c index cce77032..b47ca26a 100644 --- a/LAPACKE/src/lapacke_zgemlq.c +++ b/LAPACKE/src/lapacke_zgemlq.c @@ -65,7 +65,7 @@ lapack_int LAPACKE_zgemlq( int matrix_layout, char side, char trans, if( info != 0 ) { goto exit_level_0; } - lwork = (lapack_int)work_query; + lwork = LAPACK_Z2INT( work_query ); /* Allocate memory for work arrays */ work = (lapack_complex_double*)LAPACKE_malloc( sizeof(lapack_complex_double) * lwork ); if( work == NULL ) { |