floraachy
/
OpenBLAS
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

[ZARCH] fix sgemv_n_4.c

This commit is contained in:
maamountki 2019-01-11 17:08:24 +02:00 committed by GitHub
parent 67432b23c2
commit 5d89d6b143
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
kernel/zarch/sgemv_n_4.c
View File

@ -435,7 +435,7 @@ int CNAME(BLASLONG m, BLASLONG n, BLASLONG dummy1, FLOAT alpha, FLOAT *a, BLASLO
ap[3] = ap[2] + lda; ap[3] = ap[2] + lda;
if ( inc_y != 1 ) if ( inc_y != 1 )
memset(ybuffer,0,NB*8); memset(ybuffer,0,NB*4);
else else
ybuffer = y_ptr; ybuffer = y_ptr;
@ -465,8 +465,8 @@ int CNAME(BLASLONG m, BLASLONG n, BLASLONG dummy1, FLOAT alpha, FLOAT *a, BLASLO
if ( n2 & 1 ) if ( n2 & 1 )
{ {
sgemv_kernel_4x1(NB,a_ptr,x_ptr,ybuffer,&alpha); sgemv_kernel_4x1(NB,a_ptr,x_ptr,ybuffer,&alpha);
a_ptr += lda; /* a_ptr += lda;
x_ptr += 1; x_ptr += 1; */
} }