LINALG 1.2.0 iteration 1.

[dense-linear-algebra-libraries/linalg.git] / blis / testsuite / src / test_gemm_ukr.c

diff --git a/blis/testsuite/src/test_gemm_ukr.c b/blis/testsuite/src/test_gemm_ukr.c
index 5506bedb16f20eb5e8728b5cf256dd5d9a9e7102..9cf862391b5dda7803ba8af5cdd551f1abc0c0b7 100644 (file)
--- a/blis/testsuite/src/test_gemm_ukr.c
+++ b/blis/testsuite/src/test_gemm_ukr.c
@@ -56,7 +56,7 @@ void libblis_test_gemm_ukr_experiment( test_params_t* params,
                                        char*          pc_str,
                                        char*          sc_str,
                                        unsigned int   p_cur,
-                                       double*        perf,
+                                       perf_t*        perf,
                                        double*        resid );
 
 void libblis_test_gemm_ukr_impl( iface_t   iface,
@@ -131,7 +131,7 @@ void libblis_test_gemm_ukr_experiment( test_params_t* params,
                                        char*          pc_str,
                                        char*          sc_str,
                                        unsigned int   p_cur,
-                                       double*        perf,
+                                       perf_t*        perf,
                                        double*        resid )
 {
        unsigned int n_repeats = params->n_repeats;
@@ -238,8 +238,9 @@ void libblis_test_gemm_ukr_experiment( test_params_t* params,
        }
 
        // Estimate the performance of the best experiment repeat.
-       *perf = ( 2.0 * m * n * k ) / time_min / FLOPS_PER_UNIT_PERF;
-       if ( bli_obj_is_complex( c ) ) *perf *= 4.0;
+       perf->gflops = ( 2.0 * m * n * k ) / time_min / FLOPS_PER_UNIT_PERF;
+       if ( bli_obj_is_complex( c ) ) perf->gflops *= 4.0;
+       perf->time = time_min;
 
        // Perform checks.
        libblis_test_gemm_ukr_check( &alpha, &a, &b, &beta, &c, &c_save, resid );