From e3829c0e2295a44e92dc4ae6ccc25b66c3c851bd Mon Sep 17 00:00:00 2001 From: cmoha Date: Tue, 6 Dec 2016 18:33:11 +0200 Subject: [PATCH] fix #5 --- LAPACKE/src/lapacke_csytrf_aa.c | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/LAPACKE/src/lapacke_csytrf_aa.c b/LAPACKE/src/lapacke_csytrf_aa.c index a3bd58f..53e09d9 100644 --- a/LAPACKE/src/lapacke_csytrf_aa.c +++ b/LAPACKE/src/lapacke_csytrf_aa.c @@ -33,7 +33,7 @@ #include "lapacke_utils.h" -lapack_int LAPACKE_csytrf( int matrix_layout, char uplo, lapack_int n, +lapack_int LAPACKE_csytrf_aa( int matrix_layout, char uplo, lapack_int n, lapack_complex_float* a, lapack_int lda, lapack_int* ipiv ) { @@ -42,7 +42,7 @@ lapack_int LAPACKE_csytrf( int matrix_layout, char uplo, lapack_int n, lapack_complex_float* work = NULL; lapack_complex_float work_query; if( matrix_layout != LAPACK_COL_MAJOR && matrix_layout != LAPACK_ROW_MAJOR ) { - LAPACKE_xerbla( "LAPACKE_csytrf", -1 ); + LAPACKE_xerbla( "LAPACKE_csytrf_aa", -1 ); return -1; } #ifndef LAPACK_DISABLE_NAN_CHECK @@ -72,7 +72,7 @@ lapack_int LAPACKE_csytrf( int matrix_layout, char uplo, lapack_int n, LAPACKE_free( work ); exit_level_0: if( info == LAPACK_WORK_MEMORY_ERROR ) { - LAPACKE_xerbla( "LAPACKE_csytrf", info ); + LAPACKE_xerbla( "LAPACKE_csytrf_aa", info ); } return info; } -- 2.7.4