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

small fix inside ifdef z13mvc . (z13mvc code is not used in production)

This commit is contained in:
Abdelrauf 2018-01-31 07:49:38 -08:00 committed by QWR QWR
parent f946a89432
commit afd514c25d
1 changed files with 3 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
kernel/zarch/dcopy.c
View File

@ -27,7 +27,6 @@ USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
#include "common.h" #include "common.h"
#if defined(Z13mvc) #if defined(Z13mvc)
static void dcopy_kernel_32(BLASLONG n, FLOAT *x, FLOAT *y) { static void dcopy_kernel_32(BLASLONG n, FLOAT *x, FLOAT *y) {
@ -42,9 +41,9 @@ static void dcopy_kernel_32(BLASLONG n, FLOAT *x, FLOAT *y) {
"la %[ptr_x],256(%[ptr_x]) \n\t" "la %[ptr_x],256(%[ptr_x]) \n\t"
"la %[ptr_y],256(%[ptr_y]) \n\t" "la %[ptr_y],256(%[ptr_y]) \n\t"
"brctg %[n_tmp],1b" "brctg %[n_tmp],1b"
: [mem_y] "=m" (*(double (*)[n])y), [n_tmp] "+&r"(n) : [mem_y] "=m" (*(double (*)[n])y), [n_tmp] "+&r"(n),
: [mem_x] "m" (*(const double (*)[n])x), [ptr_x] "+&a"(x), [ptr_y] "+&a"(y)
[ptr_x] "a"(x), [ptr_y] "a"(y) : [mem_x] "m" (*(const double (*)[n])x)
: "cc" : "cc"
); );
return; return;