Merge pull request #3930 from sergei-lewis/dot-kernel-early-bail

martin-frbg · web-flow · commit f616c8640417 · 2023-03-02T16:46:25.000+01:00
dot.c early bail fix
diff --git a/kernel/generic/dot.c b/kernel/generic/dot.c
@@ -43,7 +43,7 @@ FLOAT CNAME(BLASLONG n, FLOAT *x, BLASLONG inc_x, FLOAT *y, BLASLONG inc_y)
 	FLOAT  dot = 0.0 ;
 #endif
 
-	if ( n < 0 )  return(dot);
+	if ( n < 1 )  return(dot);
 
 	if ( (inc_x == 1) && (inc_y == 1) )
 	{
diff --git a/kernel/riscv64/dot.c b/kernel/riscv64/dot.c
@@ -46,7 +46,7 @@ FLOAT CNAME(BLASLONG n, FLOAT *x, BLASLONG inc_x, FLOAT *y, BLASLONG inc_y)
 	BLASLONG ix=0,iy=0;
 	double dot = 0.0 ;
 
-	if ( n < 0 )  return(dot);
+	if ( n < 1 )  return(dot);
 
 	while(i < n)
 	{

Original file line number	Diff line number	Diff line change
`@@ -43,7 +43,7 @@ FLOAT CNAME(BLASLONG n, FLOAT x, BLASLONG inc_x, FLOAT y, BLASLONG inc_y)`
`43`	`43`	`FLOAT dot = 0.0 ;`
`44`	`44`	`#endif`
`45`	`45`
`46`		`- if ( n < 0 ) return(dot);`
	`46`	`+ if ( n < 1 ) return(dot);`
`47`	`47`
`48`	`48`	`if ( (inc_x == 1) && (inc_y == 1) )`
`49`	`49`	`{`
Original file line number	Diff line number	Diff line change
`@@ -46,7 +46,7 @@ FLOAT CNAME(BLASLONG n, FLOAT x, BLASLONG inc_x, FLOAT y, BLASLONG inc_y)`
`46`	`46`	`BLASLONG ix=0,iy=0;`
`47`	`47`	`double dot = 0.0 ;`
`48`	`48`
`49`		`- if ( n < 0 ) return(dot);`
	`49`	`+ if ( n < 1 ) return(dot);`
`50`	`50`
`51`	`51`	`while(i < n)`
`52`	`52`	`{`