Update cscal.c
This commit is contained in:
parent
ef57747679
commit
892b65c22d
|
@ -355,7 +355,7 @@ int CNAME(BLASLONG n, BLASLONG dummy0, BLASLONG dummy1, FLOAT da_r, FLOAT da_i,
|
||||||
if (isnan(da_r)) res = da_r;
|
if (isnan(da_r)) res = da_r;
|
||||||
while (j < n) {
|
while (j < n) {
|
||||||
|
|
||||||
x[i] = res
|
x[i] = res;
|
||||||
x[i + 1] = res;
|
x[i + 1] = res;
|
||||||
i += 2;
|
i += 2;
|
||||||
j++;
|
j++;
|
||||||
|
|
Loading…
Reference in New Issue