fix loop condition for incx < 0

martin-frbg · Mar 12, 2024 · f747aed · f747aed
1 parent 23796f8
commit f747aed
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/kernel/mips/znrm2.c b/kernel/mips/znrm2.c
@@ -53,7 +53,7 @@ FLOAT CNAME(BLASLONG n, FLOAT *x, BLASLONG inc_x)
 	inc_x2 = 2 * inc_x;
 
 	n *= inc_x2;
-	while(i < n)
+	while(abs(i) < abs(n))
 	{
 
 		if ( x[i] != 0.0 )