Update lapacke_cgedmdq.c
This commit is contained in:
parent
12b3b5d355
commit
7a87709064
|
@ -103,7 +103,7 @@ lapack_int LAPACKE_cgedmdq( int matrix_layout, char jobs, char jobz, char jobr,
|
||||||
info = LAPACK_WORK_MEMORY_ERROR;
|
info = LAPACK_WORK_MEMORY_ERROR;
|
||||||
goto exit_level_0;
|
goto exit_level_0;
|
||||||
}
|
}
|
||||||
work = (lapack_complex_float*)LAPACKE_malloc( sizeof(lapack_complex_float) * lwork );
|
work = (float*)LAPACKE_malloc( sizeof(lapack_complex_float) * lwork );
|
||||||
if( work == NULL ) {
|
if( work == NULL ) {
|
||||||
info = LAPACK_WORK_MEMORY_ERROR;
|
info = LAPACK_WORK_MEMORY_ERROR;
|
||||||
goto exit_level_1;
|
goto exit_level_1;
|
||||||
|
|
Loading…
Reference in New Issue