From 396b456fb8bbff6686406433b377697759802ef7 Mon Sep 17 00:00:00 2001
From: Mathieu Faverge <mathieu.faverge@inria.fr>
Date: Thu, 12 Jan 2017 18:35:22 +0100
Subject: [PATCH] Remove debug check
---
testing/testing_zgeqrf_qdwh.c | 17 +++++++----------
1 file changed, 7 insertions(+), 10 deletions(-)
diff --git a/testing/testing_zgeqrf_qdwh.c b/testing/testing_zgeqrf_qdwh.c
index 428473384..956ffa3f9 100644
--- a/testing/testing_zgeqrf_qdwh.c
+++ b/testing/testing_zgeqrf_qdwh.c
@@ -67,7 +67,7 @@ int testing_zgeqrf_qdwh(int argc, char **argv)
int LDA = 2*M;
double eps;
int info_ortho, info_solution, info_factorization;
- int i, j, rc;
+ int i, j;
/**
* Compute A = QR with
@@ -109,17 +109,14 @@ int testing_zgeqrf_qdwh(int argc, char **argv)
LAPACKE_zlacpy_work( LAPACK_COL_MAJOR, 'A', M, M, A2, M, A + M, LDA );
/* Factorize A */
- rc = MORSE_zgeqrf( M, M, A1, M, T1 );
- assert( rc == 0 );
- rc = MORSE_ztpqrt( M, M, optid ? M : 0,
- A1, M,
- A2, M, T2 );
- assert( rc == 0 );
+ MORSE_zgeqrf( M, M, A1, M, T1 );
+ MORSE_ztpqrt( M, M, optid ? M : 0,
+ A1, M,
+ A2, M, T2 );
/* Generate the Q */
- rc = MORSE_ztpgqrt( M, M, M, (optid) ? M : 0,
- A1, M, T1, A2, M, T2, Q1, M, Q2, M );
- assert( rc == 0 );
+ MORSE_ztpgqrt( M, M, M, (optid) ? M : 0,
+ A1, M, T1, A2, M, T2, Q1, M, Q2, M );
/* Copy Q in a single matrix */
Q = (MORSE_Complex64_t *)malloc(2*M*M*sizeof(MORSE_Complex64_t));
--
GitLab