The assembly microkernel is not safe to use on ELFv1
This commit is contained in:
parent
928fe1b28e
commit
d999688d1a
|
@ -326,13 +326,15 @@ BLASLONG CNAME(BLASLONG n, FLOAT *x, BLASLONG inc_x) {
|
||||||
minf = ABS(x[0]); //index's not incremented
|
minf = ABS(x[0]); //index's not incremented
|
||||||
if (inc_x == 1) {
|
if (inc_x == 1) {
|
||||||
|
|
||||||
|
#if defined(_CALL_ELF) && (_CALL_ELF == 2)
|
||||||
BLASLONG n1 = n & -32;
|
BLASLONG n1 = n & -32;
|
||||||
if (n1 > 0) {
|
if (n1 > 0) {
|
||||||
|
|
||||||
min = diamin_kernel_32(n1, x, &minf);
|
min = diamin_kernel_32(n1, x, &minf);
|
||||||
i = n1;
|
i = n1;
|
||||||
}
|
}
|
||||||
|
#endif
|
||||||
|
|
||||||
while (i < n) {
|
while (i < n) {
|
||||||
if (ABS(x[i]) < minf) {
|
if (ABS(x[i]) < minf) {
|
||||||
min = i;
|
min = i;
|
||||||
|
|
Loading…
Reference in New Issue