From daf193999610a74aed5e330027c93f902dc510c7 Mon Sep 17 00:00:00 2001 From: Mathieu Faverge <mathieu.faverge@inria.fr> Date: Mon, 14 Feb 2022 18:11:43 +0100 Subject: [PATCH] testing/norm: add missing args parameter --- testing/testing_zlange.c | 4 ++-- testing/testing_zlanhe.c | 4 ++-- testing/testing_zlansy.c | 2 +- testing/testing_zlantr.c | 2 +- 4 files changed, 6 insertions(+), 6 deletions(-) diff --git a/testing/testing_zlange.c b/testing/testing_zlange.c index 404c7d3f5..16906f842 100644 --- a/testing/testing_zlange.c +++ b/testing/testing_zlange.c @@ -136,13 +136,13 @@ testing_zlange_std( run_arg_list_t *args, int check ) /* Calculates the norm */ testing_start( &test_data ); - norm = CHAMELEON_zlange( norm_type, M, N, A, LDA ); + norm = CHAMELEON_zlange( norm_type, M, N, A, LDA ); test_data.hres = hres; testing_stop( &test_data, flops_zlange( norm_type, M, N ) ); /* Checks the solution */ if ( check ) { - hres = check_znorm_std( ChamGeneral, norm_type, ChamUpperLower, ChamNonUnit, norm, M, N, A, LDA ); + hres = check_znorm_std( args, ChamGeneral, norm_type, ChamUpperLower, ChamNonUnit, norm, M, N, A, LDA ); } free( A ); diff --git a/testing/testing_zlanhe.c b/testing/testing_zlanhe.c index a761f5a0c..bc714cb6a 100644 --- a/testing/testing_zlanhe.c +++ b/testing/testing_zlanhe.c @@ -138,13 +138,13 @@ testing_zlanhe_std( run_arg_list_t *args, int check ) /* Calculates the norm */ testing_start( &test_data ); - norm = CHAMELEON_zlanhe( norm_type, uplo, N, A, LDA ); + norm = CHAMELEON_zlanhe( norm_type, uplo, N, A, LDA ); test_data.hres = hres; testing_stop( &test_data, flops_zlanhe( norm_type, N ) ); /* Checks the solution */ if ( check ) { - hres = check_znorm_std( ChamHermitian, norm_type, uplo, ChamNonUnit, norm, N, N, A, LDA ); + hres = check_znorm_std( args, ChamHermitian, norm_type, uplo, ChamNonUnit, norm, N, N, A, LDA ); } free( A ); diff --git a/testing/testing_zlansy.c b/testing/testing_zlansy.c index aaef481f2..572cbdb55 100644 --- a/testing/testing_zlansy.c +++ b/testing/testing_zlansy.c @@ -144,7 +144,7 @@ testing_zlansy_std( run_arg_list_t *args, int check ) /* Checks the solution */ if ( check ) { - hres = check_znorm_std( ChamSymmetric, norm_type, uplo, ChamNonUnit, norm, N, N, A, LDA ); + hres = check_znorm_std( args, ChamSymmetric, norm_type, uplo, ChamNonUnit, norm, N, N, A, LDA ); } free( A ); diff --git a/testing/testing_zlantr.c b/testing/testing_zlantr.c index ce6ce9e7f..fcbb174b3 100644 --- a/testing/testing_zlantr.c +++ b/testing/testing_zlantr.c @@ -165,7 +165,7 @@ testing_zlantr_std( run_arg_list_t *args, int check ) /* Checks the solution */ if ( check ) { - hres = check_znorm_std( ChamTriangular, norm_type, uplo, diag, norm, M, N, A, LDA ); + hres = check_znorm_std( args, ChamTriangular, norm_type, uplo, diag, norm, M, N, A, LDA ); } free( A ); -- GitLab