Merge pull request #4552 from martin-frbg/issue4551

Allow negative INC_X in arm64 ThunderX2T99 and Apple M ?NRM2
This commit is contained in:
Martin Kroeker
2024-03-12 10:08:09 +01:00
committed by GitHub
2 changed files with 2 additions and 2 deletions

View File

@@ -345,7 +345,7 @@ FLOAT CNAME(BLASLONG n, FLOAT *x, BLASLONG inc_x)
#endif
FLOAT ssq, scale;
if (n <= 0 || inc_x <= 0) return 0.0;
if (n <= 0 || inc_x == 0) return 0.0;
#if defined(SMP)
if (n <= 10000)

View File

@@ -315,7 +315,7 @@ FLOAT CNAME(BLASLONG n, FLOAT *x, BLASLONG inc_x)
FLOAT nrm2 = 0.0;
double nrm2_double = 0.0;
if (n <= 0 || inc_x <= 0) return 0.0;
if (n <= 0 || inc_x == 0) return 0.0;
#if defined(SMP)
if (n <= 10000)