@@ -166,7 +166,7 @@ static float c_api_check_csrot(blasint n, blasint inc_x, blasint inc_y, float *c
166166 norm += cblas_scnrm2 (n , data_crot .y_test , inc_y_abs );
167167 return (norm / 2 );
168168}
169-
169+ #if 0
170170/**
171171 * Fortran API specific test
172172 * Test crot by comparing it with caxpby.
@@ -192,7 +192,7 @@ CTEST(crot, inc_x_0_inc_y_0)
192192 float norm = check_csrot (n , inc_x , inc_y , c , s );
193193 ASSERT_DBL_NEAR_TOL (0.0f , norm , SINGLE_EPS );
194194}
195-
195+ #endif
196196/**
197197 * Fortran API specific test
198198 * Test crot by comparing it with caxpby.
@@ -478,7 +478,7 @@ CTEST(crot, check_n_zero)
478478 float norm = check_csrot (n , inc_x , inc_y , c , s );
479479 ASSERT_DBL_NEAR_TOL (0.0f , norm , SINGLE_EPS );
480480}
481-
481+ #if 0
482482/**
483483 * C API specific test
484484 * Test crot by comparing it with caxpby.
@@ -504,7 +504,7 @@ CTEST(crot, c_api_inc_x_0_inc_y_0)
504504 float norm = c_api_check_csrot (n , inc_x , inc_y , c , s );
505505 ASSERT_DBL_NEAR_TOL (0.0f , norm , SINGLE_EPS );
506506}
507-
507+ #endif
508508/**
509509 * C API specific test
510510 * Test crot by comparing it with caxpby.
0 commit comments