Skip to content

Commit 57208b8

Browse files
authored
Disable tests with incx,incy=0 (undefined behavior)
1 parent 3a4a9b2 commit 57208b8

File tree

1 file changed

+4
-4
lines changed

1 file changed

+4
-4
lines changed

utest/test_extensions/test_zrot.c

Lines changed: 4 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -164,7 +164,7 @@ static double c_api_check_zdrot(blasint n, blasint inc_x, blasint inc_y, double
164164
norm += cblas_dznrm2(n, data_zrot.y_test, inc_y_abs);
165165
return (norm / 2);
166166
}
167-
167+
#if 0
168168
/**
169169
* Fortran API specific test
170170
* Test zrot by comparing it with zaxpby.
@@ -190,7 +190,7 @@ CTEST(zrot, inc_x_0_inc_y_0)
190190
double norm = check_zdrot(n, inc_x, inc_y, c, s);
191191
ASSERT_DBL_NEAR_TOL(0.0, norm, DOUBLE_EPS);
192192
}
193-
193+
#endif
194194
/**
195195
* Fortran API specific test
196196
* Test zrot by comparing it with zaxpby.
@@ -476,7 +476,7 @@ CTEST(zrot, check_n_zero)
476476
double norm = check_zdrot(n, inc_x, inc_y, c, s);
477477
ASSERT_DBL_NEAR_TOL(0.0, norm, DOUBLE_EPS);
478478
}
479-
479+
#if 0
480480
/**
481481
* C API specific test
482482
* Test zrot by comparing it with zaxpby.
@@ -502,7 +502,7 @@ CTEST(zrot, c_api_inc_x_0_inc_y_0)
502502
double norm = c_api_check_zdrot(n, inc_x, inc_y, c, s);
503503
ASSERT_DBL_NEAR_TOL(0.0, norm, DOUBLE_EPS);
504504
}
505-
505+
#endif
506506
/**
507507
* C API specific test
508508
* Test zrot by comparing it with zaxpby.

0 commit comments

Comments
 (0)