Update zdot.c
This commit is contained in:
parent
5813ed095b
commit
211d2eceb5
|
@ -160,6 +160,7 @@ OPENBLAS_COMPLEX_FLOAT CNAME(blasint n, FLOAT *x, blasint incx, FLOAT *y, blasin
|
||||||
|
|
||||||
if (n <= 0) {
|
if (n <= 0) {
|
||||||
#ifdef FORCE_USE_STACK
|
#ifdef FORCE_USE_STACK
|
||||||
|
OPENBLAS_COMPLEX_FLOAT zero=OPENBLAS_MAKE_COMPLEX_FLOAT(0.0, 0.0);
|
||||||
*result = zero;
|
*result = zero;
|
||||||
// CREAL(*result) = 0.0;
|
// CREAL(*result) = 0.0;
|
||||||
// CIMAG(*result) = 0.0;
|
// CIMAG(*result) = 0.0;
|
||||||
|
|
Loading…
Reference in New Issue