Browse Source
Merge pull request #3344 from gxw-loongson/develop
Delete the macro instruction "li" and use "li.d" instead
tags/v0.3.18
Martin Kroeker
GitHub
4 years ago
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
18 changed files with
40 additions and
40 deletions
-
kernel/loongarch64/asum.S
-
kernel/loongarch64/cnrm2.S
-
kernel/loongarch64/copy.S
-
kernel/loongarch64/dot.S
-
kernel/loongarch64/gemv_n.S
-
kernel/loongarch64/gemv_t.S
-
kernel/loongarch64/iamax.S
-
kernel/loongarch64/iamin.S
-
kernel/loongarch64/izamax.S
-
kernel/loongarch64/izamin.S
-
kernel/loongarch64/scal.S
-
kernel/loongarch64/snrm2.S
-
kernel/loongarch64/swap.S
-
kernel/loongarch64/zcopy.S
-
kernel/loongarch64/zdot.S
-
kernel/loongarch64/zgemv_n.S
-
kernel/loongarch64/zgemv_t.S
-
kernel/loongarch64/zscal.S
|
|
@@ -54,7 +54,7 @@ USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
|
|
|
MTC s1, $r0 |
|
|
|
MTC s2, $r0 |
|
|
|
slli.d INCX, INCX, BASE_SHIFT |
|
|
|
li TEMP, SIZE |
|
|
|
li.d TEMP, SIZE |
|
|
|
bge $r0, N, .L999 |
|
|
|
srai.d I, N, 3 |
|
|
|
bne INCX, TEMP, .L20 |
|
|
|
|
|
@@ -57,7 +57,7 @@ USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
|
|
|
#endif |
|
|
|
|
|
|
|
movgr2fr.d s1, $r0 |
|
|
|
li TEMP, 2 * SIZE |
|
|
|
li.d TEMP, 2 * SIZE |
|
|
|
fmov.d s2, s1 |
|
|
|
bge $r0, N, .L999 |
|
|
|
slli.d INCX, INCX, ZBASE_SHIFT |
|
|
|
|
|
@@ -52,7 +52,7 @@ USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
|
|
|
LDINT INCY, 0(INCY) |
|
|
|
#endif |
|
|
|
|
|
|
|
li TEMP, SIZE |
|
|
|
li.d TEMP, SIZE |
|
|
|
NOP |
|
|
|
slli.d INCX, INCX, BASE_SHIFT |
|
|
|
bge $r0, N, .L999 |
|
|
|
|
|
@@ -57,7 +57,7 @@ USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
|
|
|
MTC s1, $r0 |
|
|
|
MTC s2, $r0 |
|
|
|
slli.d INCX, INCX, BASE_SHIFT |
|
|
|
li TEMP, SIZE |
|
|
|
li.d TEMP, SIZE |
|
|
|
slli.d INCY, INCY, BASE_SHIFT |
|
|
|
bge $r0, N, .L999 |
|
|
|
srai.d I, N, 3 |
|
|
|
|
|
@@ -91,7 +91,7 @@ USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
|
|
|
bge $r0, M, .L999 |
|
|
|
slli.d INCY, INCY, BASE_SHIFT |
|
|
|
bge $r0, N, .L999 |
|
|
|
li I, SIZE |
|
|
|
li.d I, SIZE |
|
|
|
move YORIG, Y |
|
|
|
beq INCY, I, .L10 |
|
|
|
srai.d I, M, 2 |
|
|
@@ -472,7 +472,7 @@ USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
|
|
|
.align 3 |
|
|
|
|
|
|
|
.L900: |
|
|
|
li YORIG, SIZE |
|
|
|
li.d YORIG, SIZE |
|
|
|
srai.d I, M, 2 |
|
|
|
beq INCY, YORIG, .L999 |
|
|
|
move XX, BUFFER |
|
|
|
|
|
@@ -88,7 +88,7 @@ USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
|
|
|
bge $r0, M, .L999 |
|
|
|
slli.d INCY, INCY, BASE_SHIFT |
|
|
|
bge $r0, N, .L999 |
|
|
|
li I, SIZE |
|
|
|
li.d I, SIZE |
|
|
|
move XORIG, X |
|
|
|
beq INCX, I, .L10 |
|
|
|
srai.d I, M, 2 |
|
|
|
|
|
@@ -62,24 +62,24 @@ USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
|
|
|
LDINT INCX, 0(INCX) |
|
|
|
#endif |
|
|
|
|
|
|
|
li x1, 0 |
|
|
|
li.d x1, 0 |
|
|
|
bge $r0, N, .L999 |
|
|
|
slli.d INCX, INCX, BASE_SHIFT |
|
|
|
bge $r0, INCX, .L999 |
|
|
|
LD a1, X, 0 * SIZE |
|
|
|
addi.d N, N, -1 |
|
|
|
li x1, 1 |
|
|
|
li.d x1, 1 |
|
|
|
bge $r0, N, .L999 |
|
|
|
FABS s1, a1 |
|
|
|
add.d X, X, INCX |
|
|
|
FABS s2, a1 |
|
|
|
li x2, 1 |
|
|
|
li.d x2, 1 |
|
|
|
FABS s3, a1 |
|
|
|
srai.d I, N, 3 |
|
|
|
FABS s4, a1 |
|
|
|
li x3, 1 |
|
|
|
li TEMP, 2 |
|
|
|
li x4, 1 |
|
|
|
li.d x3, 1 |
|
|
|
li.d TEMP, 2 |
|
|
|
li.d x4, 1 |
|
|
|
bge $r0, I, .L15 |
|
|
|
LD a1, X, 0 * SIZE |
|
|
|
add.d X, X, INCX |
|
|
|
|
|
@@ -62,24 +62,24 @@ USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
|
|
|
LDINT INCX, 0(INCX) |
|
|
|
#endif |
|
|
|
|
|
|
|
li x1, 0 |
|
|
|
li.d x1, 0 |
|
|
|
bge $r0, N, .L999 |
|
|
|
slli.d INCX, INCX, BASE_SHIFT |
|
|
|
bge $r0, INCX, .L999 |
|
|
|
LD a1, X, 0 * SIZE |
|
|
|
addi.d N, N, -1 |
|
|
|
li x1, 1 |
|
|
|
li.d x1, 1 |
|
|
|
bge $r0, N, .L999 |
|
|
|
FABS s1, a1 |
|
|
|
add.d X, X, INCX |
|
|
|
FABS s2, a1 |
|
|
|
li x2, 1 |
|
|
|
li.d x2, 1 |
|
|
|
FABS s3, a1 |
|
|
|
srai.d I, N, 3 |
|
|
|
FABS s4, a1 |
|
|
|
li x3, 1 |
|
|
|
li TEMP, 2 |
|
|
|
li x4, 1 |
|
|
|
li.d x3, 1 |
|
|
|
li.d TEMP, 2 |
|
|
|
li.d x4, 1 |
|
|
|
bge $r0, I, .L15 |
|
|
|
LD a1, X, 0 * SIZE |
|
|
|
add.d X, X, INCX |
|
|
|
|
|
@@ -66,7 +66,7 @@ USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
|
|
|
LDINT INCX, 0(INCX) |
|
|
|
#endif |
|
|
|
|
|
|
|
li x1, 0 |
|
|
|
li.d x1, 0 |
|
|
|
bge $r0, N, .L999 |
|
|
|
slli.d INCX, INCX, ZBASE_SHIFT |
|
|
|
bge $r0, INCX, .L999 |
|
|
@@ -79,14 +79,14 @@ USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
|
|
|
ADD s3, t1, t2 |
|
|
|
ADD s4, t1, t2 |
|
|
|
addi.d N, N, -1 |
|
|
|
li x1, 1 |
|
|
|
li.d x1, 1 |
|
|
|
bge $r0, N, .L999 |
|
|
|
add.d X, X, INCX |
|
|
|
li x2, 1 |
|
|
|
li.d x2, 1 |
|
|
|
srai.d I, N, 2 |
|
|
|
li x3, 1 |
|
|
|
li TEMP, 2 |
|
|
|
li x4, 1 |
|
|
|
li.d x3, 1 |
|
|
|
li.d TEMP, 2 |
|
|
|
li.d x4, 1 |
|
|
|
bge $r0, I, .L15 |
|
|
|
LD a1, X, 0 * SIZE |
|
|
|
LD a2, X, 1 * SIZE |
|
|
|
|
|
@@ -66,7 +66,7 @@ USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
|
|
|
LDINT INCX, 0(INCX) |
|
|
|
#endif |
|
|
|
|
|
|
|
li x1, 0 |
|
|
|
li.d x1, 0 |
|
|
|
bge $r0, N, .L999 |
|
|
|
slli.d INCX, INCX, ZBASE_SHIFT |
|
|
|
bge $r0, INCX, .L999 |
|
|
@@ -79,14 +79,14 @@ USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
|
|
|
ADD s3, t1, t2 |
|
|
|
ADD s4, t1, t2 |
|
|
|
addi.d N, N, -1 |
|
|
|
li x1, 1 |
|
|
|
li.d x1, 1 |
|
|
|
bge $r0, N, .L999 |
|
|
|
add.d X, X, INCX |
|
|
|
li x2, 1 |
|
|
|
li.d x2, 1 |
|
|
|
srai.d I, N, 2 |
|
|
|
li x3, 1 |
|
|
|
li TEMP, 2 |
|
|
|
li x4, 1 |
|
|
|
li.d x3, 1 |
|
|
|
li.d TEMP, 2 |
|
|
|
li.d x4, 1 |
|
|
|
bge $r0, I, .L15 |
|
|
|
LD a1, X, 0 * SIZE |
|
|
|
LD a2, X, 1 * SIZE |
|
|
|
|
|
@@ -52,7 +52,7 @@ USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
|
|
|
|
|
|
|
PROLOGUE |
|
|
|
|
|
|
|
li TEMP, SIZE |
|
|
|
li.d TEMP, SIZE |
|
|
|
MTC a1, $r0 |
|
|
|
slli.d INCX, INCX, BASE_SHIFT |
|
|
|
bge $r0, N, .L999 |
|
|
|
|
|
@@ -57,7 +57,7 @@ USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
|
|
|
#endif |
|
|
|
|
|
|
|
movgr2fr.d s1, $r0 |
|
|
|
li TEMP, SIZE |
|
|
|
li.d TEMP, SIZE |
|
|
|
fmov.d s2, s1 |
|
|
|
bge $r0, N, .L999 |
|
|
|
slli.d INCX, INCX, BASE_SHIFT |
|
|
|
|
|
@@ -58,7 +58,7 @@ USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
|
|
|
|
|
|
|
PROLOGUE |
|
|
|
|
|
|
|
li TEMP, SIZE |
|
|
|
li.d TEMP, SIZE |
|
|
|
slli.d INCX, INCX, BASE_SHIFT |
|
|
|
bge $r0, N, .L999 |
|
|
|
slli.d INCY, INCY, BASE_SHIFT |
|
|
|
|
|
@@ -53,7 +53,7 @@ USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
|
|
|
LDINT INCY, 0(INCY) |
|
|
|
#endif |
|
|
|
|
|
|
|
li TEMP, 2 * SIZE |
|
|
|
li.d TEMP, 2 * SIZE |
|
|
|
NOP |
|
|
|
slli.d INCX, INCX, ZBASE_SHIFT |
|
|
|
bge $r0, N, .L999 |
|
|
|
|
|
@@ -62,7 +62,7 @@ USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
|
|
|
MOV s3, s2 |
|
|
|
MOV s4, s3 |
|
|
|
slli.d INCX, INCX, ZBASE_SHIFT |
|
|
|
li TEMP, 2 * SIZE |
|
|
|
li.d TEMP, 2 * SIZE |
|
|
|
slli.d INCY, INCY, ZBASE_SHIFT |
|
|
|
bge $r0, N, .L999 |
|
|
|
srai.d I, N, 2 |
|
|
|
|
|
@@ -123,7 +123,7 @@ USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
|
|
|
bge $r0, M, .L999 |
|
|
|
slli.d INCY, INCY, ZBASE_SHIFT |
|
|
|
bge $r0, N, .L999 |
|
|
|
li I, 2 * SIZE |
|
|
|
li.d I, 2 * SIZE |
|
|
|
move YORIG, Y |
|
|
|
beq INCY, I, .L10 |
|
|
|
srai.d I, M, 2 |
|
|
@@ -576,7 +576,7 @@ USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
|
|
|
.align 3 |
|
|
|
|
|
|
|
.L900: |
|
|
|
li YORIG, 2 * SIZE |
|
|
|
li.d YORIG, 2 * SIZE |
|
|
|
srai.d I, M, 2 |
|
|
|
beq INCY, YORIG, .L999 |
|
|
|
move XX, BUFFER |
|
|
|
|
|
@@ -116,7 +116,7 @@ USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
|
|
|
bge $r0, M, .L999 |
|
|
|
slli.d INCY, INCY, ZBASE_SHIFT |
|
|
|
bge $r0, N, .L999 |
|
|
|
li I, 2 * SIZE |
|
|
|
li.d I, 2 * SIZE |
|
|
|
move XORIG, X |
|
|
|
beq INCX, I, .L10 |
|
|
|
srai.d I, M, 2 |
|
|
|
|
|
@@ -52,7 +52,7 @@ USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
|
|
|
|
|
|
|
PROLOGUE |
|
|
|
|
|
|
|
li TEMP, 2 * SIZE |
|
|
|
li.d TEMP, 2 * SIZE |
|
|
|
MTC a1, $r0 |
|
|
|
slli.d INCX, INCX, ZBASE_SHIFT |
|
|
|
bge $r0, N, .L999 |
|
|
|