[ZARCH] Fix copy constraint

Author: mtk-i

kernel/zarch/ccopy.c

@@ -36,7 +36,7 @@ static void ccopy_kernel_32(BLASLONG n, FLOAT *x, FLOAT *y) {
        "la  %[x],256(%[x])\n\t"
        "la  %[y],256(%[y])\n\t"
        "brctg %[n],0b"
-       : "=m"(*(FLOAT (*)[n * 2]) y),[x] "+&a"(x),[y] "+&a"(y)
+       : "=m"(*(FLOAT (*)[n * 2]) y),[x] "+&a"(x),[y] "+&a"(y),[n] "+&r"(n)
        : "m"(*(const FLOAT (*)[n * 2]) x)
        : "cc");
 }

kernel/zarch/dcopy.c

@@ -36,7 +36,7 @@ static void dcopy_kernel_32(BLASLONG n, FLOAT *x, FLOAT *y) {
        "la  %[x],256(%[x])\n\t"
        "la  %[y],256(%[y])\n\t"
        "brctg %[n],0b"
-       : "=m"(*(FLOAT (*)[n]) y),[x] "+&a"(x),[y] "+&a"(y)
+       : "=m"(*(FLOAT (*)[n]) y),[x] "+&a"(x),[y] "+&a"(y),[n] "+&r"(n)
        : "m"(*(const FLOAT (*)[n]) x)
        : "cc");
 }

kernel/zarch/scopy.c

@@ -36,7 +36,7 @@ static void scopy_kernel_64(BLASLONG n, FLOAT *x, FLOAT *y) {
        "la  %[x],256(%[x])\n\t"
        "la  %[y],256(%[y])\n\t"
        "brctg %[n],0b"
-       : "=m"(*(FLOAT (*)[n]) y),[x] "+&a"(x),[y] "+&a"(y)
+       : "=m"(*(FLOAT (*)[n]) y),[x] "+&a"(x),[y] "+&a"(y),[n] "+&r"(n)
        : "m"(*(const FLOAT (*)[n]) x)
        : "cc");
 }

kernel/zarch/zcopy.c

@@ -36,7 +36,7 @@ static void zcopy_kernel_16(BLASLONG n, FLOAT *x, FLOAT *y) {
        "la  %[x],256(%[x])\n\t"
        "la  %[y],256(%[y])\n\t"
        "brctg %[n],0b"
-       : "=m"(*(FLOAT (*)[n * 2]) y),[x] "+&a"(x),[y] "+&a"(y)
+       : "=m"(*(FLOAT (*)[n * 2]) y),[x] "+&a"(x),[y] "+&a"(y),[n] "+&r"(n)
        : "m"(*(const FLOAT (*)[n * 2]) x)
        : "cc");
 }