make NAN handling depend on dummy2 parameter
This commit is contained in:
parent
7284c533b5
commit
3870995f01
|
@ -71,7 +71,7 @@ int CNAME(BLASLONG n, BLASLONG dummy0, BLASLONG dummy1, FLOAT da, FLOAT *x, BLAS
|
||||||
FLOAT_V_T v0, v1;
|
FLOAT_V_T v0, v1;
|
||||||
unsigned int gvl = 0;
|
unsigned int gvl = 0;
|
||||||
if(inc_x == 1){
|
if(inc_x == 1){
|
||||||
if (0){ //if(da == 0.0){
|
if(dummy2 == 0 && da == 0.0){
|
||||||
memset(&x[0], 0, n * sizeof(FLOAT));
|
memset(&x[0], 0, n * sizeof(FLOAT));
|
||||||
}else{
|
}else{
|
||||||
gvl = VSETVL(n);
|
gvl = VSETVL(n);
|
||||||
|
@ -96,7 +96,7 @@ int CNAME(BLASLONG n, BLASLONG dummy0, BLASLONG dummy1, FLOAT da, FLOAT *x, BLAS
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
}else{
|
}else{
|
||||||
if (0) { //if(da == 0.0){
|
if(dummy2 == 0 && da == 0.0){
|
||||||
BLASLONG stride_x = inc_x * sizeof(FLOAT);
|
BLASLONG stride_x = inc_x * sizeof(FLOAT);
|
||||||
BLASLONG ix = 0;
|
BLASLONG ix = 0;
|
||||||
gvl = VSETVL(n);
|
gvl = VSETVL(n);
|
||||||
|
|
Loading…
Reference in New Issue