Fix precision of mips dsdot

This commit is contained in:
Martin Kroeker 2018-04-10 23:30:59 +02:00 committed by GitHub
parent 0ab5bf1746
commit 0fe434598b
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 5 additions and 2 deletions

View File

@ -41,8 +41,11 @@ FLOAT CNAME(BLASLONG n, FLOAT *x, BLASLONG inc_x, FLOAT *y, BLASLONG inc_y)
while(i < n) while(i < n)
{ {
#if defined(DSDOT)
dot += y[iy] * x[ix] ; dot += (double)(y[iy] * (double)x[ix] ;
#else
dot += y[iy] * x[ix];
#endif
ix += inc_x ; ix += inc_x ;
iy += inc_y ; iy += inc_y ;
i++ ; i++ ;