| @@ -7,22 +7,21 @@ | |||||
| #ifndef INFINITY | #ifndef INFINITY | ||||
| #define INFINITY 1.0/0.0 | #define INFINITY 1.0/0.0 | ||||
| #endif | #endif | ||||
| #define N 17 | |||||
| #define Ny 33 | |||||
| #ifdef BUILD_SINGLE | #ifdef BUILD_SINGLE | ||||
| CTEST(sgemv, 0_nan_inf) | CTEST(sgemv, 0_nan_inf) | ||||
| { | { | ||||
| int i; | int i; | ||||
| blasint N = 17; | |||||
| blasint incX = 1; | blasint incX = 1; | ||||
| blasint incY = 1; | blasint incY = 1; | ||||
| float alpha = 0.0; | float alpha = 0.0; | ||||
| float beta = 0.0; | float beta = 0.0; | ||||
| char trans = 'N'; | char trans = 'N'; | ||||
| float A[N * N]; | |||||
| float X[N]; | |||||
| float Y[N]; | |||||
| float A[17 * 17]; | |||||
| float X[17]; | |||||
| float Y[17]; | |||||
| memset(A, 0, sizeof(A)); | memset(A, 0, sizeof(A)); | ||||
| memset(X, 0, sizeof(X)); | memset(X, 0, sizeof(X)); | ||||
| @@ -40,14 +39,16 @@ CTEST(sgemv, 0_nan_inf) | |||||
| CTEST(sgemv, 0_nan_inf_incy_2) | CTEST(sgemv, 0_nan_inf_incy_2) | ||||
| { | { | ||||
| int i; | int i; | ||||
| blasint N = 17; | |||||
| blasint Ny = 33; | |||||
| blasint incX = 1; | blasint incX = 1; | ||||
| blasint incY = 2; | blasint incY = 2; | ||||
| float alpha = 0.0; | float alpha = 0.0; | ||||
| float beta = 0.0; | float beta = 0.0; | ||||
| char trans = 'N'; | char trans = 'N'; | ||||
| float A[N * N]; | |||||
| float X[N]; | |||||
| float Y[Ny]; | |||||
| float A[17 * 17]; | |||||
| float X[17]; | |||||
| float Y[33]; | |||||
| float *ay = Y; | float *ay = Y; | ||||
| memset(A, 0, sizeof(A)); | memset(A, 0, sizeof(A)); | ||||
| @@ -72,14 +73,15 @@ CTEST(sgemv, 0_nan_inf_incy_2) | |||||
| CTEST(dgemv, 0_nan_inf) | CTEST(dgemv, 0_nan_inf) | ||||
| { | { | ||||
| int i; | int i; | ||||
| blasint N = 17; | |||||
| blasint incX = 1; | blasint incX = 1; | ||||
| blasint incY = 1; | blasint incY = 1; | ||||
| double alpha = 0.0; | double alpha = 0.0; | ||||
| double beta = 0.0; | double beta = 0.0; | ||||
| char trans = 'N'; | char trans = 'N'; | ||||
| double A[N * N]; | |||||
| double X[N]; | |||||
| double Y[N]; | |||||
| double A[17 * 17]; | |||||
| double X[17]; | |||||
| double Y[17]; | |||||
| memset(A, 0, sizeof(A)); | memset(A, 0, sizeof(A)); | ||||
| memset(X, 0, sizeof(X)); | memset(X, 0, sizeof(X)); | ||||
| @@ -97,14 +99,16 @@ CTEST(dgemv, 0_nan_inf) | |||||
| CTEST(dgemv, 0_nan_inf_incy_2) | CTEST(dgemv, 0_nan_inf_incy_2) | ||||
| { | { | ||||
| int i; | int i; | ||||
| blasint N = 17; | |||||
| blasint Ny = 33; | |||||
| blasint incX = 1; | blasint incX = 1; | ||||
| blasint incY = 2; | blasint incY = 2; | ||||
| double alpha = 0.0; | double alpha = 0.0; | ||||
| double beta = 0.0; | double beta = 0.0; | ||||
| char trans = 'N'; | char trans = 'N'; | ||||
| double A[N * N]; | |||||
| double X[N]; | |||||
| double Y[Ny]; | |||||
| double A[17 * 17]; | |||||
| double X[17]; | |||||
| double Y[33]; | |||||
| double *ay = Y; | double *ay = Y; | ||||
| memset(A, 0, sizeof(A)); | memset(A, 0, sizeof(A)); | ||||