Werner Saar
10 years ago
6 changed files with 12 additions and 9 deletions
Unified View
Diff Options
-
+1 -1kernel/x86_64/caxpy.c
-
+4 -2kernel/x86_64/cdot.c
-
+2 -2kernel/x86_64/daxpy.c
-
+1 -1kernel/x86_64/ddot.c
-
+1 -1kernel/x86_64/zaxpy.c
-
+3 -2kernel/x86_64/zdot.c
+ 1
- 1
kernel/x86_64/caxpy.c
View File
| @@ -84,7 +84,7 @@ int CNAME(BLASLONG n, BLASLONG dummy0, BLASLONG dummy1, FLOAT da_r, FLOAT da_i, | |||||
| if ( (inc_x == 1) && (inc_y == 1) ) | if ( (inc_x == 1) && (inc_y == 1) ) | ||||
| { | { | ||||
| int n1 = n & -32; | |||||
| BLASLONG n1 = n & -32; | |||||
| if ( n1 ) | if ( n1 ) | ||||
| { | { | ||||
+ 4
- 2
kernel/x86_64/cdot.c
View File
| @@ -109,7 +109,7 @@ FLOAT _Complex CNAME(BLASLONG n, FLOAT *x, BLASLONG inc_x, FLOAT *y, BLASLONG in | |||||
| if ( (inc_x == 1) && (inc_y == 1) ) | if ( (inc_x == 1) && (inc_y == 1) ) | ||||
| { | { | ||||
| int n1 = n & -16; | |||||
| BLASLONG n1 = n & -16; | |||||
| if ( n1 ) | if ( n1 ) | ||||
| { | { | ||||
| @@ -119,8 +119,10 @@ FLOAT _Complex CNAME(BLASLONG n, FLOAT *x, BLASLONG inc_x, FLOAT *y, BLASLONG in | |||||
| dot[4] += dot[6]; | dot[4] += dot[6]; | ||||
| dot[5] += dot[7]; | dot[5] += dot[7]; | ||||
| } | } | ||||
| i = n1; | i = n1; | ||||
| int j = i * 2; | |||||
| BLASLONG j = i * 2; | |||||
| while( i < n ) | while( i < n ) | ||||
| { | { | ||||
+ 2
- 2
kernel/x86_64/daxpy.c
View File
| @@ -80,9 +80,9 @@ int CNAME(BLASLONG n, BLASLONG dummy0, BLASLONG dummy1, FLOAT da, FLOAT *x, BLAS | |||||
| { | { | ||||
| #if defined(SANDYBRIDGE) | #if defined(SANDYBRIDGE) | ||||
| int n1 = n & -32; | |||||
| BLASLONG n1 = n & -32; | |||||
| #else | #else | ||||
| int n1 = n & -16; | |||||
| BLASLONG n1 = n & -16; | |||||
| #endif | #endif | ||||
| if ( n1 ) | if ( n1 ) | ||||
+ 1
- 1
kernel/x86_64/ddot.c
View File
| @@ -83,7 +83,7 @@ FLOAT CNAME(BLASLONG n, FLOAT *x, BLASLONG inc_x, FLOAT *y, BLASLONG inc_y) | |||||
| if ( (inc_x == 1) && (inc_y == 1) ) | if ( (inc_x == 1) && (inc_y == 1) ) | ||||
| { | { | ||||
| int n1 = n & -16; | |||||
| BLASLONG n1 = n & -16; | |||||
| if ( n1 ) | if ( n1 ) | ||||
| ddot_kernel_8(n1, x, y , &dot ); | ddot_kernel_8(n1, x, y , &dot ); | ||||
+ 1
- 1
kernel/x86_64/zaxpy.c
View File
| @@ -84,7 +84,7 @@ int CNAME(BLASLONG n, BLASLONG dummy0, BLASLONG dummy1, FLOAT da_r, FLOAT da_i, | |||||
| if ( (inc_x == 1) && (inc_y == 1) ) | if ( (inc_x == 1) && (inc_y == 1) ) | ||||
| { | { | ||||
| int n1 = n & -16; | |||||
| BLASLONG n1 = n & -16; | |||||
| if ( n1 ) | if ( n1 ) | ||||
| { | { | ||||
+ 3
- 2
kernel/x86_64/zdot.c
View File
| @@ -105,13 +105,14 @@ FLOAT _Complex CNAME(BLASLONG n, FLOAT *x, BLASLONG inc_x, FLOAT *y, BLASLONG in | |||||
| if ( (inc_x == 1) && (inc_y == 1) ) | if ( (inc_x == 1) && (inc_y == 1) ) | ||||
| { | { | ||||
| int n1 = n & -8; | |||||
| BLASLONG n1 = n & -8; | |||||
| if ( n1 ) | if ( n1 ) | ||||
| zdot_kernel_8(n1, x, y , dot ); | zdot_kernel_8(n1, x, y , dot ); | ||||
| i = n1; | i = n1; | ||||
| int j = i * 2; | |||||
| BLASLONG j = i * 2; | |||||
| while( i < n ) | while( i < n ) | ||||
| { | { | ||||