From 59665e2b6cb4ae4ecb8bae779562aa509b56d497 Mon Sep 17 00:00:00 2001 From: julie Date: Tue, 23 Feb 2016 06:09:49 +0000 Subject: [PATCH] APPLYING INTEL PATCHES sent to Julie on Feb 19th 2016 by Dima from INTEL (dmitry.g.baksheev@intel.com) [PATCH 39/42] Fix lapacke_?hetri2x - avoid nancheck of unset data --- LAPACKE/src/lapacke_chetri2x.c | 2 +- LAPACKE/src/lapacke_zhetri2x.c | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/LAPACKE/src/lapacke_chetri2x.c b/LAPACKE/src/lapacke_chetri2x.c index 1d97571..550a210 100644 --- a/LAPACKE/src/lapacke_chetri2x.c +++ b/LAPACKE/src/lapacke_chetri2x.c @@ -45,7 +45,7 @@ lapack_int LAPACKE_chetri2x( int matrix_layout, char uplo, lapack_int n, } #ifndef LAPACK_DISABLE_NAN_CHECK /* Optionally check input matrices for NaNs */ - if( LAPACKE_cge_nancheck( matrix_layout, lda, n, a, lda ) ) { + if( LAPACKE_cge_nancheck( matrix_layout, n, n, a, lda ) ) { return -4; } #endif diff --git a/LAPACKE/src/lapacke_zhetri2x.c b/LAPACKE/src/lapacke_zhetri2x.c index a2835dc..55b005e 100644 --- a/LAPACKE/src/lapacke_zhetri2x.c +++ b/LAPACKE/src/lapacke_zhetri2x.c @@ -45,7 +45,7 @@ lapack_int LAPACKE_zhetri2x( int matrix_layout, char uplo, lapack_int n, } #ifndef LAPACK_DISABLE_NAN_CHECK /* Optionally check input matrices for NaNs */ - if( LAPACKE_zge_nancheck( matrix_layout, lda, n, a, lda ) ) { + if( LAPACKE_zge_nancheck( matrix_layout, n, n, a, lda ) ) { return -4; } #endif -- 2.7.4