bugfix in sgemv_n.c
authorwernsaar <wernsaar@googlemail.com>
Tue, 5 Aug 2014 18:14:29 +0000 (20:14 +0200)
committerwernsaar <wernsaar@googlemail.com>
Tue, 5 Aug 2014 18:14:29 +0000 (20:14 +0200)
kernel/x86_64/sgemv_n.c

index 4961def..f2de1b7 100644 (file)
@@ -46,8 +46,8 @@ USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 
 static void sgemv_kernel_16x4(BLASLONG n, FLOAT **ap, FLOAT *x, FLOAT *y)
 {
-       int i;
-       float *a0,*a1,*a2,*a3;
+       BLASLONG i;
+       FLOAT *a0,*a1,*a2,*a3;
        a0 = ap[0];
        a1 = ap[1];
        a2 = ap[2];
@@ -66,8 +66,8 @@ static void sgemv_kernel_16x4(BLASLONG n, FLOAT **ap, FLOAT *x, FLOAT *y)
 
 static void sgemv_kernel_16x1(BLASLONG n, FLOAT *ap, FLOAT *x, FLOAT *y)
 {
-       int i;
-       float *a0;
+       BLASLONG i;
+       FLOAT *a0;
        a0 = ap;
 
        for ( i=0; i< n; i+=4 )
@@ -130,11 +130,11 @@ int CNAME(BLASLONG m, BLASLONG n, BLASLONG dummy1, FLOAT alpha, FLOAT *a, BLASLO
        BLASLONG m2;
        BLASLONG n2;
        FLOAT xbuffer[4],*ybuffer;
+
        ybuffer = buffer;
        
        n1 = n / 4 ;
        n2 = n % 4 ;
-
        
        m1 = m - ( m % 16 );
        m2 = (m % NBMAX) - (m % 16) ;