Browse Source

just use numeric constants in dimensions

tags/v0.3.28^2
Martin Kroeker GitHub 1 year ago
parent
commit
a090011fbf
No known key found for this signature in database GPG Key ID: B5690EEEBB952194
1 changed files with 18 additions and 14 deletions
  1. +18
    -14
      utest/test_gemv.c

+ 18
- 14
utest/test_gemv.c View File

@@ -7,22 +7,21 @@
#ifndef INFINITY
#define INFINITY 1.0/0.0
#endif
#define N 17
#define Ny 33

#ifdef BUILD_SINGLE

CTEST(sgemv, 0_nan_inf)
{
int i;
blasint N = 17;
blasint incX = 1;
blasint incY = 1;
float alpha = 0.0;
float beta = 0.0;
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(X, 0, sizeof(X));
@@ -40,14 +39,16 @@ CTEST(sgemv, 0_nan_inf)
CTEST(sgemv, 0_nan_inf_incy_2)
{
int i;
blasint N = 17;
blasint Ny = 33;
blasint incX = 1;
blasint incY = 2;
float alpha = 0.0;
float beta = 0.0;
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;

memset(A, 0, sizeof(A));
@@ -72,14 +73,15 @@ CTEST(sgemv, 0_nan_inf_incy_2)
CTEST(dgemv, 0_nan_inf)
{
int i;
blasint N = 17;
blasint incX = 1;
blasint incY = 1;
double alpha = 0.0;
double beta = 0.0;
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(X, 0, sizeof(X));
@@ -97,14 +99,16 @@ CTEST(dgemv, 0_nan_inf)
CTEST(dgemv, 0_nan_inf_incy_2)
{
int i;
blasint N = 17;
blasint Ny = 33;
blasint incX = 1;
blasint incY = 2;
double alpha = 0.0;
double beta = 0.0;
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;

memset(A, 0, sizeof(A));


Loading…
Cancel
Save